Страница 22 из 27
Добавлено: Вс ноя 27, 2011 14:16
Volniy
Насчет не
read-only свойств и сам пару раз лажался. Например, был уверен, что даты файла из FSO можно только прочитать, а оказалось-то - нет
Flasher писал(а):На два - ты хотел сказать.
Я же не об этой конкретной строке. Дело в том, что если посмотреть на VBS скрипты тут, на форуме, то можно увидеть еще и более многоэтажные конструкции.
PS Вот сейчас припомнил случай, когда такие нагромождения не работали с 5-ой версии скриптов, а после установки 5.6 они уже заработали. Так что еще зависит и от реализации конкретной версии WSH.
Добавлено: Вс ноя 27, 2011 14:47
Flasher
Volniy писал(а):Например, был уверен, что даты файла из FSO можно только прочитать, а оказалось-то - нет
Мануалы устаревшие, получается.
Volniy писал(а):Дело в том, что если посмотреть на VBS скрипты тут, на форуме, то можно увидеть еще и более многоэтажные конструкции.
Что ты под ними понимаешь?
Кстати, "Set N = FSO.GetFile(F)" не помогает. Всё равно на "N.Name =" плюётся сообщением: "Недопустимый вызов или аргумент процедуры". Может, в 7-ке убрали запись?
Добавлено: Вс ноя 27, 2011 15:47
Volniy
Flasher писал(а):Что ты под ними понимаешь?
Сложные вызовы объектов и их свойств/методов. Как бы это попроще... Выражения, в которых много точек
Ну, например:
Код: Выделить всё
CreateObject("Scripting.FileSystemObject").CreateTextFile(InFile).WriteLine(stroka)
Черт ногу сломает...
Flasher писал(а):Может, в 7-ке убрали запись?
Не-а. Вот специально пошел на чужой комп с 7-кой. Все работает, в том числе и первоначальный, навороченный, вариант. Скорее всего какие-то заморочки 7-ки с правами доступа для переименования файла. Проверь.
Добавлено: Вс ноя 27, 2011 15:54
Flasher
Volniy писал(а):Черт ногу сломает...
А мне нравится. Не люблю кучу строк, когда можно всё запихнуть в одну (там, где это позволительно, конечно).
Volniy писал(а):Скорее всего какие-то заморочки 7-ки с правами доступа для переименования файла. Проверь.
Род.контроль отключён, софтовой защиты нет, сижу под админом, беру обычные безатрибутные текстовые файлы в папке C:\Тест.
Добавлено: Вт ноя 29, 2011 12:48
kinecter
Всем привет!
Много лет посещал этот форум, многому научился а зарегистрировался только сегодня - решил поделиться опытом.
Эту ветку выбрал - показалась она самой подходящей, так как код включает HTA + VBS.
Пару лет уже пользуюсь собственной утилитой для множественной замены текста в файлах.
Вопрос к уважаемому форуму: я могу выкладывать все здесь? или стоит открыть новую ветку? так как кода достаточно много
Добавлено: Вт ноя 29, 2011 13:12
Flasher
kinecter
Раз много лет посещался форум, то можно было бы за это время научиться определять места надлежащего назначения и пользоваться поиском аналогичных решений.
Эта ветка по обсуждению языка, а не по выкладыванию утилит и скриптов. Большие HTA-коды лучше выкладываеть в MIME, как это делается в подфоруме "Программное обеспечение".
Сами темы уже решались
здесь и
здесь.
Добавлено: Вт ноя 29, 2011 13:39
kinecter
Flasher писал(а):kinecter
Раз много лет посещался форум, то можно было бы за это время научиться определять места надлежащего назначения и пользоваться поиском аналогичных решений.
Эта ветка по обсуждению языка, а не по выкладыванию утилит и скриптов.
.......
Сами темы уже решались здесь и здесь.
Спасибо за совет!
Про поиск и про то где эти темы решались, я в курсе - бывал не раз на тех ветках.
а вот что значит :
Flasher писал(а):.
Большие HTA-коды лучше выкладываеть в MIME
-пока не совсем в курсе. Буду искать, но ежели подскажете - с удовольствием прочитаю ваши советы.
Хотя, собственно HTA код там не слишком большой , ежели отделить от него стили и VBS
Добавлено: Вт ноя 29, 2011 13:47
Flasher
kinecter
Подсказать может хотя бы
справка. HTA имелся в виду в совокупности с остальным кодом. Не по отдельности же выкладывать.
Добавлено: Вт ноя 29, 2011 14:05
kinecter
Flasher писал(а):Подсказать может хотя бы справка.
все таки с вашей подсказкой все ищется гораздо быстрее.
Благодарю!
Flasher писал(а):HTA имелся в виду в совокупности с остальным кодом. Не по-отдельности же выкладывать.
По моему, если выкладывать кусками(HTA, STYLE,и VBS на пару частей разделить), то гораздо наглядней получится.
Ну ладно, прикину - померю - посмотрю.
Может мои произведения и не такие уж объемные - чуть больше 200 строк..
Тут на форуме, помнится, встречал портянки и подлиннее.
Добавлено: Вт ноя 29, 2011 14:14
Flasher
Добавлено: Сб янв 14, 2012 20:42
Andrey_A
Появился вопрос
Есть шрифт файл Arialm.ttf
Можно ли методами скриптинга узнать название шрифта "Arial Mod"?
[mod="Avada"]Перемещено из темы
Script Request. Данный пост запросом на скрипт не является.[/mod]
Добавлено: Пн янв 16, 2012 15:48
Lev
Добавлено: Пн янв 16, 2012 16:02
Flasher
Lev
Ты прямо мысли читаешь, только то же самое хотел предложить.
Andrey_A
Портабельный вариант:
Код: Выделить всё
' Получить заголовок файла под курсором
' Параметры: "%P" %N
'======================================
Set Folder = CreateObject("Shell.Application").NameSpace(WScript.Arguments(0))
MsgBox Folder.GetDetailsOf(Folder.ParseName(WScript.Arguments(1)), 21)
Добавлено: Пн янв 16, 2012 21:28
Andrey_A
Flasher и Lev спасибо, уже почти сам догадался...
Использование wdx-плагинов в скриптах будет следующим этапом освоение скриптов...
Добавлено: Вс дек 23, 2012 11:29
Flasher
LonerD писал(а):А как в vbs-скрипте узнать, что мы находимся в архиве?
Параметр "%P" без слеша на конце проверить на FSO.FileExists или FSO.FolderExists. Либо проверить на доступность элемент под курсором.
Либо так (убрав путь запуска):
Код: Выделить всё
If CreateObject("WScript.Shell").CurrentDirectory = CreateObject("Scripting.FileSystemObject").GetParentFolderName(WScript.arguments(0)) Then MsgBox "Открыт архив" Else MsgBox "Открыта папка"