Question
[Résolu] Une boxe ?
- Arnaud Petitjean
- Hors Ligne
- Modérateur
il y a 13 ans 6 mois #7910
par Arnaud Petitjean
MVP PowerShell et créateur de ce magnifique forum
Auteur de 6 livres PowerShell aux éditions ENI
Fondateur de la société Start-Scripting
Besoin d'une formation PowerShell ?
Réponse de Arnaud Petitjean sur le sujet Re:Une boxe ?
Ca fonctionne certainement grâce au fait que WinNT soit bien écrit (casse) par rapport au 1er exemple.
Arnaud
Arnaud
MVP PowerShell et créateur de ce magnifique forum
Auteur de 6 livres PowerShell aux éditions ENI
Fondateur de la société Start-Scripting
Besoin d'une formation PowerShell ?
Connexion ou Créer un compte pour participer à la conversation.
- rodriguez
- Auteur du sujet
- Hors Ligne
- Membre junior
Réduire
Plus d'informations
- Messages : 25
- Remerciements reçus 0
il y a 13 ans 6 mois #7914
par rodriguez
Réponse de rodriguez sur le sujet Re:Une boxe ?
Voici le code en version 1.
[code:1]
# Formulaire creation user
[Void][Reflection.Assembly]::LoadWithPartialName('system.windows.forms')
$textbox_motpasse = New-Object system.Windows.Forms.TextBox
$button_valider = New-Object system.Windows.Forms.Button
$textbox_Login_user = New-Object system.Windows.Forms.TextBox
$button_quitter = New-Object system.Windows.Forms.Button
$label1 = New-Object system.Windows.Forms.Label
$label2 = New-Object system.Windows.Forms.Label
$label_principal = New-Object system.Windows.Forms.Label
$label_principal.autosize = $true
$label_principal.location = New-Object system.Drawing.Point(35,22)
$label_principal.name = 'label principal'
$label_principal.size = New-Object system.Drawing.Size(350,20)
$label_principal.text = ' Creation d un compte utilisateur FTP'
#label1
$label1.autosize = $true
$label1.location = New-Object system.Drawing.Point (15,100)
$label1.name = 'label1'
$label1.size = New-Object system.Drawing.Size(130,10)
$label1.tabindex = 4
$label1.text = 'login utilisateur'
#textbox_Login_user
$textbox_Login_user.location = New-Object system.Drawing.Point(110,100)
$textbox_Login_user.name = ' textbox_login'
$textbox_Login_user.size = New-Object system.Drawing.Size(202,31)
$textbox_login_user.tabindex = 6
$textbox_Login_user.text = 'login User'
#$TextBox_Login_User|Select
#label2
$label2.autosize = $true
$label2.location = New-Object system.Drawing.Point (15,150)
$label2.name = 'label1'
$label2.size = New-Object system.Drawing.Size(130,10)
$label2.tabindex = 5
$label2.text = 'mot de passe '
#textbox_motpasse
$textbox_motpasse.Location = New-Object system.Drawing.Point(110, 150)
$textbox_motpasse.Multiline = $true
$textbox_motpasse.Name = 'textbox_resultat'
$textbox_motpasse.Size = New-Object system.Drawing.Size( 202, 31)
$textbox_motpasse.TabIndex = 1
$textbox_motpasse.text = 'mot de passe'
#Button Valider
$button_valider.Location = New-Object system.Drawing.Point(53, 250)
$button_valider.Name = 'button_valider'
$button_valider.Size = New-Object system.Drawing.Size(90,20)
$button_valider.TabIndex = 2
$button_valider.Text = 'Valider'
$button_valider.UseVisualStyleBackColor = $true
#Button quitter
$button_quitter.location = New-Object system.Drawing.Point(300,250)
$button_quitter.name = 'button_quitter'
$button_quitter.size = New-Object system.Drawing.Size(90,20)
$button_quitter.TabIndex = 3
$button_quitter.text = 'quitter'
$button_quitter.usevisualstylebackcolor = $true
$button_quitter.add_click({$form1.close()})
$button_valider.add_click({
$user = $textbox_Login_user.Text
$mdp = $textbox_motpasse.text
$hostname = hostname
#creation utilisateur
function create-account ([string]$accountName = $user)
{
$wmiuser = Get-WmiObject -class \"Win32_UserAccount\" -filter \"name='$accountName'\"
if($wmiuser -eq $null)
{
$comp = [adsi] \"WinNT://$hostname\"
$user = $comp.Create(\"User\", $accountName)
$user.SetPassword($mdp)
$user.SetInfo()
\"Désactiver le changement de mot de passe[User must change password at next logon]\"
$user.PasswordExpired = 0
$user.SetInfo()
#creation du répertoire:
Set-Location d:\ftp\localUser
New-Item -itemType directory -name $accountname
}
else
{
write-warning \"Attention cet utilisateur $accountName existe déja\";
}
}
foreach($ajout in 1..1)
{
create-account($user);
}
$form1.Close()
})
$form1 = New-Object system.Windows.Forms.Form
#form1
$form1.clientsize = New-Object system.Drawing.Size(400,400)
$form1.controls.add($label_principal)
$form1.controls.add($label1)
$form1.controls.add($label2)
$form1.controls.add($textbox_motpasse)
$form1.controls.add($textbox_Login_user)
$form1.controls.add($button_valider)
$form1.controls.add($button_quitter)
$form1.name = 'form1'
$form1.text = 'Creation d un compte utilisateur FTP'
$form1.showdialog()
# Rajout utilisateur dans groupe Local Utilisateurs_FTP
$groupe = \"Utilisateurs_FTP\"
$computer = [ADSI](\"WinNT://\" + $hostname + \",computer\")
$group = $computer.psbase.children.find($groupe)
$group.Add(\"WinNT://\" + $hostname + \"/\" + $user)
# Mise en place du Quota
(C:\WINDOWS\system32\dirquota.exe quota Add /path:d:\ftp\localuser\\"$user\" /limit:\"$taille\" )
Write-Warning \"Création utilisateur terminé\"
#SR.
[/code:1]
Message édité par: noxyde, à: 8/10/10 13:12<br><br>Message édité par: noxyde, à: 8/10/10 16:24
[code:1]
# Formulaire creation user
[Void][Reflection.Assembly]::LoadWithPartialName('system.windows.forms')
$textbox_motpasse = New-Object system.Windows.Forms.TextBox
$button_valider = New-Object system.Windows.Forms.Button
$textbox_Login_user = New-Object system.Windows.Forms.TextBox
$button_quitter = New-Object system.Windows.Forms.Button
$label1 = New-Object system.Windows.Forms.Label
$label2 = New-Object system.Windows.Forms.Label
$label_principal = New-Object system.Windows.Forms.Label
$label_principal.autosize = $true
$label_principal.location = New-Object system.Drawing.Point(35,22)
$label_principal.name = 'label principal'
$label_principal.size = New-Object system.Drawing.Size(350,20)
$label_principal.text = ' Creation d un compte utilisateur FTP'
#label1
$label1.autosize = $true
$label1.location = New-Object system.Drawing.Point (15,100)
$label1.name = 'label1'
$label1.size = New-Object system.Drawing.Size(130,10)
$label1.tabindex = 4
$label1.text = 'login utilisateur'
#textbox_Login_user
$textbox_Login_user.location = New-Object system.Drawing.Point(110,100)
$textbox_Login_user.name = ' textbox_login'
$textbox_Login_user.size = New-Object system.Drawing.Size(202,31)
$textbox_login_user.tabindex = 6
$textbox_Login_user.text = 'login User'
#$TextBox_Login_User|Select
#label2
$label2.autosize = $true
$label2.location = New-Object system.Drawing.Point (15,150)
$label2.name = 'label1'
$label2.size = New-Object system.Drawing.Size(130,10)
$label2.tabindex = 5
$label2.text = 'mot de passe '
#textbox_motpasse
$textbox_motpasse.Location = New-Object system.Drawing.Point(110, 150)
$textbox_motpasse.Multiline = $true
$textbox_motpasse.Name = 'textbox_resultat'
$textbox_motpasse.Size = New-Object system.Drawing.Size( 202, 31)
$textbox_motpasse.TabIndex = 1
$textbox_motpasse.text = 'mot de passe'
#Button Valider
$button_valider.Location = New-Object system.Drawing.Point(53, 250)
$button_valider.Name = 'button_valider'
$button_valider.Size = New-Object system.Drawing.Size(90,20)
$button_valider.TabIndex = 2
$button_valider.Text = 'Valider'
$button_valider.UseVisualStyleBackColor = $true
#Button quitter
$button_quitter.location = New-Object system.Drawing.Point(300,250)
$button_quitter.name = 'button_quitter'
$button_quitter.size = New-Object system.Drawing.Size(90,20)
$button_quitter.TabIndex = 3
$button_quitter.text = 'quitter'
$button_quitter.usevisualstylebackcolor = $true
$button_quitter.add_click({$form1.close()})
$button_valider.add_click({
$user = $textbox_Login_user.Text
$mdp = $textbox_motpasse.text
$hostname = hostname
#creation utilisateur
function create-account ([string]$accountName = $user)
{
$wmiuser = Get-WmiObject -class \"Win32_UserAccount\" -filter \"name='$accountName'\"
if($wmiuser -eq $null)
{
$comp = [adsi] \"WinNT://$hostname\"
$user = $comp.Create(\"User\", $accountName)
$user.SetPassword($mdp)
$user.SetInfo()
\"Désactiver le changement de mot de passe[User must change password at next logon]\"
$user.PasswordExpired = 0
$user.SetInfo()
#creation du répertoire:
Set-Location d:\ftp\localUser
New-Item -itemType directory -name $accountname
}
else
{
write-warning \"Attention cet utilisateur $accountName existe déja\";
}
}
foreach($ajout in 1..1)
{
create-account($user);
}
$form1.Close()
})
$form1 = New-Object system.Windows.Forms.Form
#form1
$form1.clientsize = New-Object system.Drawing.Size(400,400)
$form1.controls.add($label_principal)
$form1.controls.add($label1)
$form1.controls.add($label2)
$form1.controls.add($textbox_motpasse)
$form1.controls.add($textbox_Login_user)
$form1.controls.add($button_valider)
$form1.controls.add($button_quitter)
$form1.name = 'form1'
$form1.text = 'Creation d un compte utilisateur FTP'
$form1.showdialog()
# Rajout utilisateur dans groupe Local Utilisateurs_FTP
$groupe = \"Utilisateurs_FTP\"
$computer = [ADSI](\"WinNT://\" + $hostname + \",computer\")
$group = $computer.psbase.children.find($groupe)
$group.Add(\"WinNT://\" + $hostname + \"/\" + $user)
# Mise en place du Quota
(C:\WINDOWS\system32\dirquota.exe quota Add /path:d:\ftp\localuser\\"$user\" /limit:\"$taille\" )
Write-Warning \"Création utilisateur terminé\"
#SR.
[/code:1]
Message édité par: noxyde, à: 8/10/10 13:12<br><br>Message édité par: noxyde, à: 8/10/10 16:24
Connexion ou Créer un compte pour participer à la conversation.
- rodriguez
- Auteur du sujet
- Hors Ligne
- Membre junior
Réduire
Plus d'informations
- Messages : 25
- Remerciements reçus 0
il y a 13 ans 6 mois #7915
par rodriguez
Réponse de rodriguez sur le sujet Re:Une boxe ?
Arnaud écrit:
Effectivement dans la précipitation je n'avais pas fait attention...
Bon pour le moment je touche plus à rien.
Merci !!
Ca fonctionne certainement grâce au fait que WinNT soit bien écrit (casse) par rapport au 1er exemple.
Arnaud
Effectivement dans la précipitation je n'avais pas fait attention...
Bon pour le moment je touche plus à rien.
Merci !!
Connexion ou Créer un compte pour participer à la conversation.
- Alan Pinard
- Hors Ligne
- Membre senior
Réduire
Plus d'informations
- Messages : 77
- Remerciements reçus 0
il y a 13 ans 6 mois #7927
par Alan Pinard
Alan Pinard
Version A
Réponse de Alan Pinard sur le sujet Re:Une boxe ?
Bonjour Noxyde,
Une petit remarque au passage, tu devrais mettre les variable de paramètre au début de ton script afin qu'il soit facile de le personnaliser.
Sinon, ton script fonctionne bien!
Alan Pinard
Une petit remarque au passage, tu devrais mettre les variable de paramètre au début de ton script afin qu'il soit facile de le personnaliser.
Sinon, ton script fonctionne bien!
Alan Pinard
Alan Pinard
Version A
Connexion ou Créer un compte pour participer à la conversation.
Temps de génération de la page : 0.073 secondes
- Vous êtes ici :
- Accueil
- forum
- PowerShell
- Entraide pour les débutants
- [Résolu] Une boxe ?