Total Commander

Как заменить в файле TAB пути к вкладкам, на некую переменную. В гугле ищу, пока безрезультатно.
Задача такая. Сохраняем вкладки в tab, получается что-то вроде

Код: Выделить всё

0_path=f:\My doc\Projects\PROJECTNAME\folder01\
1_path=f:\My doc\Projects\PROJECTNAME\folder02\
2_path=f:\My doc\Projects\PROJECTNAME\folder03\
...

Я кладу файл tab в папку PROJECTNAME, и по щелчку на нём у меня открываются несколько вкладок из этой папки.
В следующем PROJECTNAME_2 мне надо копировать файл tab, но заменить в нём PROJECTNAME на PROJECTNAME_2.
Так вот, можно ли не заменять вручную, а вместо PROJECTNAME_1-... написать какую то переменную, которая заменяла бы его на текущий каталог, т.к. файл находиться в этой PROJECTNAME.
Ищу эту переменную в гугле, %CD% не работает.

Ну и уж совсем в идеале, как можно создать такой файл tab в текущем катлоге по щелчку мыши.
Спасибо заранее.

Не поздновато ли объяснять, что такие вещи общих вопросов не касаются?

Код: Выделить всё

' Параметры: "<путь к файлу-исходнику>" <строка поиска>
' Путь запуска - пустой
Dim WSH : Set WSH = CreateObject("WScript.Shell")
CD = WSH.CurrentDirectory : Set A = WScript.Arguments
With CreateObject("Scripting.FileSystemObject")
  If CD = .GetParentFolderName(A(0)) Then WScript.Quit
  NF = CD & "\" & .GetFileName(A(0)) : .OpenTextFile(NF, 2, True)._
  Write Replace(.OpenTextFile(A(0)).ReadAll, "\" & A(1) & "\", "\" & .GetFileName(CD) & "\")
End With : WSH.Run """%COMMANDER_EXE%"" /O /S /L=""" & NF & """"

alexfmos
Замечание за оффтоп. Тема перенесена в Автоматизацию.

Flasher
Извините, но я совершенно не понимаю что мне с этим делать, и как это относится к моему вопросу.

alexfmos
Что с этим делать, рассказывалось множество раз. В том числе в теме, чтение которой в этом подфоруме вообще-то обязательно.
А оверквотинг на форуме запрещён. Ненужные излишества из предыдущего поста удалены.

Я понимаю как запускать скртипты, я не понимаю как этот скрипт работает, и как мне применить его к своему случаю. Что мне нужно сделать чтобы открывались нужные вкладки.
Ладно видимо это всё очень сложно. Я не программист и ничего в этом не смыслю. Извините.

alexfmos
Знаете, я тоже не программист. Но всё-таки предполагаю, что до выяснения, что и как применять, следовало прочитать ту самую памятку, создать файл со скриптом и (хотя бы в первом приближении, без параметров) соответствующую кнопку. Это сделано? Если да, очевидно, последуют какие-то конструктивные рекомендации.

Кнопка сделана, при запуске выскакивает виндовый диалог с какой помощью открыть программу. Файл с каким расширением надо сохранить?

UPD: Предположил что VBS, тогда при запуске выскакивает ошибка Индекс выходит за пределы допустимого диапазона

alexfmos
Разумеется, VBS (обычно этот тут предполагается по умолчанию, в противном случае оговаривается). Сообщайте подробности об ошибке (Ctrl+C на окне, здесь вставить как код) и дальше с Flasher совместными усилиями разбирайтесь с параметрами и прочим, я в это влезать не буду.

Код: Выделить всё

Сценарий:	D:\temp\1.vbs
Строка:	6
Символ:	3
Ошибка:	Индекс выходит за пределы допустимого диапазона
Код:	800A0009
Источник: 	Ошибка выполнения Microsoft VBScript

Я правильно понимаю, что в параметре кнопки надо написать путь к файлу tab или как?

alexfmos
Avada привёл ссылку. Там всё подробно описано, что и как. Параметров сколько в шапке указано?

Я же написал, что выполнил это, при запуске скрипта вываливается ошибка, сообщением выше. Можно в двух словах описать что делать? Копирую скрипт, сохраняю как VBS, создаю кнопку, в параметрах вроде как путь к файлу tab. Что дальше? Где должен лежать сам скрипт? Что он должен вообще сделать?

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

alwexfmos писал(а):"создать такой файл tab в [s]текуще[/s]активном каталоге по щелчку мыши".

Еще раз.

Сценарий: F:\My doc\Projects\Cafe_Randr\1.vbs
Строка: 7
Символ: 40
Ошибка: Ввод данных за пределами файла
Код: 800A003E
Источник: Ошибка выполнения Microsoft VBScript

Параметр - путь к tab в кавычках
TC 7.55
win 64

C:\Windows\SYSTEM32\wscript.exe
on Microsoft Windows Vista, Workstation version 6.7601

Что еще я могу сказать?

См. п. 5 и 7. Внимательно! Где строка поиска?

Total Commander

Как заменить в файле TAB пути ...

Как заменить в файле TAB пути ...