Private Sub AxWinsock1_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles AxWinsock1.DataArrival Dim GetRequete As String Call AxWinsock1.GetData(GetRequete) TextBox6.Text = GetRequete End Sub
Private Sub AxWinsock1_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles AxWinsock1.DataArrival Dim GetRequete As String GetRequete = "" Call AxWinsock1.GetData(GetRequete) TextBox6.Text = GetRequete End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question