DOCUMENT:Q174923  10-OCT-1997  [vbwin]
TITLE   :HOWTO: Use the PostData Parameter in WebBrowser Control
PRODUCT :Microsoft Visual Basic for Windows
PROD/VER:WINDOWS:1.0,4.0,5.0
OPER/SYS:NT Win95 WINDOWS
KEYWORDS:VB4ALL VB4WIN vb5all vb5howto AXSDK

======================================================================
---------------------------------------------------------------------
The information in this article applies to:

 - Microsoft Visual Basic Control Creation and Enterprise Editions for
   Windows, version 5.0
 - Microsoft Visual Basic Enterprise Edition, 16-bit and 32-bit, for
   Windows, version 4.0
 - Microsoft ActiveX SDK, version 1.0
   on the following platforms: NT, Win95, x86
 - Internet Client SDK, version 4.0
---------------------------------------------------------------------

SUMMARY
=======

The WebBrowser control has a Navigate method with PostData as a parameter.
This allows the user to post data to the specified URL with the WebBrowser
control.

MORE INFORMATION
================

Navigate specifications:

   Navigates to the resource identified by a Universal Resource Locator
   (URL), or to the file identified by a full path.

Syntax:

   object.Navigate URL [Flags,] [TargetFrameName,] [PostData,] [Headers]

PostData Optional:

Data to send to the server during the HTTP POST transaction. For example,
the POST transaction is used to send data gathered by an HTML form. If this
parameter does not specify any post data, the Navigate method issues an
HTTP GET transaction. This parameter is ignored if URL is not an HTTP URL.

NOTE: The post data specified by PostData is passed as a SAFEARRAY
structure. The variant should be of type VT_ARRAY and point to a SAFEARRAY.
The SAFEARRAY should be of element type VT_UI1, dimension one, and have an
element count equal to the number of bytes of post data.

Sample to PostData to URL server
---------------------------------

1. Start Visual Basic. If Visual Basic is already running, choose New
   Project from the File menu (ALT, F, N). Form1 is created by default.

2. Add a WebBrowser control (WebBrowser1) to Form1.

3. Add a CommandButton (Command1) to Form1.

4. Add the following code to the Command1_Click event of Form1:

      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://YourServer" ' A URL that will accept a POST
         Flags = 0
         TargetFrame = ""

         PostData = "Information sent to host"

         ' VB creates a Unicode string by default so we need to
         ' convert it back to Single byte character set.
         PostData = StrConv(PostData, vbFromUnicode)

         Headers = ""

         WebBrowser1.Navigate URL, Flags, TargetFrame, PostData, Headers
      End Sub

5. Press the F5 key to run the program and the information in the PostData
   variable will be sent to the server specified in the URL parameter.

Additional query words: POST Navigate
======================================================================
Keywords          : VB4ALL VB4WIN vb5all vb5howto AXSDK
Technology        : internet kbinetdev
Version           : WINDOWS:1.0,4.0,5.0
Platform          : NT Win95 WINDOWS
Hardware          : x86
Issue type        : kbhowto

=============================================================================

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS
PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND.  MICROSOFT DISCLAIMS
ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES
OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  IN NO
EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR
ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL,
CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF
MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.  SOME STATES DO NOT ALLOW THE EXCLUSION
OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES
SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 1997.