Total Commander :: Windows Script Host

through

[^/[Print]\]
Goto page Previous 1, 2, 3 ... 21, 22, 23 ... 25, 26, 27 Next :| |:
Total Commander -> Автоматизация Total Commander

#316: Author: Volniy, Location: Местный

Posted: Sun Nov 27, 2011 14:16
—
Насчет не read-only свойств и сам пару раз лажался. Например, был уверен, что даты файла из FSO можно только прочитать, а оказалось-то - нет Embarassed

Flasher wrote:

На два - ты хотел сказать.

Я же не об этой конкретной строке. Дело в том, что если посмотреть на VBS скрипты тут, на форуме, то можно увидеть еще и более многоэтажные конструкции.

PS Вот сейчас припомнил случай, когда такие нагромождения не работали с 5-ой версии скриптов, а после установки 5.6 они уже заработали. Так что еще зависит и от реализации конкретной версии WSH.

#317: Author: Flasher, Location: Москва

Posted: Sun Nov 27, 2011 14:47
—

Volniy wrote:

Например, был уверен, что даты файла из FSO можно только прочитать, а оказалось-то - нет

Мануалы устаревшие, получается.

Volniy wrote:

Дело в том, что если посмотреть на VBS скрипты тут, на форуме, то можно увидеть еще и более многоэтажные конструкции.

Что ты под ними понимаешь?
Кстати, "Set N = FSO.GetFile(F)" не помогает. Всё равно на "N.Name =" плюётся сообщением: "Недопустимый вызов или аргумент процедуры". Может, в 7-ке убрали запись? Surprised

#318: Author: Volniy, Location: Местный

Posted: Sun Nov 27, 2011 15:47
—

Flasher wrote:

Что ты под ними понимаешь?

Сложные вызовы объектов и их свойств/методов. Как бы это попроще... Выражения, в которых много точек Smile

Ну, например:

Code:

CreateObject("Scripting.FileSystemObject").CreateTextFile(InFile).WriteLine(stroka)

Черт ногу сломает...

Flasher wrote:

Может, в 7-ке убрали запись? Surprised

Не-а. Вот специально пошел на чужой комп с 7-кой. Все работает, в том числе и первоначальный, навороченный, вариант. Скорее всего какие-то заморочки 7-ки с правами доступа для переименования файла. Проверь.

#319: Author: Flasher, Location: Москва

Posted: Sun Nov 27, 2011 15:54
—

Volniy wrote:

Черт ногу сломает...

А мне нравится. Не люблю кучу строк, когда можно всё запихнуть в одну (там, где это позволительно, конечно).

Volniy wrote:

Скорее всего какие-то заморочки 7-ки с правами доступа для переименования файла. Проверь.

Род.контроль отключён, софтовой защиты нет, сижу под админом, беру обычные безатрибутные текстовые файлы в папке C:\Тест.

#320: Author: kinecter,

Posted: Tue Nov 29, 2011 12:48
—
Всем привет!
Много лет посещал этот форум, многому научился а зарегистрировался только сегодня - решил поделиться опытом.
Эту ветку выбрал - показалась она самой подходящей, так как код включает HTA + VBS.
Пару лет уже пользуюсь собственной утилитой для множественной замены текста в файлах.
Вопрос к уважаемому форуму: я могу выкладывать все здесь? или стоит открыть новую ветку? так как кода достаточно много

#321: Author: Flasher, Location: Москва

Posted: Tue Nov 29, 2011 13:12
—
kinecter
Раз много лет посещался форум, то можно было бы за это время научиться определять места надлежащего назначения и пользоваться поиском аналогичных решений.
Эта ветка по обсуждению языка, а не по выкладыванию утилит и скриптов. Большие HTA-коды лучше выкладываеть в MIME, как это делается в подфоруме "Программное обеспечение".
Сами темы уже решались здесь и здесь.

#322: Author: kinecter,

Posted: Tue Nov 29, 2011 13:39
—

