kegiaumat055

Thank you very much ! It worked

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 !

Sorry, It is easy to fix an error $sens = StringSplit($text,".",1) ----> $sens = StringSplit($text,". ",1) Thank you very much !

Great ! Thanks But it has a space in the top lines. For Example: Sentence1. Sentence2. Sentence3. Sentence4. Sentence5. Sentence6. Sentence7. Sentence8. Sentence9. Sentence10. Sentence11. Sentence12. Sentence13. Sentence14. Sentence15.

How to add link breaks with random (between 3 to 6) sentences in a paragraph? What should I do ? For example: input.txt Output.txt

Great ! It worked. Thank you very very much

Yes, it was not intentional. My english isn't good.I copied your code into excel, then I copy to AutoIt editor. If I copy your code directly into AutoIt editor, it will only have one line.

You can see an error in my attach file. Can you fix it for me, please ?

It has an error. Please fix it !

I wanna add link breaks to random sentences ? You can see my example. Sorry, my english isn't good !

This is code to click button in IE but I don't know how to click a button in firefox ? #include $oIE = _IECreate("http://www.autoitscript.com") $sMyString = "Contact";Your link text $oLinks = _IELinkGetCollection($oIE) For $oLink in $oLinks $sLinkText = _IEPropertyGet($oLink, "innerText") If StringInStr($sLinkText, $sMyString) Then _IEAction($oLink, "click") ExitLoop EndIf Next Can you help me, please ?

#include<String.au3> $open= FileOpen('input.txt', 128) If @error Then Exit $update=FileOpen('output.txt',128+8+1) If @error Then Exit $text=FileRead($open) $split = StringSplit($text,".") if @error then Exit $sens=StringSplit($text,".",1) for $i=1 to $sens[0] FileWrite($update, $sens[$i] & ".") If mod($i,random(2,3,1)) == 1 Then FileWrite($update, @CRLF) Next FileClose($update) FileClose($open) What is wrong ? It show an error :"Next statement with no matching for statement"

#include <string.au3> #include <array.au3> $open= FileOpen('input.txt', 128) If @error Then Exit $update=FileOpen('output.txt',128+8+1) If @error Then Exit $text=FileReadline($open) $random = random(1, 10) $split = StringSplit($text,".") if @error then Exit Can you help me write the rest, please ?

How to add link breaks with random sentences in a paragraph? Example: Sentence1. Sentence2. Sentence3. Sentence4. Sentence5. Sentence6. Sentence7 ---> result: Please help me !

$instance = random(1,100) ControlClick("program", "", '[CLASS:WindowsForms; INSTANCE:' & $instance & ']' , "left") Great ! Thank you very much !