About Us

chrisho

hi,

I am trying to use excel VB to log into the company intranet. I manage to
put my username and password to the required boxes but I don't know where to
find the button value in order to send a button command.

here is the source

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.0//EN"
<HTML<HEAD
<TITLEInternet Administration System - Login</TITLE</HEAD
<BODY BGCOLOR=#FDBD49
<FORM METHOD=POST ACTION="http://XXXX.XXXX.XXX/xxx/xxx"
<INPUT TYPE=HIDDEN NAME=scr VALUE="login.cgi"
<CENTER
<P<BR<P
<BBefore you can access this function, you will need to login</B
<P
<BOperator ID:</B
<INPUT TYPE="TEXT" NAME="SEC_username" Size=10 VALUE=""
<P
<BPassword:</B
<INPUT TYPE="PASSWORD" NAME="SEC_password" Size=10 VALUE=""

<P<BR<P
<INPUT TYPE="HIDDEN" NAME="scriptname" VALUE="/cgi-bin/ias.cgi"
<INPUT TYPE="HIDDEN" NAME="parameters" VALUE="scr=menu_main%2ecgi"
<INPUT TYPE="HIDDEN" NAME="SEC_usertype" VALUE="operator"

<INPUT TYPE="SUBMIT" VALUE="LOGIN"
<INPUT TYPE="RESET" VALUE="Clear"
</CENTER

here is my script.

Sub navigatecsweb()

Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.navigate "http://XXXX.XXXX.XXX/xxx/xxx"

Do While IE.Busy And Not IE.readyState = 4:
Application.Wait (Now + TimeValue("0:00:02"))
DoEvents
Loop

IE.document.all("SEC_username").Value = "XXXX"
IE.document.all("SEC_password").Value = "xxxxx"
Set ipf = IE.document.all.Item("cmd")
ipf.Click

End Sub

what have i done wrong?

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How Can I Click an un-name IE button via VBA	angsoka	Excel Programming	3	July 24th 06 03:56 AM
[Click the star to watch this topic] finding 1st populated cell on a vector with va	name	Excel Discussion (Misc queries)	2	July 19th 06 12:10 AM
Create floating button based on button click in menu	ExcelMonkey	Excel Programming	2	October 12th 05 06:43 PM
VBA button click need help. Need LEN help.	Nigel Cummins	Excel Programming	4	July 11th 03 08:52 PM
VBA button click need help. Need LEN help.	Nigel Cummins	Excel Programming	0	July 11th 03 09:53 AM

Menu

About Us