Código:
Private Sub Command1_Click()
With WebBrowser1
.Visible = True
Do While .Busy = True: DoEvents: Loop
.Document.Form1.login.Value = "miuser"
.Document.Form1.password.Value = "mipass"
.Document.Form1.botonlogin.Click
End With
End Sub
|
|||
|
Tema destacado: Security Series.XSS. [Cross Site Scripting] |
|
|