VB inicia sesión automáticamente en la página web sin utilizar el control del navegador web. El inicio de sesión es el navegador predeterminado del sistema....
Hace algún tiempo, Dongdong, que estaba trabajando en Taobao, publicó un método para iniciar sesión en Taobao usando IE
Option Explicit
Sub GotoTaoBao(uid As String, pwd As String) p>
Con CreateObject(" InternetExplorer.Application")
.Visible = True
.Navigate "/auction/view_personal_sale_item.jhtml?view_type=viewsold"
Hacer Hasta .ReadyState = 4
DoEvents
Bucle
.Document.Forms(0).All("TPL_username").Value = uid
.Document.Forms(0).All("TPL_password").Valor = pwd
.Document.Forms(0).All("Enviar").Clic
Terminar con
End Sub
Subcomando privado1_ Click()
GotoTaoBao "youID", "youPwd"
Fin Sub
A diferencia de utilizar CreateObject, debe consultar Microsoft Internet Controls (shdocvw.dll)
y luego declarar el objeto InternetExplorer.