
CODE: [Copy to clipboard][ Last edited by HAT on 2008-10-13 at 17:42 ]set wshshell=CreateObject("wscript.shell")
AppName="sina邮箱"
Set ie = CreateObject("internetexplorer.application")
ie.visible=True
ie.navigate "http://mail.sina.com/"
While ie.busy Or ie.readystate <> 4
Wscript.Sleep 1000
wend
Wscript.Sleep 1000
ie.Document.free.u.value="sfjsfjs"
'e.myform.pass.value="123456"
ie.Document.free.psw.value="123456"
Wscript.Sleep 1000
ie.document.form.submit
| Quote: | |
|

| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |