- ////////////////////////////////////////////////////
- //登录 我的淘宝,然后执行该工具即可
- //注意 IE设置里头需要将在新标签中打开连接 钩选上
- ////////////////////////////////////////////////////
- 调用插件命令 web.Bind("WQM.exe")
- 调用插件命令 Web.SetSize(1024,800)
- 延时500毫秒
- //点击我的淘宝页面中的"给买家评价"
- 调用插件命令 Web.HtmlClick("tag:A&txt:给买家评价")
- //开始评价
- 如果表达式 (true) 为真,则循环执行
- 调用子程序 beginpj
- 延时100毫秒
- 循环结束
- 脚本停止运行
- //评价主函数 因为怕网络延时的问题,给的Delay比较大,呵呵
- 子程序 beginpj
- 延时2000毫秒
- //点击评价,评价有两种位置
- 调用插件命令 web.LeftClick(935,399)
- 延时200毫秒
- 调用插件命令 web.LeftClick(935,418)
- 延时2500毫秒
- //点击好评
- 调用插件命令 web.LeftClick(598,458)
- 延时1000毫秒
- //点击确定提交
- 调用插件命令 Web.HtmlClick("tag:BUTTON&value:确认提交")
- 延时2000毫秒
- //因为设置了在新标签打开连接,所以必须将此标签关闭掉
- 调用插件命令 Web.CloseTab()
- 延时1000毫秒
- //强制刷新评价页面
- 调用插件命令 Web.Refresh(1)
- 延时1000毫秒
- 子程序结束,回到调用处