scripts vbs ne s'applique qu'à un user... sur 1 poste !

Il y a 374 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici

Voir les posts : Par défaut Tous Les bonnes notes Les notes insuffisantes

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : scripts vbs ne s'applique qu'à un user... sur 1 poste !

jojik27

Plus d'informations

17-02-2006 à 10:33:26

Bonjour a tous,

Alors voici mon pb ... :
J'ai un script qui permet de connecter un lect réseau du dossier user mais celui-ci ne s'applique que sur 1user et sur 1 poste ... c'est à n'y rien comprendre comment est-ce possible? lorsque que je me connecte avec un autre user j'ai une erreur "Nom de réseau introuvable" source WSHNetwork.MapNetworkDrive (ligne 34)

Code :

'déclaration des variables
Set WshShell = WScript.CreateObject("WScript.Shell" )
Set WshSysEnv = WshShell.Environment("SYSTEM" )
Set WshNetwork = WScript.CreateObject("WScript.Network" )
'************************************************************
'Obtention du nom PC serveur utilisateur
Ordinateur=GetEnvironnement("PROCESS","COMPUTERNAME" )
LogonServer= GetEnvironnement("PROCESS","LOGONSERVER" )
Utilisateur = GetEnvironnement("PROCESS","USERNAME" )
************************************************************
'Fonction Obtention environnement
function GetEnvironnement(Noyau, Variable)
Set WshSysEnv = WshShell.Environment(noyau)
ret=WshSysEnv(Variable)
Set WshSysEnv = nothing'
GetEnvironnement=ret
end function
************************************************************
Map "G:", GetEnvironnement("USER","SRV1" ) & "\user\" & Utilisateur
************************************************************
function Map(drv,unc)
dim er
'on error resume next
'err.clear
'WshNetwork.RemoveNetworkDrive drv
'er=err.number
'err.clear
WshNetwork.MapNetworkDrive drv,unc
er=err.number
err.clear
on error goto 0
map=er
end function

D'où cela peut venir, le script a l'air d'être bon puisqu'il s'pplique sans pb pr un un user..merci...

KangOl

Profil : Pointeur

Plus d'informations

17-02-2006 à 18:03:17

Masquer

et c'est quoi les erreurs avec les autre utilisateurs ?

Aller à :

FORUM Tom's Hardware » Programmation » Autre » scripts vbs ne s'applique qu'à un user... sur 1 poste !

Page générée en 0.249 secondes