Страница 5 из 5

Добавлено: Чт июл 21, 2011 23:03
Flasher
shveicar
Для одного окна поправил. Работает?

Добавлено: Пт июл 22, 2011 01:06
shveicar
Одно окно то работает, но после ввода текста для замены выскакивает другое - с ошибкой

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

Сценарий:	F:\total\Utils\html\zamema_po_sablonu2.vbs
Строка:	30
Символ:	1
Ошибка:	Несоответствие типа: '[string: "C:\DOCUME~1\xxx\LOCA"]'
Код:	800A000D
Источник: 	Ошибка выполнения Microsoft VBScript

Добавлено: Пт июл 22, 2011 01:34
Flasher
shveicar
Исходный второй параметр вернул в качестве первого?

Добавлено: Пт июл 22, 2011 03:00
shveicar
Второй это какой? у меня сейчас верхняя часть скрипта выглядит

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

Option Explicit
Dim FSO, WSH, F, FF, Mode, Str1, Str2, Errors, i, FZ, ArrZ
Set FSO    = CreateObject("Scripting.FileSystemObject")
Set WSH    = CreateObject("WScript.Shell")
Set Errors = CreateObject("Scripting.Dictionary")
Str1 = InputBox("Введите искомую строку:", "Замена текста в файлах с помощью шаблонов")
With WScript
  Str2 = .Arguments(0)
  Mode = .Arguments(1)
  FF   = .Arguments(2)
  If .Arguments.Count > 3 Then FZ = .Arguments(3)
End With 
ну а дальше все как в оригинале у Batya.

Добавлено: Пт июл 22, 2011 03:15
Flasher
Я про параметры в кнопке.

Добавлено: Пт июл 22, 2011 11:08
shveicar
Ну а кнопка - выглядит так

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

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\html\zamema_po_sablonu2.vbs
0 %L "filelist.txt"
C:\WINDOWS\System32\WScript.exe
zamema_po_sablonu2


-1

Добавлено: Пт июл 22, 2011 16:10
Flasher
shveicar
Ну, так а параметр со строкой шаблона где?

Добавлено: Пт июл 22, 2011 16:43
shveicar
То-есть так?

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

%%FromFileArr%% 0 %L "filelist.txt"

Добавлено: Пт июл 22, 2011 16:45
Flasher
В соответствии с примером в кнопке, приведённой Batya.

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

"<META HTTP-EQUIV='Refresh' CONTENT='0; URL=%%FromFileArr%%'>" 0 %L "filelist.txt"

Добавлено: Пт июл 22, 2011 17:28
shveicar
Интересно, - у меня с такими параметрами скрипт заработал

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

%%FromFileArr%% 0 %L "filelist.txt"
, а вот с такими

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

"<META HTTP-EQUIV='Refresh' CONTENT='0; URL=%%FromFileArr%%'>" 0 %L "filelist.txt"
смысла нет, поскольку тег замены совсем другой ( если кратко) до срабатывания

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

<div id="player_bg"><p id="player">Get The <a href="
flvpla1/player.swf

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

" rel="nofollow">Flash Player</a>
и после

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

<div id="player_bg"><p id="player">Get The <a href="
videos/1008_m1/player.swf

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

" rel="nofollow">Flash Player</a>
Синим выделенна строка до срабатывания скрипта.
Красным выделена строка в файле списке filelist.txt, после срабатывания скрипта. Впрочем главное все работает, и самое главное, что в каждом файле, все совпадения меняются только на одно значение, из одной строки. Остается лишь правильно настроить список в filelist.txt Позже, проверю как будет работать с длинными строками. Спасибо за помощь.