class Login
Function login(Sheet_Name)
SystemUtil.Run "iexplore.exe",DataTable("URL",Sheet_Name),"","open","3"
Set browsDesc = description.create()
Set pageDesc = description.create()
Set curPage = Browser(browsDesc).Page(pageDesc)
curPage.Sync
'输入用户名,登陆系统 curPage.WebEdit("html id:=ctl00_content_password").Set DataTable("密码",Sheet_Name)
curPage.WebEdit("name:=ctl00$content$password").Set DataTable("密码",Sheet_Name)