Discussion :

[rougne974]

Bonjour,

Je souhaite réaliser un mappage avec la variable d'environnement UserName mais je n'y arrive pas.
je vous explique mon problème.

Sur un serveur 2003 AD où j'ai un partage qui est:
\\test\dossiers_perso$\[nom_utilisateur]$
(où nom d'utilisateur est différent pour chaque profil qui se log)

je veux faire un script d'ouverture de session qui map ce repertoire sur un lecteur H: avec le nom de l'utilisateur logué, mais je n'arrive pas à intégrer ma variable username.

je réussi très bien a mapper en mettant le nom d'utilisateur en dur comme ceci:

Code :

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

1
2
3
4
Dim oNet 
Set oNet = CreateObject("Wscript.Network") 
oNet.MapNetworkDrive "H:", "\\test\[nom_utilisateur]$" 
WSCript.Quit

Merci de votre aide.

[Flamby38]

une page qui traite du sujet :

http://www.computerperformance.co.uk...HomeDirAdv.htm

sinon le nom de l'utilisateur se récupere tout simplement de la maniere suivante :

Code :

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

1
2
3
 
Set objNetwork = WScript.CreateObject("WScript.Network")
strUserName = objNetwork.UserName

[rougne974]

Merci de cette réponse mais comment incorporer ce code pour que mon script marche?
et surtout comment compléter le chemin: \\test\[username]$ ???

[sshpcl2]

comment concatener les deux information tu veux dire :

Code :

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

1
2
3
4
5
Dim NomUser
 
Set WshNetwork = WScript.CreateObject("WScript.Network")
 
WScript.Echo "User Name = " & WshNetwork.UserName

ou sinon pour ta demande

Code :

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

NomUser = WshNetwork.UserName

aprés tu concatene

Code :

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

1
2
3
MaVariable = "\\test\"
 
MaVariable = MaVariable & NomUser

moui c'est une methode de l'objet network un peut strange n'esite pas a telechargez :

http://www.microsoft.com/downloads/d...displaylang=en

c'est beurk le vbscript nan

[rougne974]

ben en faite je connai pas trop les langages de prog, en faites je suis en BTS IG option ARLE et je fait une PTI sur AD avec script de login.
Après oui je trouve ca beurk aussi lol^^

[rougne974]

comment concatener les deux information tu veux dire :

Dim NomUser

Set WshNetwork = WScript.CreateObject("WScript.Network")

WScript.Echo "User Name = " & WshNetwork.UserName

ou sinon pour ta demande

NomUser = WshNetwork.UserName

aprés tu concatene
MaVariable = "\\test\"

MaVariable = MaVariable & NomUser

moui c'est une methode de l'objet network un peut strange n'esite pas a telechargez :

http://www.microsoft.com/downloads/d...displaylang=en

c'est beurk le vbscript nan

Merci sshpcl2 ca marche!!! la commande entiére final est donc:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim NomUser
Set WshNetwork = WScript.CreateObject("WScript.Network")
WScript.Echo "User Name = " & WshNetwork.UserName
NomUser = WshNetwork.UserName
MaVariable = "\\test\"
MaVariable = MaVariable & NomUser & "$"
'
'
Dim oNet 
Set oNet = CreateObject("Wscript.Network")
Set objNetwork = WScript.CreateObject("WScript.Network")
strUserName = objNetwork.UserName
oNet.MapNetworkDrive "H:", MaVariable
WSCript.Quit

Merci beaucoup!!++^^