Редактирование файлов (вырезать, вставить, массово)
Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
Одно окно то работает, но после ввода текста для замены выскакивает другое - с ошибкой
Код: Выделить всё
Сценарий: F:\total\Utils\html\zamema_po_sablonu2.vbs
Строка: 30
Символ: 1
Ошибка: Несоответствие типа: '[string: "C:\DOCUME~1\xxx\LOCA"]'
Код: 800A000D
Источник: Ошибка выполнения Microsoft VBScript
Второй это какой? у меня сейчас верхняя часть скрипта выглядит ну а дальше все как в оригинале у Batya.
Код: Выделить всё
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 Ну а кнопка - выглядит так
Код: Выделить всё
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\html\zamema_po_sablonu2.vbs
0 %L "filelist.txt"
C:\WINDOWS\System32\WScript.exe
zamema_po_sablonu2
-1
shveicar
Ну, так а параметр со строкой шаблона где?
Ну, так а параметр со строкой шаблона где?
Последний раз редактировалось Flasher Пт июл 22, 2011 18:55, всего редактировалось 1 раз.
То-есть так?
Код: Выделить всё
%%FromFileArr%% 0 %L "filelist.txt"В соответствии с примером в кнопке, приведённой Batya.
Код: Выделить всё
"<META HTTP-EQUIV='Refresh' CONTENT='0; URL=%%FromFileArr%%'>" 0 %L "filelist.txt"Интересно, - у меня с такими параметрами скрипт заработал, а вот с такими смысла нет, поскольку тег замены совсем другой ( если кратко) до срабатыванияflvpla1/player.swf и послеvideos/1008_m1/player.swf
Синим выделенна строка до срабатывания скрипта.
Красным выделена строка в файле списке filelist.txt, после срабатывания скрипта. Впрочем главное все работает, и самое главное, что в каждом файле, все совпадения меняются только на одно значение, из одной строки. Остается лишь правильно настроить список в filelist.txt Позже, проверю как будет работать с длинными строками. Спасибо за помощь.
Код: Выделить всё
%%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="Код: Выделить всё
" rel="nofollow">Flash Player</a>Код: Выделить всё
<div id="player_bg"><p id="player">Get The <a href="Код: Выделить всё
" rel="nofollow">Flash Player</a>Красным выделена строка в файле списке filelist.txt, после срабатывания скрипта. Впрочем главное все работает, и самое главное, что в каждом файле, все совпадения меняются только на одно значение, из одной строки. Остается лишь правильно настроить список в filelist.txt Позже, проверю как будет работать с длинными строками. Спасибо за помощь.