|
请大家帮忙,下面是代码
SystemUtil.CloseProcessByName "iexplore.exe"
Dim Uname_desc,Password_desc,browsDesc,pageDesc
SystemUtil.Run "iexplore.exe"
Set Uname_desc = Description.Create()
Set Password_desc = Description.Create()
Set browsDesc = description.create()
Set pageDesc = description.create()
Uname_desc("RegularExpression").Value=False
Password_desc("RegularExpression").Value=False
Uname_desc("name").value = "loginPageView1$ctl00$txtHandle"
Uname_desc("html tag").value = "INPUT"
Uname_desc("id").value="loginPageView1_ctl00_txtHandle"
Uname_desc("type").value="text"
Password_desc("name").value = "loginPageView1$ctl00$txtPassword"
Password_desc("html tag").value = "INPUT"
Password_desc("id").value="loginPageView1_ctl00_txtPassword"
Password_desc("type").value="password"
Set curPage = Browser(browsDesc).Page(pageDesc)
curPage.Sync
Browser(browsDesc).Navigate ("http://cn.match.com/login/login.aspx")
curPage.Sync
curPage.WebEdit(Uname_desc).Set "mmtest02"
curPage.WebEdit(Password_desc).Set "password"
curPage.image("name:=続ける").Click
运行到此处就会报错Browser(browsDesc).Page(pageDesc).WebEdit(Uname_desc).Set "mmtest02",接下来
curPage.WebEdit(Password_desc).Set "password"
curPage.image("name:=続ける").Click
都会报错“Cannot identify the object "[ WebEdit ]" (of class WebEdit). Verify that this object's properties match an object currently displayed in your application” |
|