Jump to content

moimon

Active Members
  • Posts

    35
  • Joined

  • Last visited

Recent Profile Visitors

407 profile views

moimon's Achievements

Seeker

Seeker (1/7)

4

Reputation

  1. Great, this UDF is a great support for data transfer between processes 😍Thank you 😚
  2. My friends can use this code (use COM - without registering Dll): MsgBox(0, 'Result', _ExtractTextCOM("sample.docx", False)) Func _ExtractTextCOM($sFilename, $bProperties = False) Local $hXd2tx = DllOpen(@ScriptDir & "\xd2txcom" & (@AutoItX64 ? '_64' : '') & ".dll") If @error Then Return SetError(1, '', '') Local $oXd2tx = ObjCreate('{4ECE8E8A-BCC2-4709-BCAE-264210DF321B}', '{EB26F494-4E90-4432-9BA6-C6D9CDEE25C4}', $hXd2tx) Return $oXd2tx.ExtractText($sFilename, $bProperties) EndFunc
  3. @trancexx I tried it with your Subrogation function instead of using DllOpen function but failed. https://www.autoitscript.com/forum/topic/108969-subrogation/ Can you improve it or is there any other way to create a COM object using an hActiveX from memory ? Thanks for the help β™₯️
  4. Thanks trancexx. Although it has been a long time ago, it still works well and serves my project well. πŸ˜† Btw, you have a new avatar 😍
  5. Example multi request 10 pages website: Local $Thread = 10 Local $oWH[$Thread] Local $ThreadCompleted[$Thread] Local $CheckCompleted = 0 Local $AsyncMode = True For $i = 0 To $Thread - 1 $oWH[$i] = ObjCreate('WinHttp.WinHttpRequest.5.1') $oWH[$i].Open('GET', 'http://autoitvn.com/forums/thao-luan-hoi-dap/page-' & ($i + 1), $AsyncMode) $oWH[$i].Send() Next Do For $i = 0 To $Thread - 1 If $ThreadCompleted[$i] = 0 And $oWH[$i].WaitForResponse(0) = True Then ;$ThreadCompleted[$i] variable condition to prevent loop result ConsoleWrite('>Page ' & $i & ' completed:' & @CRLF & $oWH[$i].GetAllResponseHeaders & @CRLF) $ThreadCompleted[$i] = 1 $CheckCompleted += 1 EndIf Next Until $CheckCompleted = $Thread MsgBox(0, 'Hi', 'Completed') This method works very fast and do not use as much CPU and RAM resources as multi process
  6. ObjCreate('WinHttp.WinHttpRequest.5.1') Mode: Async = True In Loop use: .WaitForResponse(0) That is my suggestion to you πŸ˜™
  7. Hi all. Sorry if my words are confusing because I am not good at English. I am writing code to embed website with Recaptcha in GUI. And then, the code will automatically press the "I'm not a robot" button. The problem here is: - The code still works fine when entering iFrame to interact with Recaptcha with the URL is "https://www.google.com/recaptcha/api2/demo" <snip> - But for other URLs (such as "https://recaptcha-demo.appspot.com/recaptcha-v2-checkbox.php"), the code cannot be entered into the iframe. Code: <snip> I did a lot of research but didn't know why. I sincerely thanks for the help.
  8. Awsome πŸ˜† This UDF is working very well for my uncompleted project. Thank you.
  9. Local $var[] SetError(1, 1) $var.test = 1 MsgBox(4096, '@error and @extended', @error & ' ' & @extended) It seems that when using Map, @error will be reset to 0 (@extended is not affected). This is inconvenient. @Jon Can you adjust it to make @error not affected by Map? Thank you
  10. In ChilkatContants.au3, I added: $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTP][$CHILKATOBJ_ID_PROGID] = 'Chilkat_9_5_0.Http' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTP][$CHILKATOBJ_ID_CLSID] = '{A74C26D2-2429-4099-8672-2250B15E327F}' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTP][$CHILKATOBJ_ID_IID] = '{C754C4B4-6B0A-4664-ADDD-45467F0BCB7E}' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPREQUEST][$CHILKATOBJ_ID_PROGID] = 'Chilkat_9_5_0.HttpRequest' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPREQUEST][$CHILKATOBJ_ID_CLSID] = '{D66A2F08-A267-4593-ACD4-3EF65255E005}' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPREQUEST][$CHILKATOBJ_ID_IID] = '{495F8CD2-9F03-4A83-A9BC-FEEAE2182D9B}' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPRESPONSE][$CHILKATOBJ_ID_PROGID] = 'Chilkat_9_5_0.HttpResponse' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPRESPONSE][$CHILKATOBJ_ID_CLSID] = '{65EA825E-648E-4BF0-8AA3-4E7724F75B07}' $CHILKATOBJ_API[$CHILKATOBJ_VERSION_950][$CHILKATOBJ_NAME_HTTPRESPONSE][$CHILKATOBJ_ID_IID] = '{C143C715-0FED-4392-B207-1CA3CDF84C88}' In Chilkat.au3, I added: Func _Chilkat_Http_ObjCreate, Func _Chilkat_HttpRequest_ObjCreate and Func _Chilkat_HttpResponse_ObjCreate. They are similar to other _Chilkat_xxx_ObjCreate functions. My HttpRequest Code: _ErrorLog_ChilkatWrapper(ConsoleWrite) _Chilkat_StartUp(@ScriptDir & "\Chilkat" & (@AutoItX64 ? '-x64' : '') & ".dll") _Chilkat_DllVersion($CHILKATOBJ_VERSION_950) Local $oHttp = _Chilkat_Http_ObjCreate() If Not IsObj($oHttp) Then Exit MsgBox(4096, 'Err', '_Chilkat_Http_ObjCreate') Local $oHttpRequest = _Chilkat_HttpRequest_ObjCreate() If Not IsObj($oHttpRequest) Then Exit MsgBox(4096, 'Err', '_Chilkat_HttpRequest_ObjCreate') $resp = $oHttp.SynchronousRequest("www.autoitscript.com", 443, True, $oHttpRequest) $resp is not HttpResponse Object without registering the chilkat/chilkat-x64.dll Thanks for your help.
  11. Hi. Thanks for this nice UDF. Sorry because my bad English. When looking through this library, I see you do not need to register chilkat.dll, but use DllOpen and ObjectCreate with interfaces. But when I added the chilkat_httprequest function, it seemed that the response was not generated (it was not an object) without registering the dll. So is it possible to get chilkat_httpresponse without registering the dll? Thank you.
  12. Function IsMap() requires AutoIt version 3.3.15.0 or 3.3.15.1 beta
  13. COM Error by Func mEmailer You need to fully declare these, they are found at the beginning of the UDF
  14. @naru I run it perfectly.
  15. Add Clipput($D_2) in func XProTec And have: $D_License = "F2C02EDD5B8AB654" Try it. Sorry because I'm not well English
Γ—
Γ—
  • Create New...