Копирование текста из буфера в файл

[prokazzza]

Доброго времени суток. Помогите дописать скрипт. Захват текста идет через Send("^c"). Не получается отослать текст в файл, без его переписи. Сам скрипт:

#RequireAdmin
#include <IE.au3>

$oIE = _IECreate('about:blank') ; Открывает браузер
WinSetState("[CLASS:IEFrame]", "", @SW_MAXIMIZE)
$hURL = FileOpen('link.txt', 0); Файл со ссылками

While 1
    $sLine = FileReadLine($hURL)
    If @error = -1 Then ExitLoop
    _IENavigate($oIE, $sLine)
	Sleep (3000)

	  $oSpans = $oIE.document.getElementsByTagName("a")
	  If IsObj($oSpans) Then
		 For $oSpan In $oSpans
			If $oSpan.className <> "text" Then ContinueLoop
	  			Sleep (2000)
			$oSpan.click()
		 Next
	  EndIf
		 Sleep (2000)
	  Send("{HOME}")
		 Sleep (2000)
	  Send("{TAB 21}")
		 Sleep (2000)
	  Send("^c")
		 Sleep (2000)
;~ 	  @ScriptDir & "\log.txt"
	  Send("{TAB 21}")
		 Sleep (2000)
	  Send("^c")
		 Sleep (2000)
;~ 	  @ScriptDir & "\log.txt"
WEnd

FileClose($hURL)

 

[InnI]

prokazzza

отослать текст в файл, без его переписи

FileWrite("test.txt", ClipGet())

 

[prokazzza]

InnI спасибо, но можно ли сделать, чтобы каждая надпись вносилась на новую строку, а не вставлялось в одну строчку?

 

[Cornet]

вместо FileWrite использовать FileWriteLine

FileWriteLine("test.txt", ClipGet())

 

[InnI]

Или так

FileWrite("test.txt", ClipGet() & @CRLF)

 

[prokazzza]

Спасибо, подскажите, а есть ли более надежная альтернатива:

("^c")

?

 

[InnI]

prokazzza

альтернатива

"^{ins}"

 

[prokazzza]

Спасибо!