Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Automate WebSite
Message
From
26/02/2004 12:14:32
 
 
To
26/02/2004 11:36:27
Marcus Hüneke
Heidelberger Druckmaschinen
Wiesloch, Germany
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00881118
Message ID:
00881144
Views:
27
Grüß Gott,

try the following:
oIE = CREATEOBJECT("InternetExplorer.Application")
oIE.Visible = .t.
oIE.Navigate("www.myOrderPageLogin.com") && See HTML Site below

* *** wait untill the explorer is finished loading the page
#DEFINE READYSTATE_COMPLETE 4
DO WHILE oIE.Readystate <> READYSTATE_COMPLETE
	WAIT WIND TIME 1.0 ""
ENDDO

oIE.document.forms(1).BAPI1007-CUSTOMER.value = "MyUserName"
oIE.document.forms(1).BAPIUID-PASSWORD.value = "MyPassWord"
now, forms(1) only works of course if the user name and password are in the first form on that website.

hope this helps.



>Hello,
>
>i want to automate an intranet page, which is used by our customers to order spare parts.
>First problem is to login automatically
>So I use:
>
>oIE = CREATEOBJECT("InternetExplorer.Application")
>oIE.Visible = .t.
>oIE.Navigate("myOrderPageLogin") && See HTML Site below
>
>But now my Problem:
>
>How can I fill the two input fields Customer and Password.
>
>Everything I tried faild. Always get an error
>Also downloaded the VFP example to login into the universalthead site.
>But the code does not work
>
>I'm using VFP6.0
>
>Any help is appreciated.
>
>
>Thanks in advance
>
>Marcus
>
>Sorry don't know how to send the whole HTML Code here (What is a
 TAG?)
>
>These are the names of the input fields
>name="BAPI1007-CUSTOMER"
>name="BAPIUID-PASSWORD"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform