Omdat de querystring die ik moet versturen erg lang kan zijn stuur ik vanuit een vb applicatie via POST variabelen mee, echter ik krijg op de 1 of andere manier een lege reactie terug. Als ik het via .OpenURL probeer werkt het perfect, maar met POST wil het maar niet vlotten. ziet iemand de fout?
Het vb deel is alsvolgt:
Het oppikken van het antwoord:
Op de server draait dit php(test) script:
Ik krijg het woord "gegevens:" wel terug maar de vars niet.
Zie ik iets over het hoofd?
Het vb deel is alsvolgt:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| blaat = "?user_id=1111&data=7329984690198" StuurNaarServer (blaat) '----------------------------------------------------------------------- Private Sub StuurNaarServer(ByVal strFormData As String) Dim strURL As String On Error Resume Next strURL = "http://www.website/test.php" Inet1.Execute strURL, "POST", strFormData End Sub |
Het oppikken van het antwoord:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Select Case State Case icResponseCompleted ' 12 Do DoEvents ' strBuffer = Inet1.GetChunk(1024) strArrivedData = strArrivedData & strBuffer ' Loop Until Len(strBuffer = 0) blabla = strArrivedData lblStatus.Caption = "De server heeft de volgende gegevens ontvangen:" & blabla End Select |
Op de server draait dit php(test) script:
code:
1
2
3
4
5
6
| <?php echo stripslashes("gegevens:"); echo stripslashes($user_id); echo stripslashes($data); ?> |
Ik krijg het woord "gegevens:" wel terug maar de vars niet.
Zie ik iets over het hoofd?