VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: sammy	Datum: 16.08.2006 15:54:00	Views: 1209	Rating:	Antwort:
Thema: Aw:Aw:http-verbindung
tach rasta, nicht ganz. ich wollte per http eine verbindung aufbauen und dann verschiedene parameter übergeben. ich bin jetzt soweit, dass zumindest erstmal die http-verbindung hinbekomme. jetzt klemmt es bloß noch an dem POST bzw. GET. habe gelesen, dass Object.ResponseInfo eine meldung zurückgibt und man auf den string "erfolgreich" prüfen kann. #das ist der dazugehörende code Private Sub Command1_Click() Dim q As String Dim antwort As String Dim strUrl As String q = "hallo" strUrl = "www.google.de" With Inet1 .Execute strUrl, "GET " & q Call Warte_auf_Antwort antwort = .ResponseInfo If InStr(antwort, "erfolgreich") Then MsgBox "alles gut" Else MsgBox "Fehler" End If End With End Sub

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen