|
9#
楼主 |
发表于 2008-1-16 16:14:19
|
只看该作者
等了这么久终于有人回复了!谢谢各位同行!
我现在已经决定换机器了....(的确无奈之举,IE7是用一个windows升级补丁包装上的,怎么也卸载不干净......无法还原成IE6,而试过其他的浏览器也没用)。
第一:低模式我试过了,没问题,但那样没有任何意义了,脚本基本无法加工,录制后生成的代码过于简单。。。。。。。。。。。。。。。。。。。。。。。。。。。
第二: 'Browser NewPage,"HTMLTitle=项目规划管理;Index=0","" 这行代码我已经注释掉了,回放时依然报错。。。。。
第三:在我机器(IE7)和别人的机器(IE6)录制一个同样的简单添加操作,生成的代码基本是一样的,我附在下面,请大家多指教!
'说明:IE7录制生成的脚本:
Sub Main
Dim Result As Integer
Window SetContext, "Caption=天津市电力公司项目管理信息系统 - Windows Internet Explorer", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=treeview;\;Type=HTMLFrame;HTMLId=main",""
'Browser NewPage,"HTMLTitle=项目规划管理;Index=0",""
PushButton Click, "Type=PushButton;Name=Button1"
Browser NewPage,"HTMLTitle=项目规划;Index=0",""
EditBox Click, "Type=EditBox;Name=TextBox1", "Coords=68,13"
InputKeys "1"
EditBox Click, "Type=EditBox;Name=TextBox2", "Coords=99,135"
InputKeys "1"
PushButton Click, "Type=PushButton;Name=Button2"
Window SetContext, "Caption=Windows Internet Explorer", ""
PushButton Click, "Text=确定"
End Sub
'说明:IE6录制生成的脚本
Sub Main
Dim Result As Integer
Window SetContext, "Caption=天津市电力公司项目管理信息系统 - Microsoft Internet Explorer", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=treeview;\;Type=HTMLFrame;HTMLId=main",""
Browser NewPage,"HTMLTitle=项目规划管理;Index=0",""
PushButton Click, "Type=PushButton;Name=Button1"
Browser NewPage,"HTMLTitle=项目规划;Index=0",""
EditBox Click, "Type=EditBox;Name=TextBox1", "Coords=18,12"
InputKeys "c"
EditBox Click, "Type=EditBox;Name=TextBox2", "Coords=56,59"
InputKeys "c"
PushButton Click, "Type=PushButton;Name=Button2"
Window SetContext, "Caption=Microsoft Internet Explorer", ""
PushButton Click, "Text=确定"
End Sub |
|