批处理之家 - Powered by Discuz! Board

标题: [网络连接] 【已解决】如何用批处理或者VBS自动登录得益网？ [打印本页]

作者: Batcher 时间: 2009-5-13 22:27 标题: 【已解决】如何用批处理或者VBS自动登录得益网？

得益网升级之前，可以用slore兄写的这个VBS来自动登录：

Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://www.netyi.net/quit.aspx?returnUrl=%2fjsLoginStatus.aspx"
ie.Visible = True
While ie.Busy or ie.ReadyState <> 4:Wend
ie.Document.form2.UserName.value = "pichulitest"
ie.Document.form2.Password.value = "testpichuli"
ie.Document.form2.Submit
While ie.Busy or ie.ReadyState <> 4:Wend
WSH.Sleep 1000
ie.Navigate "http://www.netyi.net/quit.aspx?returnUrl=%2fjsLoginStatus.aspx"
While ie.Busy or ie.ReadyState <> 4:Wend
ie.Quit
复制代码

得益网升级之后，这个方法就不行了。后来尝试用tireless兄介绍（http://bbs.bathome.net/viewthread.php?tid=3804#pid24104）的Mini-Browser，在Mini-Browser中可以成功登录。但是把得到的URL串放到批处理中就不行了。

start iexplore.exe "http://www.netyi.net/controls/loginFp.aspx__EVENTTARGET=&__EVENTARGUMENT=&__VIEWSTATE=%%2FwEPDwUJMzY4NjMxODYzD2QWAgIDD2QWBAIBDw9kFgIeB29uY2xpY2sFKWphdmFzY3JpcHQ6dG9wLmxvY2F0aW9uPScvUmVnaXN0ZXIuYXNweCc7ZAIDDw9kFgIfAAUvamF2YXNjcmlwdDp0b3AubG9jYXRpb249Jy9mb3JnZXRQYXNzd29yZC5hc3B4JztkGAEFHl9fQ29udHJvbHNSZXF1aXJlUG9zdEJhY2tLZXlfXxYBBQhidG5Mb2dpbg%%3D%%3D&tbMemberName=pichulitest&tbPassword=testpichuli&btnLogin.x=26&btnLogin.y=37"
复制代码

望各位朋友指点迷津，多谢！ [ 本帖最后由 Batcher 于 2009-5-17 19:52 编辑 ]

作者: slore 时间: 2009-5-17 19:31

http://www.netyi.net/controls/loginFp.aspx?__VIEWSTATE=%2FwEPDwUJMzY4NjMxODYzD2QWAgIDD2QWBAIBDw9kFgIeB29uY2xpY2sFKWphdmFzY3JpcH ... e=pichulitest&tbPassword=testpichuli&btnLogin.x=26&btnLogin.y=37

作者: Batcher 时间: 2009-5-17 19:52 标题: 回复 2楼的帖子

成功了，多谢指点！

欢迎光临批处理之家 (http://bbs.bathome.net/)