/ Published in: Visual Basic
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
Sub Command1_Click() Dim URL As String Dim Flags As Long Dim TargetFrame As String Dim PostData() As Byte Dim Headers As String URL = "http://tuservidor" ' una url que acepte HTTP PoST Flags = 0 TargetFrame = "" PostData = "Información que se enviara al host" PostData = StrConv(PostData, vbFromUnicode) Headers = "Content-Type: application/x-www-form-urlencoded" & _ vbCrlf WebBrowser1.Navigate URL, Flags, TargetFrame, PostData, Headers End Sub