Classic ASP Microsoft.XMLHTTP onreadystatechange

Question

Ich versuche, einen asynchronen Aufruf mit einer Rückruffunktion im klassischen ASP zu machen. Dies ist mein Code:

Set objHTTP = CreateObject("Microsoft.XMLHTTP") 
With objHTTP 
    .open "POST", base_url_crm & "contacts", True, login_crm, key_crm 
    .setRequestHeader "Content-Type", "application/json" 
    .setRequestHeader "Accept", "application/json" 
    .onreadystatechange = Check_state 
    .send json 
End with 

Set objHTTP = Nothing 

Public Function Check_state 
    if objHTTP.ReadyState = 4 then 
     Response.Write "Finish" 
    end if 
End Function 

Sein diesen Fehler zurück:

Type mismatch: 'onreadystatechange' 

Wie kann ich die Check_state Funktion direkt nach dem Asynchron-Anruf beendet ausführen? Es muss async sein (lass meine Benutzer nicht warten) und kann dies nicht in Javascript tun.

Answer 1

Sie können keine Ereignisse an Funktionen binden, wie Sie es in JavaScript tun, da die einfache Übergabe des Namens der Funktion sie sofort zurückgibt, ihre Ausgabe zurückgibt und diese stattdessen zugewiesen wird. Verwenden Sie die GetRef Funktion Ereignisse zu binden, etwa so:

Set objHTTP = CreateObject("Microsoft.XMLHTTP") 
objHTTP.onreadystatechange = GetRef("Check_state") 

See here Dokumentation über GetRef.

Answer 2

Versuchen Sie, den Status statt onreadystatechange verwendet, gibt es Werte wie 200, 404 und 500.