ObjCreate .send crash

Lanealine

Hey,

vorab muss ich sagen, dass ich mich relativ schlecht mit ObjCreate in AutoIT auskenne...

Ich lasse in einer Whileschleife regelmäßig den gleichen JSON string abfragen.

Das funktioniert auch super, allerdings stürzt das Programm sehr zufällig in der $Object.send Zeile ab.(kann Stundenlang gut gehen)

Errorcode: The requested action with this object has failed.

Wie kann es sein, dass das Programm abstürzt obwohl es bei einem @error nicht weitermachen soll ? Gibts noch andere Optionen den Crash zu umgehen ?

Ich habe das Gefühl, dass das Programm öfter crasht wenn ich irgendwas nebenbei im inet mache, Youtube oder nen Game zocken. Kann das sein oder lieg ich da falsch ?

Außerdem habe ich öfter mal was von einem "ErrorChecker"(ObjEvent) gelesen, das is ein recht kurzer Code. Damit kann ich allerdings garnichts anfangen -.-

Code

$Object = ObjCreate("MSXML2.XMLHTTP")
If @error Then
    Msg(0, "", "1")
Else
$Object.open("POST", $url, False)
If @error Then
    Msg(0, "", "2")
Else
$Object.setrequestheader("type", "bla 1")
If @error Then
    Msg(0, "", "3")
Else
$Object.setrequestheader("type", "bla 2")
If @error Then
    Msg(0, "", "4")
Else
$Object.send('Json blabla')
If @error Then
    Msg(0, "", "5")
Else

Alles anzeigen

**Musashi**

Zitat von Lanealine

Außerdem habe ich öfter mal was von einem "ErrorChecker"(ObjEvent) gelesen, das is ein recht kurzer Code. Damit kann ich allerdings gar nichts anfangen -.-

Du meinst wahrscheinlich einen COM-Error-Handler.

Dazu am Anfang des Skriptes folgende Zeile einfügen :

Global $objCOMError = ObjEvent("AutoIt.Error","_COM_Error")

und die entsprechende Funktion (kann am Ende des Skriptes stehen) :

Code

; -------------------------------------------------------------------------------------------------------------------------------
; Funktion     : _COM_Error
; Beschreibung : Fehlermeldung für eigenen COM-Error-Handler
; -------------------------------------------------------------------------------------------------------------------------------
Func _COM_Error()
    MsgBox($MB_SYSTEMMODAL+$MB_ICONERROR, "AutoIt COM-Error:", _
                         "Ein COM-Error ist aufgetreten : " & @CRLF & @CRLF & _
                         "Number         = " & @TAB & hex($objCOMError.number, 8) & @CRLF & _
                         "Description    = " & @TAB & $objCOMError.description    & @CRLF & _
                         "Windescription = " & @TAB & $objCOMError.windescription & @CRLF & _
                         "Lastdllerror   = " & @TAB & $objCOMError.lastdllerror   & @CRLF & _
                         "Scriptline     = " & @TAB & $objCOMError.scriptline     & @CRLF & _
                         "Source         = " & @TAB & $objCOMError.source         & @CRLF & _
                         "Helpfile       = " & @TAB & $objCOMError.helpfile       & @CRLF & _
                         "Helpcontext    = " & @TAB & $objCOMError.helpcontext    & @CRLF & _
                         "Retcode        = " & @TAB & $objCOMError.retcode & @CRLF & @CRLF)
EndFunc    ;==>_COM_Error

Alles anzeigen

Gruß Musashi

Lanealine

Musashi Genau das habe ich gemeint.

Ich habe in meinem Script mehrere JSON Abfragen/Befehle. Muss ich hinter jeden den den $objCOMError abfragen ?

Bis jetzt bekomme ich immer den Error:

Kannst du damit was anfangen bzw weißt, was los ist ?

*das Script stürzt nicht ab und die JSON abfrage wird auch bearbeitet, obwohl der Error kommt.

