Bienvenue! Identification Créer un nouveau profil

Recherche avancée

Re: Runtime ET Access

30/04/13 09:51
Bonjour,

Langage: Visual Basic
sXS = SysCmd(acSysCmdAccessDir) sXS = sXS & "msaccess.exe" 'sChemin_Local = Me.Lst_appli.Column(4) sChemin_serveur = Me.Lst_appli.Column(5) 'sApp = Me.Lst_appli.Column(2) Version_Locale = IDVersion(sChemin_Local & sApp) Version_Serveur = IDVersion(sChemin_serveur & sApp) Source = "" & sChemin_serveur & sApp & "" Dest = "" & sChemin_Local & sApp & ""   If Version_Locale < Version_Serveur Then MsgBox " Il existe une nouvelle version." & vbCrLf & "Votre version a été mise à jour", vbInformation, "Mise à jour !" ' FileCopy "s:\gestion\Global - Frontal.accdr", "c:\JFB\global - frontal.accdr" FileCopy Source, Dest 'MsgBox """" & sChemin_serveur & sApp & """, """ & sChemin_Local & sApp & """" End If   Shell """" & sXS & """ """ & sChemin_Local & sApp & """ /cmd" & sOption, vbMaximizedFocus Application.Quit acQuitSaveNone

en remplaçant dans le Shell le /cmd par /runtime ça semble fonctionner ;-) merci pour la piste.

Quelle est l'utilité de ce /cmd ?

Merci !!!
SujetAuteurEnvoyé le

Runtime ET Access

JeffB22/04/13 09:48

Re: Runtime ET Access

JeffB24/04/13 08:41

Re: Runtime ET Access

DenisS28/04/13 19:13

Re: Runtime ET Access

JeffB29/04/13 13:35

Re: Runtime ET Access

DenisS29/04/13 19:23

Re: Runtime ET Access

JeffB30/04/13 09:51

Re: Runtime ET Access

DenisS30/04/13 10:59

Re: Runtime ET Access

JeffB30/04/13 11:21

Re: Runtime ET Access

Cairis25/04/13 14:45

Seuls les utilisateurs enregistrés peuvent poster des messages dans ce forum.

Cliquez ici pour vous connecter