Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 874
Благодарности: 575

Профиль | Отправить PM | Цитировать


Цитата Iska:
Теоретически в полном пути может попасться папка, одноимённая с именем скрипта. »

Справедливое замечание. Чтобы это предусмотреть, предложу такие варианты:
Код: Выделить весь код
Replace(WScript.ScriptFullName&"*",WScript.ScriptName&"*","")
и
Код: Выделить весь код
Wscript.CreateObject("Scripting.FileSystemObject").GetFile(WScript.ScriptFullName).ParentFolder&"\"
.
Это сообщение посчитали полезным следующие участники:

Отправлено: 08:55, 06-09-2014 | #7