大家来帮忙查看脚本哪出错了

千与千寻KOKO

这个一个登录界面，我的想法是：看输入框中是否输入了用户名admin和密码123456.abcd.如果输入正确才能成功登录，下面我把我的脚本给大家看看，看问题是出在哪了：
action1的脚本：
systemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE", "http://10.136.32.172:8080/platforms"
Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员名称").Set "admin"
Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员密码").Set "123456.abcd"
login_name=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员名称").GetROProperty("value")
login_password=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员密码").GetROProperty("value")

DataTable.Value("Runtime_data","Global")=login_name
DateTable.Value("Runtime_data","Global")=login_password
Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").Image("登录按钮").Click
RunAction "Action2", oneIteration
action2的脚本：
login_name=DataTable.Value("Runtime_data","Global")
login_password=DataTable.Value("Runtime_data1","Global")
CheckValue=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员名称").GetROProperty("value")
CheckValue=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员密码").GetROProperty("value")
If  CheckValue=login_name and CheckValue=login_password  Then
msgbox "登陆成功"
else
msgbox "登录失败"
End If

lujian2036

这一句
CheckValue=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员名称").GetROProperty("value")
CheckValue=Browser("中海油电子文档加密及权限控制系统").Page("中海油电子文档加密及权限控制系统").WebEdit("管理员密码").GetROProperty("value")
为何都赋值给CheckValue变量，是不是造成密码内容又覆盖了用户名
2： CheckValue=login_name and CheckValue=login_password  这个比较不对，这样是赋值了
3：取密码的操作，这个密码如果是用的那种密码对话框，应该是不能直接读出内容的吧。

千与千寻KOKO

回复 2# lujian2036


    嗯，我知道了，谢谢您的帮助