Bonjour à tous,

Je dois créer un programme en vb + shell qui récupère le nom de la machine locale et crée avec celui-ci un password complexe (+10 car) + envoi ce mot de pass à l'administrateur avec la fonction shell Net user "Administrateur" password.

J'ai besoin qu'on me mette sur la voie, Merci d'avance!!

Bon voila un exemple qui recupère le nom de ta machine aprés pour la cryptographie je suis pas connaisseur.

'example by Donavon Kuhn (Donavon.Kuhn@Nextel.com) Private Const MAX_COMPUTERNAME_LENGTH As Long = 31 Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long Private Sub Form_Load() Dim dwLen As Long Dim strString As String 'Create a buffer dwLen = MAX_COMPUTERNAME_LENGTH + 1 strString = String(dwLen, "X") 'Get the computer name GetComputerName strString, dwLen 'get only the actual data strString = Left(strString, dwLen) 'Show the computer name MsgBox strString End Sub

A++
Hervé

mailto:juliusius37@aol.com


Salut
alors pour trouver le non de la machine tu a les controles adsi
Si tu ve g le fichier d'aide en anglais c assez simple d'utilisation ces controle permettent de recuperer et modifier username,password, date de derniere connection... enfin tous les truc dans ce style. si tu ve envoie moi un email et je t'enverrai le fichier d'aide et tu pe aussi m'envoyer ton code si tu y arrive pas je verrai ce que je pe faire
a bientot
-------------------------------
Réponse au message :
-------------------------------

> Bonjour à tous,
>
> Je dois créer un programme en vb + shell qui récupère le nom de la machine locale et crée avec celui-ci un password complexe (+10 car) + envoi ce mot de pass à l'administrateur avec la fonction shell Net user "Administrateur" password.
>
> J'ai besoin qu'on me mette sur la voie, Merci d'avance!!
>