August 30, 2008 04:32am pdt

Member Login

Hall of Fame

Yearly

1RobSamp... 15,364
2zorvek 11,300
3saurabh726 9,950
4rorya 9,500
5byundt 8,500
6purplepo... 6,375
7GrahamSkan 6,000
8robberbaron 4,500
9capricorn1 4,000
9irudyk 4,000
11patrickab 3,750
12mlmcc 3,250
13geodan7 3,164
14emoreau 3,000
14sirbounty 3,000
14TZych 3,000
14TRobinJa... 3,000
18ssaqibh 2,575
19danaseaman 2,500
19weellio 2,500
21TheLearn... 2,000
21spattewar 2,000
21boag2000 2,000
21andrewne... 2,000
21Idle_Mind 2,000
21jaime_oliv... 2,000
21SysExpert 2,000
21wsh2 2,000
21brettdj 2,000
21JurgenDB 2,000
21UnknwnErr 2,000
21jppinto 2,000
21jindalankush 2,000
21LennyGray 2,000
21epaclm 2,000
21TimCottee 2,000
21Thejaka 2,000
21ee_rlee 2,000
21Merch_Ops 2,000
21nds_rahu... 2,000
21MonkeyPu... 2,000
21Rick_Wri... 2,000
21graye 2,000
21rettiseert 2,000
21jpaulino 2,000
21dj88 2,000
21hippohood 2,000
21Rick_Ric... 2,000
21RedKelvin 2,000
21TName 2,000

	[x] Attachment Details

Auto Fill Form and Auto Submit - Should be repeated in a FOR LOOP

Zones: Visual Basic v1.0.5.x, Visual Basic Programming, VB Controls

Tags: Microsoft, Webbrowser, Visual Basic 6 - Internet Explorer 5 or 6, Auto Fill Form and Auto Submit - Iterate using FOR LOOP

Hi Experts

I am trying to write a Auto Form Fill and Submit application using visual basic 6. I need to get the data to be submited by running a for loop. ie.. to iterate and submit new form data everytime. The form has only 2 fields that has to be filled. I am done with the filling part and also the submit part.

The problem i face is that, I am unable to repeat the process using the FOR LOOP. ie., Even before the first submit is done, the loop finishes.

Do you experts need any further details, to assist me with this. Please look at the snippet code (psuedo). Do assume that i have added a WebBrowser control to the form and a Command Button.

Thanks in advance.

         
           
             1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

           
           
             'Webbrowser control
Dim F1 As String
Dim F2 As String
Dim S As String
 
Private Sub Command1_Click()
''' this is just an example of what i am trying to achieve.
 
    For Each A in B
       F1=A.Name
       F2=A.Path & S
       WebBrowser1.Navigate "http://www.SomeUrl.Com"
       While WebBrowser1.Busy
            DoEvents
       Wend
    Next
End Sub
 
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
 
        WebBrowser1.Document.Forms("FormName").elements("FieldName").Value = F1
        WebBrowser1.Document.Forms("FormName").elements("FieldName2").Value = F2
        WebBrowser1.Document.Forms("FormName").Submit
        While WebBrowser1.Busy
            Doevents
        Wend
        WebBrowser1.Navigate "http://www.TheSameSomeUrl.Com"
End Sub

           
         

Start your free trial to view this solution

[x]

The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

The Grade of the Solution
The Zone Rank of the Expert Providing the Solution
The Number of Author and Expert Comments
The Number of Experts Contributing
The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!

8.2

Question Stats

Zone: Programming

Question Asked By: sktsmd

Solution Provided By: GrahamSkan

Participating Experts: 1

Solution Grade: A

Translate:

Loading Advertisement...

20080723-EE-VQP-34 / EE_QW_2_20070628