Страница 1 из 1
Прошу помощи разобраться со скриптом...
Добавлено: Сб июл 02, 2011 02:21
scuadro
Есть скрипт. Но он почему-то меняет регистры букв в произвольном порядке. Как от этого избавится? Надо сделать так, чтобы скрипт брал название файла, создавал одноименную папку и соответственно перемещал туда этот файл. Что нужно поправить в скрипте? Я совершенно не понимаю в этом. Пытался запустить
вот этот скрипт ... ни получается. Пишет какие-то ошибки.
Мой позаимствованный скрипт...
Код: Выделить всё
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where Drive = 'D:' and Path = '\\HDTVRip Video\\Смотрел\\'")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
For Each objFile in colFiles
If Not fso.FolderExists(objFile.Path & objFile.FileName) Then
fso.CreateFolder objFile.Path & objFile.FileName
fso.MoveFile objFile.Name, objFile.Path & objFile.FileName & "\" & objFile.FileName & "." & objFile.Extension
End If
Next
Пожалуйста помогите разобраться.
Добавлено: Сб июл 02, 2011 03:29
Flasher
scuadro писал(а):Пытался запустить вот этот скрипт
Нужен
вот этот.
Добавлено: Сб июл 02, 2011 09:01
Avada
scuadro
Для сведения: на форуме принято при выкладывании скриптов или их фрагментов обрамлять текст тегами code и /code в квадратных скобках. При подготовке сообщения удобно использовать для выделенного текста кнопку Code.
Пост исправлен. Ссылка сделана рабочей. Скрипт взят в теги в демонстрационных целях.
Добавлено: Сб июл 02, 2011 10:05
scuadro
Avada писал(а):scuadro
Для сведения: на форуме принято при выкладывании скриптов или их фрагментов обрамлять текст тегами code и /code в квадратных скобках. При подготовке сообщения удобно использовать для выделенного текста кнопку Code.
Пост исправлен. Ссылка сделана рабочей. Скрипт взят в теги в демонстрационных целях.
мне форум не дал возможности сделать правильную ссылку
Добавлено спустя 41 секунду:
Flasher писал(а):scuadro писал(а):Пытался запустить вот этот скрипт
Нужен
вот этот.
спасибо, попробую.
Добавлено спустя 8 минут:
Flasher писал(а):scuadro писал(а):Пытался запустить вот этот скрипт
Нужен
вот этот.
строка 21
символ 1
Ошибка Файл ненайден
что не так?
Добавлено: Сб июл 02, 2011 10:30
Flasher
scuadro писал(а):что не так?
Параметры-то хоть указаны? Что-то сомневаюсь.
Кстати, в строке
Dim FileName, FilePath, DashInName, NewFilePath
выделенное можно удалить.
Batya при правке первого скрипта не обратил внимание на лишнюю переменную. Хотя можно вообще всю строку удалить, хуже не станет.
Добавлено: Сб июл 02, 2011 11:46
scuadro
Flasher"
В нижней строке TC я пишу имя скрипта плюс параметры... 2.vbs %L %T ... для другой панели. Правильно?
Удалил DashInName. пишет что не указаны параметры.
Добавлено: Сб июл 02, 2011 12:27
Flasher
scuadro
Сперва стоит
прочесть.
scuadro писал(а):В нижней строке TC я пишу имя скрипта плюс параметры...
В какой нижней строке?
В командной что-ли?
Вечный ликбез.
scuadro писал(а):Удалил DashInName. пишет что не указаны параметры.
Это не влияет вообще на параметры.
Добавлено: Сб июл 02, 2011 13:18
scuadro
Flasher
Прочел про ликбез. Все так и сделал. При нажатии на кнопку пишет "Не указаны параметры"
Блин...вот чайник))) Разобрался. Огромное спасибо всем за подсказки! Дело в том....что нужно было в TC выделить те файлы которые нужно в папки упаковать))) А я с чего-то решил что он автоматом текущую директорию обработает.
Тему нужно как-то закрывать? вопрос к модераторам?
Добавлено: Сб июл 02, 2011 13:55
Avada
scuadro
Никак не нужно. А вот п.16
правил форума читать нужно обязательно. А прочитав, соблюдать.
Никому не нужное полное цитирование предыдущих постов убрано выше в двух местах.
(И, кстати, по поводу ссылки в первом посте можно было не объяснять: ситуация известна, и претензий по этой части не высказывалось. Просто заодно уж я подправил и ссылку, поскольку мог это сделать.)