Discussion :

[popofpopof]

bonjour

j'ai crée ce fichier VBS

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
'####################################################################
'#  Permet l'installation d'une bdd d'un réseau vers user connectés #
'####################################################################
 
'instance
Set fso = CreateObject("Scripting.FileSystemObject")
Set net = CreateObject("Wscript.Network")
Set WshShell = WScript.CreateObject("WScript.Shell")
 
'Test si fichier éxistant sur serveur.
If fso.FileExists ("\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\saisie base APPSA.mdb") 			Then
 
    'Copie du Fichier du serveur vers le pc utilisateurs
		fso.CopyFile "\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\saisie base APPSA.mdb","C:\access pc\"
		fso.CopyFile "\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\publipostage.mdb","C:\access pc\"
		fso.CopyFile "\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\Sécurité.mdw","C:\access pc\"
		fso.CopyFile "\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\evenement_ribbon.XML","C:\access pc\"
		fso.CopyFile "\\Serveurxp\Dossiers Groupe SAINT-AGNE\SAINT-AGNE PROMOTION\ACCESBASESTAGNE\mise a jour base\modification base.txt","C:\access pc\"
	msgbox "mise à jour terminée"
 
 
WshShell.Run """C:\Program Files\Microsoft Office\Office12\MSACCESS.EXE"" ""C:\access pc\saisie base APPSA.mdb"" /WRKGRP ""C:\access pc\Sécurité.mdw"""
 
 
 
Else
 
    'Avertissement si fichier non éxistant
    msgbox "Problème rencontré lors de la connexion au serveur.", vbExclamation, "Mise à Jour"
 
End If

Mon probleme est que sous windows XP quand on clique sur le fichier VBS il nous demande ci on est sur de vouloir exécuté ce programme et on est obliger de clique sur exécute pour continue ensuite il nous demande si connai l'éditeur et ci on accept de l'ouvrir.

Donc je voudrai evite ce deux clique et le rentre invisible pour l'utilisateur comment faire???

[ced600]

Je pense qu'il faut résoudre cela au niveau du système d'exploitation.
C'est peut être dans les règles de sécurités.

[popofpopof]

quel sont ces réglage?? je ne sais comment faire aide moi stp

[ced600]

Je ne sais pas quels sont les regles de securtes à modifier , desole

[RadPAT]

Salut popofpopof

si tu demandes à ton admin systeme de changer les GPO pour que les VBS puissent passer, il risque la crise cardiaque !!
Je crois que le plus simple pour toi si tu dois lancer ton script occasionnellement est de 'executer en ligne de commande :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
cmd /c cscript.exe MonPgm.vbs

et hop la sécurité....

A+

[ced600]

pas con .
Et en mettant cette ligne de commande dans un fichier .bat ? Peut être que windows ne dira rien quand à l'exécution du .bat .

[popofpopof]

je veux bien essai avec le fichier bat mais je vous explique mon probleme vous comprendre mieux

j'ai une basse access je fait un test au démarrage qui me permet de savoir ci un mise a jour est diponible, donc une mise a jour est détecté access m'exécute le fichier VBS et en même temp ferme access pour que la mise a jour ce face. sa marche mais comme vous le savai quand le fichier vbs ce lance il me demande d'accepte le risque de l'ouvrir

J'ai essai donc avec le fichier bat dans access qui m'ouvre apres le fichier vbs.
je fichier bat seul m'ouvre le fichier vbs sa marche mais quand je le m'ai dans ma base de donnée le fichier bat se lance puis me lance le fichier vbs mais presque en même temps access ce ferme (normal ) mais en quittant il me quitte aussi le fichier bat et le fichier vbs.
Comment enpéche que le fichier bat ce ferme a la fermetrue d 'access et comment faire aussi pour que le fichier bat sois invisible a l'ecran lors de son lencement?? qui a une idée?

[ced600]

essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

cmd /c start /B cscript.exe MonPgm.vbs

[popofpopof]

non ce code ne va pas je ne voi pas la difference avec l 'autre dans son utilisation

cmd /c start /B cscript.exe mise_a_jour_auto.vbs

il faudrai que le fichier bat ouvre le fichier vbs et que le fichier vbs reste ouver même apres la fermeture d'access

ci on exécute le fichier bat seul sa marche mais tu moment ou je le couple avec access quand on ferme access le fichier bat ce ferme et sa c pas normal


que faire??

[ced600]

ci on exécute le fichier bat seul sa marche mais tu moment ou je le couple avec access quand on ferme access le fichier bat ce ferme et sa c pas normal

mais le vbs se ferme ou pas ?

[RadPAT]

Tu as essayé avec un start /wait à la place du start /B
Dans ce cas le start /wait doit attendre la fin du VBS avant de refermer le .Bat.
Mais est-ce bien ce que tu souhaites, j'avoue malgré tes explications de ne pas etre certain de ta demande.

A++

[mnssylvain]

Bonjour
dsl de ne pas apporter de réponse mais
Je suis moi aussi à la recherche d'une solution.....

merci de m'avertir s'il y a du nouveau

[ced600]

Ton problème est il exactement le même ?