View Single Post
  #28 (permalink)  
Old 09-03-2010, 03:51 PM
directorfw directorfw is offline
Junior Member
 
Join Date: Sep 2008
Posts: 16
Default Erel!

Quote:
Originally Posted by Erel View Post
I'm using a simple php file that prints the POST variables.
Code:
Sub Globals

End Sub

Sub App_Start
    Form1.Show
End Sub

Sub Button1_Click
    request.New1(
"http://www.basic4ppc.com/print.php")
    request.Method = 
"POST"
    Request.ContentType = 
"application/x-www-form-urlencoded"
    stream.New1(Request.GetStream,
True
    name = 
"First=Erel&Last=Uziel"
    stream.WriteBytes(stream.StringToBytes(name))
    response.New1
    request.GetAsyncResponse
End Sub

Sub request_Response
    
If request.ResponseCode = 200 Then
        response.Value = request.AsyncResponse
        response.GetAsyncString
    
Else
        
Msgbox(request.ErrorMessage)
    
End If
End Sub

Sub response_Stream
    TextBox1.Text = response.AsyncString
End Sub

could you show your php code? please?
Reply With Quote