Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для kaster

Старожил


Сообщения: 367
Благодарности: 91

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
$sPath = 'd:\1.txt';<--- Путь до текстового файла с числами
$sSep = '@TAB';<--- Разделитель, раскоментировать/дописать нужный, закоментировать остальные
;$sSep = ' '
;$sSep = ';'
;$sSep = ','
$sAppPath = 'c:\1.exe';<--- Путь до программы для запуска с ключами
$hFile = FileOpen($sPath, 0);<--- Открываем файл для чтения
$iIND = 1;<--- Индикатор выхода из цикла
While $iIND <> -1;<--- Цикл
    $sLine = FileReadLine($hFile);<--- Считываем файл строка за строкой
    $iIND = @error;<--- Проверяем не конец ли файла
    $aLine = StringSplit($sLine, $sSep);<--- Разделяем строку разделителем
    If $aLine[0] = 1 Then;<--- Проверка на наличие второго числа (отсутствие)
        $iParam1 = $aLine[1];<--- Первый параметр
        $iParam2 = 1;<--- Второй параметр
    Else;<--- Проверка на наличие второго числа (присутствие)
        $iParam1 = $aLine[1];<--- Первый параметр
        $iParam2 = $aLine[2];<--- Второй параметр
    EndIf
    RunWait(@ComSpec & ' /c "' & $sAppPath & '" ' & $iParam1 & ' ' & $iParam2);<--- Запуск программы с ключами.
WEnd
Честно говоря не понял про вторую часть.

-------
Русское сообщество пользователей AutoIt
autoit@conference.jabber.ru - Конференция на jabber.ru

Это сообщение посчитали полезным следующие участники:

Отправлено: 20:56, 10-09-2009 | #2