Flasher wrote:

kinecter
Раз много лет посещался форум, то можно было бы за это время научиться определять места надлежащего назначения и пользоваться поиском аналогичных решений.
Эта ветка по обсуждению языка, а не по выкладыванию утилит и скриптов.
.......
Сами темы уже решались здесь и здесь.

Спасибо за совет!
Про поиск и про то где эти темы решались, я в курсе - бывал не раз на тех ветках.

а вот что значит :

Flasher wrote:

.
Большие HTA-коды лучше выкладываеть в MIME

-пока не совсем в курсе. Буду искать, но ежели подскажете - с удовольствием прочитаю ваши советы.
Хотя, собственно HTA код там не слишком большой , ежели отделить от него стили и VBS

#323: Author: Flasher, Location: Москва

Posted: Tue Nov 29, 2011 13:47
—
kinecter
Подсказать может хотя бы справка. HTA имелся в виду в совокупности с остальным кодом. Не по отдельности же выкладывать.

#324: Author: kinecter,

Posted: Tue Nov 29, 2011 14:05
—

Flasher wrote:

Подсказать может хотя бы справка.

все таки с вашей подсказкой все ищется гораздо быстрее.
Благодарю!

Flasher wrote:

HTA имелся в виду в совокупности с остальным кодом. Не по-отдельности же выкладывать.

По моему, если выкладывать кусками(HTA, STYLE,и VBS на пару частей разделить), то гораздо наглядней получится.
Ну ладно, прикину - померю - посмотрю.
Может мои произведения и не такие уж объемные - чуть больше 200 строк..

Тут на форуме, помнится, встречал портянки и подлиннее.

#325: Author: Flasher, Location: Москва

Posted: Tue Nov 29, 2011 14:14
—
kinecter
Радиола от Serge Yolkin - 576 строк.

#326: Author: Andrey_A, Location: Сочи

Posted: Sat Jan 14, 2012 20:42
—
Появился вопрос
Есть шрифт файл Arialm.ttf
Можно ли методами скриптинга узнать название шрифта "Arial Mod"?

!	Avada:
	Перемещено из темы Script Request. Данный пост запросом на скрипт не является.

#327: Author: Lev,

Posted: Mon Jan 16, 2012 15:48
—
В теме wdx ActiveX кинул пример.
Также загляни в Использование wdx-плагинов в скриптах

#328: Author: Flasher, Location: Москва

Posted: Mon Jan 16, 2012 16:02
—
Lev
Ты прямо мысли читаешь, только то же самое хотел предложить. Smile

Andrey_A
Портабельный вариант:

Code:

' Получить заголовок файла под курсором
' Параметры: "%P" %N
'======================================
Set Folder = CreateObject("Shell.Application").NameSpace(WScript.Arguments(0))
MsgBox Folder.GetDetailsOf(Folder.ParseName(WScript.Arguments(1)), 21)

#329: Author: Andrey_A, Location: Сочи

Posted: Mon Jan 16, 2012 21:28
—
Flasher и Lev спасибо, уже почти сам догадался...
Использование wdx-плагинов в скриптах будет следующим этапом освоение скриптов...

#330: Author: Flasher, Location: Москва

Posted: Sun Dec 23, 2012 11:29
—

LonerD wrote:

А как в vbs-скрипте узнать, что мы находимся в архиве?

Параметр "%P" без слеша на конце проверить на FSO.FileExists или FSO.FolderExists. Либо проверить на доступность элемент под курсором.
Либо так (убрав путь запуска):

Code:

If CreateObject("WScript.Shell").CurrentDirectory = CreateObject("Scripting.FileSystemObject").GetParentFolderName(WScript.arguments(0)) Then MsgBox "Открыт архив" Else MsgBox "Открыта папка"

Total Commander -> Автоматизация Total Commander

output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Goto page Previous 1, 2, 3 ... 21, 22, 23 ... 25, 26, 27 Next :| |: Page 22 of 27