AHK:Чтение txt и открытие файла из строки.

Информация несколько противоречивая. Если в "1030.xxx>0047.xxx" заменить ">" на "_", получится "1030.xxx_0047.xxx", а не "1030_0047".

teadrinker:
формат файла по умолчанию не виден. в директории он как 1030_0047( но мы то знаем что он psd)

Ymp:

Я читаю строку, заменяю, а дальше что? Изменения будут в самом txt (мне этого не нужно) Другой скрипт использует этот  txt.

Мне необходимо открыть файл, который отмечен ">" в txt

Спасибо, но видимо переоценил свои силы(
Мне не ясно, как сейчас передать этот файл программе , или контролу
Прошу прощения, если мои вопросы прям совсем ниже чайника:|

Не совсем так. Нужно

Run "путь\к\исполняемому\файлу\программы.exe" "%filename%"

Ну, мы же не знаем, привязано, или нет. Мой вариант сработает в любом случае.

Как ни странно не работает:(
Программы не открывают файла.
Происходит подгрузка как будто выполняется скрипт, и все.
Либо нужно установить директорию, в котором будет производиться поиск???

либо так

F1::
Path = D:\1.txt

Loop, Read, %Path%
{
    IfInString, A_LoopReadLine, >
    {
        StringReplace, FileName, A_LoopReadLine, >, _
        Break
    }
}

Run, %FileName%

тогда ошибка "не удаётся найти указанный файл"

либо так

F1::
Path = D:\1.txt

Loop, Read, %Path%
{
    IfInString, A_LoopReadLine, >
    {
        StringReplace, FileName, A_LoopReadLine, >, _
        Break
    }
}

Run, C:\Program Files\Adobe\Adobe Photoshop CS5 (64 Bit)\Photoshop.exe, %FileName%

тут не происходит ничего кроме активации окна ps
файл назван в txt 123>123
в директории 123_123

то же, что во втором примере. активирует ps и все

Если менять программы, тоже самое

В смысле, ничего? Пустое сообщение? Проверь правильность указания пути в переменной Path. И ещё у нас принято соблюдать большие буквы в начале и точки в конце предложений.

Так, уже лучше. Теперь будем соображать. Это мы знаем, что файл .psd. А компьютер не знает, что мы под этими цифрами имеем в виду именно файл 123_123.psd. Соответственно, к полученному тексту нужно добавить расширение:

FileName .= ".psd"

Потом, когда мы отдаём команду Run, если скрипт не находится в той же папке, где лежат эти файлы, нужно ещё указать расположение файла, который мы хотим запустить, т. е. приписать к нему путь.

StringReplace

Мне нужно из 2022.psd 123.jpg
Получить 2022_123*расширение

Сорри, засмотрелся на ">"

FileName = 2022.psd 123.jpg
StringReplace, FileName, FileName, .psd%A_Space%, _
MsgBox, %FileName%

Так всё что вам нужно это на выходе в переменой FileName иметь:

2033_234

???

Ничего не понятно...
Вы можете просто показать на примере что должно быть на выходе, вот есть текст

2022.psd 123.jpg
1112.psd 124.jpg
2033.psd>234.jpg

хочу чтоб так было:

1234
5678

serzh82saratov
Куда понятнее то?=)
Есть три цикла, которые удаляют из переменной лишние символы.
Почему три? на разные случаи жизни:)
Мне нужен один цикл который будет в себе вмещать удаление всех трех ".psd" ".jpg" ".png"
Код я уже предоставил. см. выше.
переменная FileName = 2022.psd>1112.jpg
из нее выйдет после трех циклов вот это
2022_1112

Теперь все понятно.
Спасибо всем.

Прошу прощения.

Друзья, столкнулся с очередной проблемой по этой теме.
Описанный выше код хорошо будет работать везде, кроме одной программы. (специфическая программа "Вариограф")
дело в том, что если запустить такой код, она всегда будет запускаться в новом окне программы, несмотря что открыто старое.
настроек типа "не запускать более одной копии программы" там естественно нет.

пример

Path = D:\work\Script VAR\1.txt
Loop, Read, %Path%
{
    IfInString, A_LoopReadLine, >
    {
     Stringreplace,FileName,A_LoopReadLine, >, _
     FileName := RegExReplace(FileName, ".jpg|.png.|.psd")
        Break
    }
}
FileName .=".psd"
ileName = D:\work\Script VAR\готовые\%FileName%

{ifWinExist, Вариограф ; поиск окна "vg"

{
WinActivate ; активация окна
run, C:\Program Files (x86)\Variograph 4.6.44\vg.exe, %FileName%
}

else ; или
{
Run, C:\Program Files (x86)\Variograph 4.6.44\vg.exe ; запуск vg
WinWait, C:\Program Files (x86)\Variograph 4.6.44\vg.exe; ожидание появления окна "vg"
WinActivate ; активация окна

  }
}

Код будет работать везде, где из текстовой переменной нужно получить нужное.

Здесь вообще неясно что вы делаете. Если окно есть вы его зачем-то активируете зная что запустится другая копия. И что совсем не ясно если окна нет то просто запуск без параметра (файла)???

{ifWinExist, Вариограф ; поиск окна "vg"

{
WinActivate ; активация окна
run, C:\Program Files (x86)\Variograph 4.6.44\vg.exe, %FileName%
}

else ; или
{
Run, C:\Program Files (x86)\Variograph 4.6.44\vg.exe ; запуск vg
WinWait, C:\Program Files (x86)\Variograph 4.6.44\vg.exe; ожидание появления окна "vg"
WinActivate ; активация окна

  }
}

Процесс не закрывается, появляется снова в новом.

при запущенной программе этот код что в сообщении пишет, 0 или 4-х знач. число?

Process, Exist, vg.exe
MsgBox %ErrorLevel%

Программа открывает файлы либо через окно, либо перетащи и брось

Pulover's Macro Creator выдал такое
к примеру вот его ahk_id 0x970b28 (того окна, где производится выбор файлов)
в окне выдал control: SysListView321

Самое интересное, что если на файле кликнуть два раза, он не откроется, а сначала появится в правой части окна. И только после этого его можно открыть.

У меня еще была идея использовать drag and drop.

вместо MsgBox %ErrorLevel% напиши
WinClose, ahk_pid %ErrorLevel% или WinKill, ahk_pid %ErrorLevel%
должно закрывать

Если drag and drop есть значит можно с помощью SendMessage реализовать.
Тут старшие товарищи нужны, самому интересно, поищу.

Только, мне не это нужно
Проблема не в том что открывается 100500 окон, а в том, что в первом стоят настройки, как мне нужно.
Новое окно - новые уствновки
+тратится время на открытие программы, это не быстро

А способ помог, да. старое закрыл новое открыл

Пробовал так=)
Еще кстати один трабл.
Если вписать имя, его не открыть таким образом.
Только тупым тыком на файле 2 раза

title у него:
Выбор исходных изображений
ahk_class #32770

главное окно, - это "Вариограф"

Значит сейчас это невозможно

Главное окно

>>>>>>>>>>( Window Title & Class )<<<<<<<<<<<
Вариограф
ahk_class Afx:00410000:8:00010003:00000000:048809A5

>>>>>>>>>>>>( Mouse Position )<<<<<<<<<<<<<
On Screen:    1034, 31  (less often used)
In Active Window:    1038, 7

Окно открытия файла

>>>>>>>>>>( Window Title & Class )<<<<<<<<<<<
Выбор исходных изображений
ahk_class #32770

>>>>>>>>>>>>( Mouse Position )<<<<<<<<<<<<<
On Screen:    960, 333  (less often used)
In Active Window:    391, 13

Окно ввода текста

>>>>>>>>>>( Window Title & Class )<<<<<<<<<<<
Выбор исходных изображений
ahk_class #32770

>>>>>>>>>>>>( Mouse Position )<<<<<<<<<<<<<
On Screen:    829, 680  (less often used)
In Active Window:    260, 360

>>>>>>>>>( Now Under Mouse Cursor )<<<<<<<<
ClassNN:    Edit1
Text:    

Да, папка постоянна

Вводить безуспешно. По-всякому

открыть окно  ^N

адрес папки
D:\work\Script VAR\готовые\

Это как на китайском=)

Видимо в неправильно сформированной структуре dropFiles.
Процедура, приведенная выше, срисована кажется из кода teadrinker'а.

Граждане, а зачем вы полностью цитируете предыдущее сообщение?

creature.ws

Да кто нас знает, места много

вот тут маленькая поправочка не получиться всегда обращаться к классу. Он всегда меняется, когда программа открывается в другом окне
DropFiles( "D:\work\Script VAR\готовые\" FileName ".psd", "ahk_class Afx:00410000:8:00010003:00000000:048809A5" )

сейчас вот он стал Вариограф
ahk_class Afx:00410000:8:00010003:00000000:0E8D0AA3

ТОВАРИЩИ! СВЕРШИЛОСЬ

Не знаю как Вас благодарить, всех, кто мне помог!)

Спасибо!

Всецело поддерживаю замечание.

Столкнулся с похожей проблемой, необходимо каждую секунду проверять текстовый документ на наличие цифр (1,3,7,9) , если не найдено то запомнить текущую строку для последующего поиска со следующей строки (искать только в новом тексте) если найдено, то gosub, xxx(1,3,7,9)

FileSelectFile, SelectedFile, 3, log,Открыть файл, Текстовые файлы (*.txt)
if SelectedFile =
    MsgBox, Лог файл не найден.
else
Loop, Read, %SelectedFile%
{
    IfInString, A_LoopReadLine, 1
    {
gosub, xxx1
        Break
    }
}
return

xxx1:
SendInput, 1
return

После активации метки "ххх1" в лог будет записано "1", при следующей проверке скрипт должен пропустить эту строку