Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Help with WSH
Message
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00514664
Message ID:
00514721
Views:
9
Nadya, here is the code posted by George, I've created a VFP .exe that creates something like this based on some inputs, I can send it to you or post it here, if that is cool with George.
Dim oFSO, oLocal, oRemote, cExe, cLocal, cRemote, oShell, cParm
cExe = "MY.EXE"
cLocal = "C:\LOCAL\"
cRemote = "F:\REMOTE\"
cParm = " -cC:\LOCAL\MY.fpw"
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)
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform