Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Import-Module ActiveDirectory
- Add-Type -AssemblyName System.Drawing
- Add-Type -AssemblyName System.Windows.Forms
- #--------------------------------------------------------------------------------------
- #Form 1 Start
- #ListBox - Non-Exempt
- $listboxNonExempt = New-Object System.Windows.Forms.ListBox
- $listboxNonExempt.FormattingEnabled = $True
- $listboxNonExempt.Location = New-Object System.Drawing.Point(6, 27)
- $listboxNonExempt.Size = New-Object System.Drawing.Size(188, 108)
- #Form - Panel
- $formPanel = New-Object System.Windows.Forms.Panel
- $formPanel.Location = New-Object System.Drawing.Point(12, 14)
- $formPanel.Size = New-Object System.Drawing.Size(442, 327)
- #GroupBox - Non-Exempt
- $groupboxNonExempt = New-Object System.Windows.Forms.GroupBox
- $groupboxNonExempt.Location = New-Object System.Drawing.Point(223, 74)
- $groupboxNonExempt.Size = New-Object System.Drawing.Size(200, 164)
- $groupboxNonExempt.Text = "Non-Exempt"
- #GroupBox - Name and All
- $groupboxName = New-Object System.Windows.Forms.GroupBox
- $groupboxName.Location = New-Object System.Drawing.Point(3, 3)
- $groupboxName.Size = New-Object System.Drawing.Size(436, 320)
- $groupboxName.Text = "Name"
- #ComboBox - Name Search
- $comboboxNameSearch = New-Object System.Windows.Forms.TextBox
- $comboboxNameSearch.Location = New-Object System.Drawing.Point(6, 19)
- $comboboxNameSearch.Size = New-Object System.Drawing.Size(223, 21)
- #Button - Find
- $bnFind = New-Object System.Windows.Forms.Button
- $bnFind.Location = New-Object System.Drawing.Point(235, 19)
- $bnFind.Size = New-Object System.Drawing.Size(35, 23)
- $bnFind.Text = "Add"
- $bnFind.UseVisualStyleBackColor = $True
- #Button OK Form
- $bnOKForm = New-Object System.Windows.Forms.Button
- $bnOKForm.Location = New-Object System.Drawing.Point(223, 274)
- $bnOKForm.Size = New-Object System.Drawing.Size(75, 23)
- $bnOKForm.Text = "OK"
- $bnOKForm.UseVisualStyleBackColor = $True
- #Button Cancel Form
- $bnCancelForm = New-Object System.Windows.Forms.Button
- $bnCancelForm.Location = New-Object System.Drawing.Point(131, 274)
- $bnCancelForm.Size = New-Object System.Drawing.Size(75, 23)
- $bnCancelForm.Text = "Cancel"
- $bnCancelForm.UseVisualStyleBackColor = $True
- #Add Contents for GroupBox - Non-Exempt
- $groupboxNonExempt.Controls.Add($listboxNonExempt)
- #Add Contents for GroupBox - Name
- $groupboxName.Controls.Add($comboboxNameSearch)
- $groupboxName.Controls.Add($bnFind)
- $groupboxName.Controls.Add($groupboxNonExempt)
- $groupboxName.Controls.Add($bnCancelForm)
- $groupboxName.Controls.Add($bnOKForm)
- #Add to Panel
- $formPanel.Controls.Add($groupboxName)
- #Form1
- $Form = New-Object System.Windows.Forms.Form
- $Form.ClientSize = New-Object System.Drawing.Size(464, 386)
- $Form.Controls.Add($formPanel)
- $Form.Text = "New Hires Form"
- $Form.CancelButton = $bnCancelForm
- #$Form.AcceptButton = $bnOKForm
- $Form.MaximizeBox = $false
- $Form.SizeGripStyle = 'Hide'
- $Form.MaximumSize = New-Object System.Drawing.Size (480,386)
- $Form.MinimumSize = New-Object System.Drawing.Size (480,386)
- #Form 1 End
- #--------------------------------------------------------------------------
- #Form 2 Start
- #Button OK
- $buttonOK = New-Object System.Windows.Forms.Button
- $buttonOK.Location = New-Object System.Drawing.Point(333, 273)
- $buttonOK.Size = New-Object System.Drawing.Size(75, 23)
- $buttonOK.Text = "OK"
- $buttonOK.UseVisualStyleBackColor = $True
- #Form2 - Account Details
- $Form2 = New-Object System.Windows.Forms.Form
- $Form2.ClientSize = New-Object System.Drawing.Size(449, 378)
- $Form2.MaximizeBox = $false
- $Form2.SizeGripStyle = 'Hide'
- $Form2.MaximumSize = New-Object System.Drawing.Size (449,378)
- $Form2.MinimumSize = New-Object System.Drawing.Size (449,378)
- $Form2.Controls.Add($buttonOK)
- $Form2.CancelButton = $buttonCancel
- #$Form2.AcceptButton = $buttonOK
- #$Form2.ShowDialog()
- #Form 2 End
- #-------------------------------------------------------------------------------
- #Search for users [Add to list]
- $bnFind.Add_Click({
- #Sets all results to variable
- $name = $comboboxNameSearch.Text
- #If variable is not empty, continue
- if($name -ne ""){
- #add to results list
- $listboxNonExempt.Items.Add($comboboxNameSearch.Text)
- }
- })
- #Start script with OK
- $bnOKForm.Add_Click({
- #For each name in list
- foreach($n in $listboxNonExempt.Items){
- $buttonOK.Add_Click({
- #Output current name in loop
- Write-Host $n
- #Close the Form2
- $Form2.close()
- })
- #Open a Form2 for each user in $listboxNonExempt
- $Form2.ShowDialog()
- }
- })
- #Open Form
- $Form.ShowDialog()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement