|
我把脚本放上,大家帮忙分析一下,小弟也是才入门没多久(一共两个action分别叫做1和2):
补充:2是Reuseable action
1:
Browser("Browser").Dialog("选择数字证书").WinListView("您要查看的网站要求标识。请选择证书。").Select "RAAdmin"
Browser("Browser").Dialog("选择数字证书").WinButton("确定").Click
Dialog("正在用您的专用交换密钥签名数据").Click 119,214
Dialog("正在用您的专用交换密钥签名数据").WinButton("确定").Click
Browser("Browser").Dialog("安全警报").WinButton("是(Y)").Click
Browser("Browser").Page("JIT SRQ05 RAServer 5.0").Frame("leftFrame").Link("证书管理").Click
Browser("Browser").Page("JIT SRQ05 RAServer 5.0").Frame("leftFrame").Link("证书申请").Click
For i=1 to 5
RunAction "2", oneIteration
Next
2:
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("leftFrame").Link("录入").Click
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame").WebList("ctmlName").Select "双证书模板"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebEdit("dnInput").Set DataTable("p_cn", dtLocalSheet)
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebEdit("username").Set "1"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebEdit("usercontactaddr").Set "1"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebEdit("org").Set "1"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebEdit("useridcardnum").Set "1"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_2").WebButton("提交申请").Click
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_3").WebRadioGroup("radiobutton").Select "#2"
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_3").WebButton("下一步").Click
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Frame("mainFrame_4").WebButton("提交").Click
Dialog("潜在的脚本冲突").WinButton("是(Y)").Click
Dialog("正在创建新的 RSA 签名密钥").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Dialog("IDAENR~1").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Sync
Dialog("正在导入新的专用交换密钥").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Dialog("VBScript").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
Dialog("潜在的脚本冲突").WinButton("是(Y)").Click
Browser("JIT SRQ05 RAServer 5.0").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
Browser("JIT SRQ05 RAServer 5.0").Page("JIT SRQ05 RAServer 5.0").Sync
在执行的时候,第一次是去取的第一个参数,再一次循环时还是取第一个参数,是我哪设置有问题,还是这么做根本就不对,谢谢各位了,小弟不胜感激!!!
[ 本帖最后由 sophia778 于 2006-11-29 15:15 编辑 ] |
|