Dim oFSO, oLocal, oRemote, cExe, cLocal, cRemote, oShell, cParm 'cExe = "MyExe.exe" cExe = PARAMETER1 'cLocal = "C:\LOCAL\" cLocal = PARAMETER2 'cRemote = "H:\REMOTE\" cRemote = PARAMETER3 cParm = "" Set oFSO = CreateObject( "Scripting.FileSystemObject" ) Set oShell = CreateObject( "WScript.Shell" ) Set oRemote = oFSO.GetFile( cRemote & cExe ) If Not oFSO.FileExists( cLocal & cExe ) Then oRemote.Copy cLocal Else Set oLocal = oFSO.GetFile( cLocal & cExe ) If oRemote.DateLastModified > oLocal.DateLastModified Then oRemote.Copy cLocal End if End if oShell.Run( cLocal & cExe & cParm )