Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   Как сделать чтобы vbs копировал сам себя? (https://forum.antichat.xyz/showthread.php?t=209686)

FullCrazy 07.06.2010 06:50

Как сделать чтобы vbs копировал сам себя?
 
Мне нужно чтобы vbs копировал себя в указанную мной директорию, Но при условии того что я не знаю в какой дериктории лежит данный vbs у запускающего его юзера!
Как такое осуществить???? :)

POS_troi 07.06.2010 07:34

Код:

Const OverwriteExisting = True
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile ".\script.vbs" , ".\newCopyScript.vbs", OverwriteExisting

Так не?

FullCrazy 07.06.2010 08:03

Цитата:

Сообщение от POS_troi
Код:

Const OverwriteExisting = True
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile ".\script.vbs" , ".\newCopyScript.vbs", OverwriteExisting

Так не?

Я же говорю что не знаю в какой директории находится вбска у человека который её будет запускать!

POS_troi 07.06.2010 08:25

ну вообщето ".\" указывает на текущую директорию

Ща Боб рассудит =)

SpangeBoB 07.06.2010 08:26

Как копировать выше,путь к сприкту:
Wscript.Echo Wscript.ScriptFullName


Время: 23:36