Microsoft
Software
Hardware
Network
Question : click on login
How do i click on 'Log In' in the below example
Private WithEvents HDoc As HTMLDocument
Private WithEvents IE As InternetExplorer
Private Sub Command1_Click()
Dim inp As Object
Set inp = IE.document.All.Item("logi
nbean.user
id")
inp.Value = "me" 'replace with your id
Set inp = IE.document.All.Item("logi
nbean.pass
word")
inp.Value = "mypassword" 'replace with your password
' > Set inp = IE.document.All.Item("logi
n")
' > inp.Click
End Sub
Private Sub IE_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If (pDisp Is IE) Then
Text1.Text = URL
If UCase$(URL) = "
https://www.campusship.up
s.com/logi
n
" Then
Set HDoc = IE.document
End If
End If
End Sub
Private Sub Form_Load()
Set IE = New InternetExplorer ' Creates new Internet Explorer Instance
If Not IE Is Nothing Then
Command1.Enabled = True
With IE
.navigate "
https://www.campusship.up
s.com/logi
n
"
.Visible = True
End With
End If
End Sub
Answer : click on login
Okay I found what your previous post is refering about its hidden towards the bottom. It's the wrong id so change the last line to this and it should work. See code section
1: 2:
' login button ie.Document.getElementById("login").Click
Random Solutions
how to add decimal place in formula in seagate crystal report
Meta redirect question
VB6 to VS2010 - Training Advice ?
sendAndLoad onHTTPStatus issue
Any ideas how to create your own loadbalancer using linux?
Cisco ASA Logging Connections Increase
Shell script to queue commands
average value of a function
BootExecute in Startup - Windows XP
Delete blank line from textarea