Q: Как заставить Тотал понимать DOS-кодировку имен файлов? На нашем главном ftp провайдера кто-то умный сделал DOS-кодировку имен файлов... A: Только поменяв шрифт файловых панелей, но тогда русские имена на твоих дисках окажутся нечитаемыми. Сейчас нет возможности использовать разные кодировки для FTP и локальных дисков...
Константин Власов
A: '==================================================================== ' Изменение шрифта файловых панелей TC ' ' В параметрах вызова из TC должно быть в кавычках указано имя шрифта '====================================================================
Dim TCS Set TCS = CreateObject("TCScript.Helper")
NewFont = WScript.Arguments(0)
TCS.SendCommand(492) TCS.SendKeystroke "{TAB} " & NewFont & "{ENTER}" TCS.SendKeystroke "+{TAB}{ENTER}" Сохрани в файле *.vbs, повесь файл на кнопку, в параметрах кнопки в кавычках укажи имя шрифта. В скрипте используется TCWSHelp.
