Inet1.Execute strURL, "POST", strFormData, "Content-Type: application/x-www-form-urlencoded"
------------------------------------------------------------------------------------------------
Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then Text4.Text = Inet1.GetChunk(8824, icString)
End Sub
--------------------------------------------------------------------------------------------------