Partenaire Microsoft

 

 

Bienvenue, Invité
Nom d'utilisateur : Mot de passe : Se souvenir de moi
  • Page :
  • 1

SUJET : Connexion de lecteur avec authentification

Connexion de lecteur avec authentification il y a 4 ans 10 mois #333

Bonjour,

Dans certains cas on peut avoir besoin de connecter une lecteur sur un partage nécessitant une authentification, le script fourni avec la fonction "ConnectDrive" n'est pas faite pour ça, il faut réaliser une autre fonction :
'/////////////////////////////////////////
'// Connect a drive with authentification
function ConnectDriveAuth(Drive,Path,Description,User,Password)
 On Error Resume Next
 Dim objNetwork,oScriptShell
 Set objNetwork=WScript.CreateObject("WScript.Network")
 Set oScriptShell=CreateObject("WScript.Shell")
 Set oShell=CreateObject("Shell.Application")  
 err.number=0
 objNetwork.MapNetworkDrive Drive,Path,false,User,Password
 If err.number<>0 Then
  oScriptShell.Popup "Connexion lecteur " & Drive & " (" & Path & ")" & VbCrLf & "Description=" & err.Description & VbCrLf & "Code=" & err.Number,5,"Erreur",64
 Else  
  oShell.NameSpace(Drive).Self.Name=Description
 End If
end function 

Documentation MSDN de MapNetworkDrive :
http://msdn.microsoft.com/en-us/library/8kst88h6(v=vs.84).aspx

Cdt.

Le support

Connexion ou Créer un compte pour participer à la conversation.

Dernière édition: par Admin KoXo.
  • Page :
  • 1
Temps de génération de la page : 0.326 secondes