新手不明白 获取文本后赋值
$text = WinGetText(800J平台登陆器)"MsgBox(0, "获得的文本：", $text)
获得的文本有10行我想取其中一行把值赋予ControlSend("平台登陆器版)", "", "", "?????")作为输出 请问这个该怎么写 才能输出啊 给个例子- - orz... 本帖最后由 cjmbbbbb 于 2009-7-26 03:24 编辑
10行内容你想随机发一行？？？？随机抽取我就不会了。
如果只是指定一行的话，可以这样来：
$file = FileOpen("获取的文本", 0)
$line = FileReadLine($file, "第几行")
把$line发送过去就可以了 随机抽取用Random产生一个随机行数
再用FileReadLine随即读取
给个例子：Global $file,$sn,$line,$result
HotKeySet("{F4}", "ReadLine");设立‘键盘F4’为热键
While 1
Sleep(500)
WEnd
Func ReadLine()
$file = FileOpen("test.txt", 0);打开需读取的文本
$sn=Random(1,3,1);随机抽取的行数
$line = FileReadLine($file,$sn);读取随机行数的文本
TrayTip("已转存数据", $line,0);托盘提示，可删除或换成MsgBox
FileClose($file);关闭文本
$result = FileOpen("result.txt", 1);打开需写入的文本
FileWriteLine($result,$line);在文章末尾写入之前读取的随机行数文本，并自动加回车键
FileClose($result);关闭文本
EndFunc
页:
[1]