|
本帖最后由 fengfei0210 于 2011-8-25 12:06 编辑
操作内容是这样的:
打开IE,在IE地址栏中输入url(已经参数化),转入到对应页面,如果转入到unsubscribe页面,点击“yes”按钮就可以了;如果转入到preferences页面,则将3个checkbox选项去掉,然后点击保存按钮。现在的问题是:即使输入url进入到preferences页面,脚本执行的仍然是unsubscribe页面所执行的代码。求解,谢谢!
以下是脚本:
SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe","","C:\Documents and Settings\Steven","open"
Browser("Browser").Page("Page").Sync
Browser("Browser").Navigate DataTable("A", dtGlobalSheet)
If Browser("Browser").Page("Unsubscribe - OfferMe").Exist Then
Browser("Browser").Page("Unsubscribe - OfferMe").Image("yes").Click
Browser("Browser").Page("Unsubscribe - OfferMe_2").Check CheckPoint("Unsubscribe - OfferMe_2")
Browser("Browser").Page("Unsubscribe - OfferMe_2").Sync
else
If browser("Browser").Page("Preferences - OfferMe").Exist then
Browser("Browser").Page("Preferences - OfferMe").WebCheckBox("receiveMailSettings").Set "OFF"
Browser("Browser").Page("Preferences - OfferMe").WebCheckBox("receiveMailSettings_2").Set "OFF"
Browser("Browser").Page("Preferences - OfferMe").WebCheckBox("receiveMailSettings_3").Set "OFF"
Browser("Browser").Page("Preferences - OfferMe").Image("save_changes").Click 63,16
Browser("Browser").Page("Preferences - OfferMe_3").Check CheckPoint("Preferences - OfferMe_2")
Browser("Browser").Page("Preferences - OfferMe_2").Sync
end if
end if
Browser("Browser").Close |
|