Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: Thobs am Januar 25, 2017, 23:34:51 Nachmittag

Titel: http-Request in ein ein If-statement einfügen.
Beitrag von: Thobs am Januar 25, 2017, 23:34:51 Nachmittag

Hallo zusammen,

ich würde gerne folgendes http-Request in ein ein If-statement einfügen.

Function httpRequestVacation(url As String, maId As String, startDate As String, endDate As String) As String
Dim request As Object
Set request = CreateObject("WinHttp.WinHttpRequest.5.1")
request.SetTimeouts 1000, 1000, 1000, 1000
request.Open "GET", url & "? ma=" & maId & "&start=" & startDate & "&end=" & endDate
request.Send
httpRequestVacation = request.ResponseText
End Function

Und zwar als Folge, also
If … Then
http-request

Kann ich das http-Request direkt in das If-statement einfügen, und wenn ja, wie? Oder wie kann ich es sonst einbauen?

Vielen Dank für eure Hilfe!

Titel: Antw: http-Request in ein ein If-statement einfügen.
Beitrag von: maninweb am Januar 26, 2017, 12:11:36 Nachmittag

Hallo,

httpRequestVacation ist eine Funktion, die Du aufrufen kannst, wenn Du der Funktion die entsprechenden Parameter
übergibst. Ein Beispiel, wie Du per If etwas abfragst und dann die Funktion aufrufen möchtest.

Code: Visual Basic

1. Sub Test()
2.  
3.   Dim strRequest As String
4.  
5.   If Wert_1 = Wert_2 Then
6.  
7.     strRequest = httpRequestVacation(DeineURL, DeineMaID, DeinStartDate, DeinEndDate)
8.    
9.     MsgBox strRequest
10.    
11.   End If
12.  
13. End Sub

Wert_1, Wert_2, DeineURL usw. sind z.B. Variablen, die Du füllen musst. Möchtest Du den httpRequestVacation selbst
in die If-Abfrage einbauen, ginge das z.B. so...

Code: Visual Basic

1. Sub Test()
2.  
3.   Dim strRequest As String
4.  
5.   strRequest = httpRequestVacation(DeineURL, DeineMaID, DeinStartDate, DeinEndDate)
6.  
7.   If strRequest = "EinText" Then
8.  
9.       MsgBox "Hallo"
10.  
11.   End If
12.  
13. End Sub

Gruß