click button to go into the web site but not certain where to star
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? |
All times are GMT +1. The time now is 02:03 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com