Batya

|
Posted: Mon Jul 14, 2008 11:00 Post subject: |
|
|
Tol!k wrote: | команда for ... do ren ... (и прямо на кнопке, и в скрипте вызываемом с кнопки) дает это:
Access violation at address 00407275. Read of address 00000000. |
Вряд ли такая ошибка выдается на команды ДОС. Скорее всего (у меня так было) глючит надстройка на оболочку.
У тебя в свойствах папок\файлов (Alt+Enter) дополнительных (не дефолтных) закладок нет?
LocKtaR-o-DarK
Мне кажется, что использовать одновременно и vbs, и batch не очень красиво. Перепиши чтение списка файлов на vbs через
Code: | For Each F In Split(CreateObject("Scripting.FileSystemObject").OpenTextFile(WScript.Arguments(0), 1).ReadAll, vbNewLine) |
Tol!k
Предлагаю еще один способ решения задачи.
Для этого понадобятся Script Helper и Script Content Plugin.
Для Script Content Plugin добавляем в скрипте возрат еще одной колонки (например, Result1):
Code: | '============================
' Колонка Result1 будет возвращать текстовое содержимое буфера обмена
'============================
content1 = Result1
Function Result1
On Error Resume Next
Result1 = CreateObject("TCScript.Helper").GetTextFromClip
If Err.Number <> 0 Then
Result1 = ""
End If
On Error GoTo 0
End Function |
Соответственно, теперь в TC выделяешь файлы\папки, выполняешь команду группового переименования (Ctrl+M) и в поле "Маска для имени файла" по своему усмотрению используешь тэг "[=script.Result1]". _________________ Нет, я не сплю. Я просто медленно моргаю. |
|