Problem with Web Browser Control - Fill in a form

**rancor** · Jan 25th, 2000, 01:59 AM

Hi.

I need some help with the Web Browser Control. You see. I want WB to fill in a form and then "POST" it like if you did it manually.

As you can see in the example below I want my program to fill in the "username" and "password" and then POST the information.

Can you please help me??? I'm desperate..

Best regards Johan Ryberg, SWEDEN

Example htmlpage:

Code:

&lt;HTML&gt;
&lt;HEAD&gt;
&lt;SCRIPT&gt;
&lt;!--
	function newPane(fls_host) {
		pageUrl = "http://" + fls_host + "/serviceSelection.php3";
		window.open(pageUrl,"selection",'toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=300,height=300');
	}
//--&gt;
&lt;/SCRIPT&gt;

&lt;SCRIPT&gt;
&lt;!---
var isButtonPressed = false;

function flsSubmit() { 
     if (isButtonPressed == false) { 
	  isButtonPressed = true;
	  document.pwdenter.submit(); 
	  } 
}
//--&gt;
&lt;/SCRIPT&gt;

	  


    &lt;FORM NAME="pwdenter" ACTION="userlookup.php3" METHOD="POST"&gt;
	  &lt;INPUT NAME="timestamp" TYPE=HIDDEN VALUE="948816493"&gt;
      &lt;TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" WIDTH="100%" HEIGHT="100%"&gt;
        &lt;TR&gt;&lt;TD&gt;
	    &lt;CENTER&gt;
	      &lt;TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0"&gt;
		&lt;TR&gt;&lt;TD&gt;
		    &lt;IMG SRC="telialogo.gif" ALT="logo" BORDER="0"&gt;
		    
		    &lt;FONT SIZE="-1" FACE="Geneva, Arial"&gt;
		      &lt;BR&gt;&lt;BR&gt;
		      		      Mata in ditt anv&auml;ndarnamn och l&ouml;senord nedan.&lt;BR&gt;
		      Tryck sedan p&aring; "Logga in".
		      &lt;BR&gt;&lt;BR&gt;
		      Användarnamn:
		      &lt;BR&gt;&lt;INPUT NAME="username"&gt;&lt;BR&gt;
		      Lösenord:
		      &lt;BR&gt;&lt;INPUT NAME="password" TYPE=PASSWORD onBlur="this.form.username.focus();"&gt;
		      &lt;BR&gt;
        &lt;INPUT TYPE="BUTTON" NAME="submitForm" VALUE="Logga in " onClick="flsSubmit() "&gt;
	      &lt;/TABLE&gt;
      &lt;/TABLE&gt;
    &lt;/FORM&gt;
    
&lt;/body&gt;
&lt;/HTML&gt;

------------------
Best Regards rancor
[email protected]
http://www.sajberhem.nu

**ChrisJackson** · Jan 25th, 2000, 02:16 AM

Hi Johan,

I believe that I can help you with this. Can you give me the URL of the web page that you want to fill in?

If so, I'll create the code to do this for you.

All the best.

Chris

**ChrisJackson** · Jan 25th, 2000, 03:28 AM

Hi Johan,

Create a new VB project with a WebBrowser Control and 2 command buttons.

Paste this code into the VB Editor:

Code:

Option Explicit

Dim mICount As Integer
Private Sub Command1_Click()
    mICount = 0
    WebBrowser1.Navigate2 "www.hotmail.com"
End Sub

Private Sub Command2_Click()
    Unload Me
    End
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    If pDisp Is WebBrowser1.Object Then
        If mICount = 0 Then
            SendKeys "Hi Johan"
            SendKeys "{TAB 2}"
            SendKeys "password"
            SendKeys "{ENTER}"
            mICount = 1
        End If
    End If
End Sub

This will fill in the Hotmail Web Page and attempt to log you in. You should easily be able to modify the code to fit the Web Page you want to interact with. Let me know if you have any problems.

All the best.

Chris

Thread: Problem with Web Browser Control - Fill in a form

Thread Tools

Display

Posting Permissions