Как сделать чтобы vbs копировал сам себя?

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

 

Code:

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

Так не?

 

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

 

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

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

 

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