Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Looking for EXE Loader Utility
Message
 
À
04/04/2001 14:37:24
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00492049
Message ID:
00492064
Vues:
20
>Hi all,
>
>Does anyone know where I can find a VFP EXE Loader utility for installing on a user's workstation and being able to recognize a newer version of the app on the network and copying it to the local drive? I would also expect it would do memory checking etc.
>
>I'm sure this type of utility has already been done and can be deployed as a generic tool but I'd also be interested in any samples.
>
>Let me know.
>
>Thanks!
>
>-JT

Jeff,

I use a VBScript file to do basically the same thing. The script is generated when the application is installed. I also check for, and, if necessary install the Windows Script Host at this time to make sure that I can use the script. The listing that follows is a slightly modified version of a generated script.
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)
Sorry if this comes through twice. The UT's hiccuping again.
George

Ubi caritas et amor, deus ibi est
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform