VB 制作网页自动登入账号密码

2026年09月10日 20:12

有2个网友回答

网友（1）：

一个WebBrowser1控件就够了

Private Sub Form_Load()
WebBrowser1.Navigate "http://apple.rabitdog.com:8080/apple.html" '打开网站
End Sub

Private Sub Command1_Click()
WebBrowser1.Document.Forms(0).All("login_name").Value = "03729喾芮" '帐号赋值
WebBrowser1.Document.Forms(0).All("login_password").Value = "qq11qq" '密码赋值
WebBrowser1.Document.getElementById("login_button").Click '模拟点击登录按钮
End Sub

网友（2）：

网站打不开啊