[ autoit ]
Local $file = FileOpen("kw.txt", 0) ; Check if file opened for reading OK If $file = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf ; Read in lines of text until the EOF is reached While 1 Local $line = FileReadLine($file) If @error = -1 Then ExitLoop MouseClick("left", 353, 162, 1); di chuyen tro chuot vao url bar Send($line) ; dien url MouseClick("left", 996, 173, 1) ; nhan grab MouseClick("left", 686, 443, 1) ; nhan yes - max While 1 If WinExists("Grabber") Then WinActivate("Grabber") WinWaitActive("Grabber") Send("{ENTER}") ; xong grab ExitLoop Else Sleep(10000) EndIF WEnd Sleep(2000) MouseClick("left", 890, 665, 1) ; click "chon het" sleep(5000) MouseClick("left", 997, 665, 1) ; Click Grab detail While 1 If WinExists("ASIN Grabber") Then WinActivate("ASIN Grabber") WinWaitActive("ASIN Grabber") Send("{ENTER}") ; xong grab detail ExitLoop Else Sleep(10000) EndIf WEnd Sleep(2000) MouseClick("left", 366, 66, 1) ; Click Save ; [b][color=#ff0000]line 46[/color][/b] sleep(2000) Local $x = Random (1,100,1) Send ($x) ; dien ten file va save sleep(2000) MouseClick("left", 760, 612, 1) ; Click Save sleep(2000) MouseClick("left", 764, 440, 1) ; Click OK MouseClick("left", 656 60, 1) ; Clear sleep(2000) Send("{ENTER}") WEnd FileClose($file)
When I run .exe file, it said that "error in expression" line 46.
Please help me ! I don't understand why ! Thank you very much !
Sorry for my bad english !