Kopier fil fra server til klient under login

Option Explicit
Dim objShell, strfile, objfile,StrDestExe,StrNewExe
Const WaitOnExit = True
Const DoNotWaitOnExit = False

StrDestExe = "c:\Windows\System32\notepad.exe"
StrNewExe =  "c:\Windows\System32\notepad1.exe"

set objfile = CreateObject ("Scripting.FileSystemObject")
Set objShell = CreateObject("WScript.Shell")

set strfile = objfile.GetFile(StrDestExe)
strfile.Copy(StrNewExe)

objShell.Run StrDestExe,0,DoNotWaitOnExit

Her har du koden du må selv lige sætte det ind så stierne er korrekte.

Hvis du i stedet for "DoNotWaitOnExit" skriver WaitOnExit så venter vbscriptet med at gå viderer til det den exe fil gør er afsluttet.

Tak for din hjælp

Det var skam så lidt... Skulle det være en anden gang...