Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Help with WSH
Message
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00514664
Message ID:
00514721
Vues:
10
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)
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform