Question

按键精灵的问题，怎么加入鼠标点击下载动作？我要实现打开网站后鼠标点击下载，然后下载

Call Plugin.Web.Bind("wqm.exe")
path = "D:\5.txt" '要逐行读取的文件的路径，自己修改
fileHandle = Plugin.File.OpenFile(path)
While 1
fileline=Plugin.File.ReadLine(fileHandle)
If fileline <> "" Then
URL = "http://www.jandown.com/link.php?ref=" & fileline
Call Plugin.Web.Go(URL)
Delay 100000 '100秒间隔
Else
Call Plugin.Web.TabClose()
MessageBox "文档逐行读取并搜索完毕！"
Call Plugin.File.CloseFile(fileHandle)
EndScript
End If
Wend

Answer 1

在Delay 100000 '100秒间隔后面加上
MoveTo X, Y
LeftClick 1
X Y的坐标自己用“抓抓”获取

追问

谢谢你，现在可以下载了，但运行过程中会卡死，卡死后又要从新开始，有什么方法可以在读取path = "D:\5.txt" 的时候，读取一条后就删除一条，这样卡死后就不要重头开始，我只要接着再运行就可以

追答

加上代码
Call lib.文件.删除指定行文本内容("d:/5.txt",1)