Oder muss ich vor die Obj.send abfrage die Errorfunction einfügen und mir das ganze in eine .txt schreiben lassen, solange bis das Script crasht. Dann sollte ich doch als letztes den Error sehen, was jetzt zum Crash geführt hat ?

**Musashi**

Zitat von Lanealine

Musashi : Genau das habe ich gemeint.
Ich habe in meinem Script mehrere JSON Abfragen/Befehle. Muss ich hinter jeder/m den $objCOMError abfragen ?

Nein, der Errorhandler springt von sich aus an, wenn ein COM-Fehler auftritt.

Zitat von Lanealine

Kannst du damit was anfangen bzw weißt, was los ist ?

Sehr aussagekräftig ist die Meldung ja nicht gerade .

Dein 'Skript' ist auch nur ein Fragment ohne echte Daten - daher weiß ich auf den ersten Blick nicht "was los ist".

Hast Du es alternativ mal mit der großartigen WinHttp.au3 von trancexx versucht ? :

https://github.com/dragana-r/autoit-winhttp/releases

Gruß Musashi

Lanealine

Ich probier noch etwas mit rum, vielleicht bekommen wa ne "bessere" Errormeldung

Zitat von Musashi

Sehr aussagekräftig ist die Meldung ja nicht gerade .

Sry, habs verkackt Habe die Function ans Ende von meinem Main Whileloop eingefügt. Ich wusste nicht, dass die Function von alleine abgefragt wird.

Ich lass es jetzt mal laufen, bis das Script "richtig" crasht.

Aber nochmal zum Verständnis, ich muss die ObjEvent Function NICHT selber abfragen, sondern die wird jedesmal abgefragt sobald etwas mit einem Obj gemacht wird(ObjCreate, Obj.setrequestheader, Obj.send...) ?

Zitat von Musashi

Hast Du es alternativ mal mit der großartigen WinHttp.au3 von trancexx versucht ? :
https://github.com/dragana-r/autoit-winhttp/releases

Habe ich noch nicht getestet, kann ich damit auch Json strings senden/abfragen ?

**alpines**

Zitat von Lanealine

Aber nochmal zum Verständnis, ich muss die ObjEvent Function NICHT selber abfragen, sondern die wird jedesmal abgefragt sobald etwas mit einem Obj gemacht wird(ObjCreate, Obj.setrequestheader, Obj.send...) ?

Du kannst den ErrorHandler auch einfach leer lassen, dann läuft das Skript an nach der Stelle weiter wo es gecrasht ist. Aber er sollte auf jeden Fall vorhanden sein (also die Funktion, und die Registrierung des Event-Handlers) da ansonsten dein Skript hardcrasht.

Die Abspeicherung in eine Variable ist übrigens (glaube ich) immer noch erforderlich, da der Handler sonst nicht ordnungsgemäß funktioniert.

Also Registrieren alleine mit ObjEvent reicht nicht, der Rückgabewert von ObjEvent muss in eine Variable gespeichert werden, was bei Musashis Skript der Fall ist.

Lanealine

Habe es jetzt so gemacht:

ist das so richtig ?

Code

