简单的vbs自动登录

Set iee = CreateObject("InternetExplorer.Application")iee.Navigate "http://mail.sunupcg.cn:81/default.asp"iee.Visible = TrueWScript.Sleep 1000iee.Document.f1.usernameshow.value="aa@sunupcg.com"iee.Document.f1.pwshow.value ="123456"Set sh=WScript.CreateObject("WScript.Shell")sh.SendKeys "{Enter}"