Серый форум — AHK: отправка сообщений из txt построчно

Re: AHK: отправка сообщений из txt построчно

null@example.com (belyankin12) — Thu, 09 May 2019 16:16:33 +0000

Вы вытащите горячую клавишу за пределы цикла. Она и останавливает ваш скрипт.

Re: AHK: отправка сообщений из txt построчно

null@example.com (inseption86) — Thu, 09 May 2019 13:56:35 +0000

rossmad3

1::
Loop
{
    FileReadLine, line, D:\text.txt, %A_Index%
     if ErrorLevel
	{
		MsgBox, 4160, , Готово!
        ExitApp
	}
	FileAppend, %line% `n, %A_ScriptFullPath%
    sleep, 100
}


2::Pause
return


Esc::
{
ExitApp
}

Re: AHK: отправка сообщений из txt построчно

null@example.com (rossmad3) — Thu, 09 May 2019 13:16:52 +0000

belyankin12
Подредактировал код. Скрипт запускается, но отправляется только первая строка текста. И всё

1::
Loop
{
    FileReadLine, a, D:\text.txt, %A_Index%
     if ErrorLevel
        ExitApp
	Click
    Send %a% {enter}	
    sleep, 3000
2::Pause
}
return

Re: AHK: отправка сообщений из txt построчно

null@example.com (belyankin12) — Thu, 09 May 2019 12:19:29 +0000

Вы почитайте внимательно про команду FileReadLine в справке. Она имеет параметр, который указывает на имя переменной, в которой будет хранится прочитанный текст. Кроме того, в вашем примере скрипт будет бесконечно читать первую строчку (переменная A_Index в помощь). А ещё советую добавить условие if ErrorLevel, ибо цикл не будет останавливаться, если дойдет до конца документа.

AHK: отправка сообщений из txt построчно

null@example.com (rossmad3) — Thu, 09 May 2019 12:06:57 +0000

Появилась необходимость в скрипте выполняет построчное печатание текста из .txt файла. То есть, каждую строку этого файла по очереди печатает или отправляет через SendInput нажимая ЛКМ после каждой отправки. Выглядить должно примерно так по хронологии
Запуск > Щелчок > отправка первой строки блокнота {enter} > Щелчок > отправка второй строки {enter} и так до конца текстового документа.

Но столкнулся с некоторыми проблемами, не понимаю как обозначить в строке SendInput что необходимо печатать.
И с тем, что при запуске выходит ошибка с чтением нужного блокнота:

1::
Loop
{
    FileReadLine, D:\text.txt, 1
    Click
    SendInput {enter}	
    sleep, 3000
}
return
2::Pause