Func _COM_Error()
;~         MsgBox($MB_SYSTEMMODAL+$MB_ICONERROR, "AutoIt COM-Error:", _
;~                          "Ein COM-Error ist aufgetreten : " & @CRLF & @CRLF & _
;~                          "Number         = " & @TAB & hex($objCOMError.number, 8) & @CRLF & _
;~                          "Description    = " & @TAB & $objCOMError.description    & @CRLF & _
;~                          "Windescription = " & @TAB & $objCOMError.windescription & @CRLF & _
;~                          "Lastdllerror   = " & @TAB & $objCOMError.lastdllerror   & @CRLF & _
;~                          "Scriptline     = " & @TAB & $objCOMError.scriptline     & @CRLF & _
;~                          "Source         = " & @TAB & $objCOMError.source         & @CRLF & _
;~                          "Helpfile       = " & @TAB & $objCOMError.helpfile       & @CRLF & _
;~                          "Helpcontext    = " & @TAB & $objCOMError.helpcontext    & @CRLF & _
;~                          "Retcode        = " & @TAB & $objCOMError.retcode & @CRLF & @CRLF)

    FileWrite(@WorkingDir & "\Error_COM-Error - " & $ScriptNumber & ".txt", _
                         "Ein COM-Error ist aufgetreten : " & @CRLF & @CRLF & _
                         "Number         = " & @TAB & hex($objCOMError.number, 8) & @CRLF & _
                         "Description    = " & @TAB & $objCOMError.description    & @CRLF & _
                         "Windescription = " & @TAB & $objCOMError.windescription & @CRLF & _
                         "Lastdllerror   = " & @TAB & $objCOMError.lastdllerror   & @CRLF & _
                         "Scriptline     = " & @TAB & $objCOMError.scriptline     & @CRLF & _
                         "Source         = " & @TAB & $objCOMError.source         & @CRLF & _
                         "Helpfile       = " & @TAB & $objCOMError.helpfile       & @CRLF & _
                         "Helpcontext    = " & @TAB & $objCOMError.helpcontext    & @CRLF & _
                         "Retcode        = " & @TAB & $objCOMError.retcode & @CRLF & @CRLF)
EndFunc    ;==>_COM_Error

Alles anzeigen

Kann das Script jetzt nichtmehr komplett an der Obj.send Line crashen ?

**Musashi**

Zitat von Lanealine

ist das so richtig ?

Ja, Du kannst den COM-Error auch in einer Datei speichern.

Ich weiß nicht wann Du was in $ScriptNumber einträgst, ggf. wäre ein Timestamp besser, also z.B. :

FileWrite(@WorkingDir & "\Error_COM-Error - " & @YEAR & @MON & @MDAY & "_" & @HOUR & @MIN & @SEC & ".txt", _

(ein Sleep(2000) in der Funktion könnte für die Testphase dann auch nicht schaden)

Zitat von Lanealine

Kann das Script jetzt nicht mehr komplett an der Obj.send Line crashen ?

Ich möchte nicht bestätigen, dass jede Form von Crash verhindert wird, aber i.d.R. schon.

Das ist auf Dauer natürlich keine Lösung - man sollte schon versuchen den Fehler zu finden und zu beseitigen .

Gruß Musashi

**Musashi**

Zitat von Musashi

Hast Du es alternativ mal mit der großartigen WinHttp.au3 von trancexx versucht ? :
https://github.com/dragana-r/autoit-winhttp/releases

Zitat von Lanealine

Habe ich noch nicht getestet, kann ich damit auch Json strings senden/abfragen ?

Da bin ich mir ziemlich sicher !

Die WinHttp.au3 bringt eine umfangreiche Hilfedatei inkl. Beispiele mit. Schau einfach mal 'rein .

Gruß Musashi

**alpines**

JSON-Strings sind, wie du selbst sagst, auch nur Strings. Wenn du keine selbst generieren möchtest (oder verarbeiten möchtest) kannst du die einfach über die WinHttp abschicken.

Möchtest du sie jedoch elegant auslesen und schreiben, kannst du die UDF von AspirinJunkie verwenden.

Lanealine

Vielen Dank erstmal euch beiden für eure Hilfe !

Ich habe das Programm noch etwas laufen lassen und habe jetzt einen "richtigen" Errorcode bekommen.

Wisst ihr, was mir diese Fehlermeldung sagen möchte ?

Code

Ein COM-Error ist aufgetreten :

Number         = 	80020009
Description    = 	Der Download für die angegebene Ressource ist gescheitert.

Windescription = 	Ausnahmefehler aufgetreten.

Lastdllerror   = 	0
Scriptline     = 	-1
Source         = 	msxml3.dll
Helpfile       =
Helpcontext    = 	0
Retcode        = 	-2146697208

Alles anzeigen

**Musashi**

Zitat von Lanealine

Wisst ihr, was mir diese Fehlermeldung sagen möchte ?

Einfach mal googlen , z.B. :

https://www.autoitscript.com/forum/topic/71…&comment=525623 (und nachfolgende)

Gruß Musashi