Jump to content

tungpheng

Active Members
  • Posts

    21
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

tungpheng's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. OK I have way to pass that error. I just Add Loop to doagain that func have http.send() when that passed to auto exit loop While @error Wend
  2. I try add line If @error then after line $oHTTP.Send() But seems it can't do it
  3. I run my code use HTTP Func _HttpCreate() Local $oHTTP = ObjCreate("winhttp.winhttprequest.5.1") If @error Then Return SetError(1, 0, 0) ; ; error HTTP create error 1 Else Return $oHTTP EndIf EndFunc ;==>_HttpCreate Func _HttpGet(ByRef $oHTTP, $sURL, $sData = '') If NOT _IsInternetConnected() Then Return SetError(4, 0, 0) ; disconect error 4 Else If $sData = '' Then $oHTTP.Open("GET", $sURL , False) Else $oHTTP.Open("GET", $sURL & "?" & $sData, False) EndIf If @error Then Return SetError(1, 0, 0) ; error HTTP error 1 Else __TestConnection() $oHTTP.Send() If @error Then Return SetError(2, 0, 0) ; error send error 2 Else If $oHTTP.Status <> $HTTP_STATUS_OK Then Return SetError(3, 0, 0) ; Status not OK error 3 Else Return SetError(0, 0, $oHTTP.ResponseText) EndIf EndIf EndIf EndIf EndFunc ;==>_HttpGet I use func to check error and have information. picture In attachment that is func $oMyError = ObjEvent("AutoIt.Error","MyErrFunc") Func MyErrFunc() Msgbox(0,"AutoItCOM Test","We intercepted a COM Error !" & @CRLF & @CRLF & _ "err.description is: " & @TAB & $oMyError.description & @CRLF & _ "err.windescription:" & @TAB & $oMyError.windescription & @CRLF & _ "err.number is: " & @TAB & hex($oMyError.number,8) & @CRLF & _ "err.lastdllerror is: " & @TAB & $oMyError.lastdllerror & @CRLF & _ "err.scriptline is: " & @TAB & $oMyError.scriptline & @CRLF & _ "err.source is: " & @TAB & $oMyError.source & @CRLF & _ "err.helpfile is: " & @TAB & $oMyError.helpfile & @CRLF & _ "err.helpcontext is: " & @TAB & $oMyError.helpcontext _ ) Endfunc Can anyone help me about that? I dont know why have this error. HTTP can request more request but at few moment later. thí error to stop script.
  4. If _IsInternetConnected() Then msgbox(0,"True","Internet Connected") Else Msgbox(0,"False","Internet Disconected") Endif Func _IsInternetConnected() Local $aReturn = DllCall('connect.dll', 'long', 'IsInternetConnected') If @error Then Return SetError(1, 0, False) EndIf Return $aReturn[0] = 0 EndFunc ;==>_IsInternetConnected That is my func I alsway to check
  5. before ask about that. I have found this command but I dont know how to use that. and now see you UDF I know more 1 things I asked more about StdoutRead never used Thank you again
  6. thank you so much @mLipok THat is exactly I found.
  7. yes like this website https://www.sslshopper.com/certificate-decoder.html i posted But I want to know How autoIT can read like that. And how do that
  8. and you can see if copy text inside node <X509Certificate> .....</X509Certificate> of my xml file signed to https://www.sslshopper.com/certificate-decoder.html can read data like that. I want read data info like that website
  9. that file I attached. you can see have node <X509Certificate> .....</X509Certificate> text in this side is file cer I want to read info. you can copy that to notepad and change name to .cer can open and read infor by eyes but I dont know how to read by autoIT. 0100100008.xml
  10. https://www.sslshopper.com/certificate-decoder.html like this website do that I want read cert like that. but use autoit. that is text in file cer. i used base64 decode but not have full info i want. MIIEWTCCA0GgAwIBAgIQVANaePHGB8BUrofpHr7KbzANBgkqhkiG9w0BAQUFADBJMQswCQYDVQQG EwJWTjEOMAwGA1UEBxMFSGFub2kxGTAXBgNVBAoTEEJrYXYgQ29ycG9yYXRpb24xDzANBgNVBAMT BkJrYXZDQTAeFw0xNTA2MjEwNjI5MTNaFw0xODAzMjYwNjI5MTNaMIGrMR4wHAYKCZImiZPyLGQB AQwOTVNUOjAxMDIyMzk5NjgxVDBSBgNVBAMMS0PDlE5HIFRZIEPhu5QgUEjhuqZOIMSQ4bqmVSBU xq8gWMOCWSBE4buwTkcgVsOAIFRIxq/GoE5HIE3huqBJIFZJ4buGVCBIw5lORzESMBAGA1UEBwwJ QmEgxJDDrG5oMRIwEAYDVQQIDAlIw6AgTuG7mWkxCzAJBgNVBAYTAlZOMIGfMA0GCSqGSIb3DQEB AQUAA4GNADCBiQKBgQCmQlP+XYZVQ4efPU758Vjge+lVjHWnkarHUj63mqpqouxodgOOp83S0IdX pDwM/s2zUvyGB1AVwdmk/P6Y3D7X6VrY+xUHP41uQH7msoJOSIl+7Vn0+LTLdANrKOCUlJqfqjh+ jmzZgRsR/pMjekzkOsJYjp7lGjzvx1ZQnkJbGwIDAQABo4IBXDCCAVgwMQYIKwYBBQUHAQEEJTAj MCEGCCsGAQUFBzABhhVodHRwOi8vb2NzcC5ia2F2Y2Eudm4wHQYDVR0OBBYEFC1QOsT9PLjmb6Zu uImN5QwYUNltMAwGA1UdEwEB/wQCMAAwHwYDVR0jBBgwFoAUHrAPSJff0MNnp0aEO1g7iA1TlIYw fwYDVR0fBHgwdjB0oCOgIYYfaHR0cDovL2NybC5ia2F2Y2Eudm4vQmthdkNBLmNybKJNpEswSTEP MA0GA1UEAwwGQmthdkNBMRkwFwYDVQQKDBBCa2F2IENvcnBvcmF0aW9uMQ4wDAYDVQQHDAVIYW5v aTELMAkGA1UEBhMCVk4wDgYDVR0PAQH/BAQDAgeAMB8GA1UdJQQYMBYGCCsGAQUFBwMEBgorBgEE AYI3CgMMMCMGA1UdEQQcMBqBGG5ndXllbmhpZXUxNTA0QGdtYWlsLmNvbTANBgkqhkiG9w0BAQUF AAOCAQEAGuUPOcLXWP/AkRtF79kvTBBkk58JrqVdE9CrwUFYJcYEmRoZSkLXtc3TdcoF/SXxyiDN xRiidaG+khmuFgJNH1B9EQmhFQC1Hc+WnB/9T4+OkGiTaq/AId3Syp8KXjqBreG0maaoCjXj91QK ZpPA8MktkYcc26/m10Trs6zt8UY4V2ckllvt6jSuj7gYyW50NuBsjFklrYjD8969Pl2NUyJvUJTj FTys8GcvKtssfi/ydrjQIHc3lzwG9hKusDVwgPWbJWL4+ZBc4NE6SnSOJ8oTf/BPtEeO3l/WTSgt XsuQyMin+95kVkaRLrrRP5LWo+B4SWU5rBZ+zEgX61v3jg==
  11. I have file signed I took file cer in there. now how i can read that file from code you posted. Sorry i just to learn code so I'm so nub. but your code upside is read cert have in system?
  12. i dont know how to encode this file to like that
  13. i know about FIleread() but that only read text I need read info later encode X509. Like in this file is: Common Name: CÔNG TY CỔ PHẦN ĐẦU TƯ XÂY DỰNG VÀ THƯƠNG MẠI VIỆT HÙNG Subject Alternative Names: email:nguyenhieu1504@gmail.com Locality: Ba Đình State: Hà Nội Country: VN Valid From: June 20, 2015 Valid To: March 25, 2018 Issuer: BkavCA, Bkav Corporation Serial Number: 54035a78f1c607c054ae87e91ebeca6f
  14. i have a file cert I just only know about Autoit now I want to read info of file Cer. but i dont know how to do that. can anyone help thank so much 0102239968.cer
×
×
  • Create New...