Страница 2 из 42
Добавлено: Чт авг 24, 2006 11:21
D1P
Batya писал(а):fa1con
Странно. У меня даже в сети все нормально передается.
Может кто-нибудь из специалистов по сетям скажет, почему такое может быть?
http://tckb.mega-byte.info/content/view/568/27/
Эту траблу (перекодировку кириллических имён в кракозябрические) при работе со скриптами встречал неоднократно. При переключении раскладки - всё путём.
Добавлено: Чт авг 24, 2006 11:54
Batya
У меня соответствующий ключ в реестре изменен с незапамятных времен.
Однако, я думаю, что здесь другой случай, т.к. обычно проблемы возникают с функцией SendKeys, а здесь она не используется.
Вообщем, обращение к
fa1con - есть ли разница при смене кодировки и если изменить ключ реестра, как указано по ссылке?
Добавлено: Чт авг 24, 2006 15:18
Volniy
fa1con писал(а):Именно так: имя ресурса «рисунки» как «@8AC=:8», а каталог кириллицей нормально.
«@8AC=:8» это неверный перевод в ANSI-строку кириллической Unicode строки "рисунки" ( 0x40043804410443043D043A043804) как Latine Unicode, тоесть так как будто бы это изначально было 0x40003800410043003D003A003800. Известный глюк XP, заметный при копировании кириллицы через буфер обмена.
Добавлено: Чт авг 24, 2006 15:31
funduk
Этот глюк что, только и заключается в том, что 04 считается как 00?
Добавлено: Чт авг 24, 2006 15:39
CaptainFlint
funduk писал(а):Этот глюк что, только и заключается в том, что 04 считается как 00?
Я
тут достаточно подробно описал, в чём состоит глюк.

Добавлено: Чт авг 24, 2006 17:53
fa1con
Ничего не меняется ни при переключении раскладки, ни при изменении кодовой страницы. Но заметил одну интересную вещь: если писать
cd \\ip\
выдает
\\10.0.255.26\@8AC=:8\Рисунки\WAR\01.jpg
а если
cd \\compname\
-
\\compname\ 8AC=:8\Рисунки\WAR\01.jpg
2Batja
Можешь переделать скрипт так, что б обои выбирались также с учётом подкаталогов в случаи, если файл берётся из MyPictures. Если не трудно.
Помогите, нужен скрипт
Добавлено: Вт авг 29, 2006 18:21
StasK
Нужен скрипт для копирования всех файлов из одной определенной папки в другую, с учетом времени создания файла, т.е. если дата создания файла меньше указанной, то копируем.
Обрабатывать нужно и вложенные папки тоже.
спасибо !
Добавлено: Вт авг 29, 2006 18:32
Batya
StasK
А чем не устраивает сначала воспользоваться поиском с учетом даты, а потом найденные скопировать?
Добавлено: Вт авг 29, 2006 18:36
StasK
не устраивает то, что файлов на ~9Гб (размер одного файла ~100 КБ) и вложенных папок около 300 шт. Делать это ручками не радует

Добавлено: Вт авг 29, 2006 18:42
Batya
StasK
Не понял. Что делать ручками?
Alt+F7 -> Закладка "Дополнительно" -> "Не старше" или "Дата между" ... -> Начать поиск -> Файлы на панель -> Num * -> F5
Добавлено: Вт авг 29, 2006 18:49
StasK
спасибо, но хотелось бы просто запустить скрипт и забыть

Добавлено: Вт авг 29, 2006 18:51
Batya
StasK
Ты можешь создать соответвствующий шаблон.
Используй его и забудь

Добавлено: Вт авг 29, 2006 18:53
StasK
спасибо, так и сделаю !
Добавлено: Ср авг 30, 2006 16:26
Zorroz
При сохранении html странички Firefox’ом получается например: Сталин И.В. биография.htm и Сталин И.В. биография_files. Нужно при выделении файла html и нажатии кнопки на панели инструментов копировать/переместить и файл и папку. Такое возможно сделать с помощью скрипта?
Добавлено: Чт авг 31, 2006 11:53
Batya
Zorroz писал(а):Такое возможно сделать с помощью скрипта?
Легко:
Код: Выделить всё
'==========================================================================
' Копирование выделенных файлов с соответствующими им (для *.html) папками
'
' Параметры вызова из TC:
' %L "%T"
'==========================================================================
Dim FSO, Fld, OTF, Rln
Set FSO = CreateObject("Scripting.FileSystemObject")
Set OTF = FSO.OpenTextFile(WScript.Arguments(0), 1)
Do While Not OTF.AtEndOfStream
Rln = OTF.ReadLine
If FSO.FileExists(Rln) Then
FSO.CopyFile Rln, WScript.Arguments(1)
Fld = FSO.GetBaseName(Rln) & "_files"
If FSO.FolderExists(Fld) Then
FSO.CopyFolder Fld, WScript.Arguments(1)
End If
ElseIf FSO.FolderExists(Rln) Then
FSO.CopyFolder Rln, WScript.Arguments(1)
End If
Loop
Set OTF = Nothing
Set FSO = Nothing
WScript.Quit
Но это можно сделать и с помощью TC. Для этого надо установить способ копирования проводником.
Кстати, может по этому поводу кто-нибудь запостит реквест Гислеру - сделать отдельную команду (типа cm_Copy) для копирования проводником (чтобы не переключать при необходимости режимы копирования)?