From ee75d2317aa166358d01756d4408d06801eb0d3d Mon Sep 17 00:00:00 2001
From: hmalik144 <h.malik144@gmail.com>
Date: Thu, 22 Aug 2019 13:58:32 +1000
Subject: [PATCH] Create Zero Account Creator (GUI)

---
 Zero Account Creator (GUI) | 120 +++++++++++++++++++++++++++++++++++++
 1 file changed, 120 insertions(+)
 create mode 100644 Zero Account Creator (GUI)

diff --git a/Zero Account Creator (GUI) b/Zero Account Creator (GUI)
new file mode 100644
index 0000000..592e12a
--- /dev/null
+++ b/Zero Account Creator (GUI)	
@@ -0,0 +1,120 @@
+Add-Type -AssemblyName System.Windows.Forms
+Add-Type -AssemblyName PresentationFramework
+
+# Creation of form object
+$form = New-Object System.Windows.Forms.Form
+$form.Text = 'Zero Account Creation'
+$form.Size = New-Object System.Drawing.Size(300,200)
+$form.StartPosition = 'CenterScreen'
+
+# OK button object
+$OKButton = New-Object System.Windows.Forms.Button
+$OKButton.Location = New-Object System.Drawing.Point(75,120)
+$OKButton.Size = New-Object System.Drawing.Size(75,23)
+$OKButton.Text = 'OK'
+$OKButton.DialogResult = [System.Windows.Forms.DialogResult]::OK
+$form.AcceptButton = $OKButton
+$form.Controls.Add($OKButton)
+
+# Cancel Button object
+$CancelButton = New-Object System.Windows.Forms.Button
+$CancelButton.Location = New-Object System.Drawing.Point(150,120)
+$CancelButton.Size = New-Object System.Drawing.Size(75,23)
+$CancelButton.Text = 'Cancel'
+$CancelButton.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
+$form.CancelButton = $CancelButton
+$form.Controls.Add($CancelButton)
+
+# Label object
+$label = New-Object System.Windows.Forms.Label
+$label.Location = New-Object System.Drawing.Point(10,20)
+$label.Size = New-Object System.Drawing.Size(280,20)
+$label.Text = 'Please enter APRA username:'
+$form.Controls.Add($label)
+
+# TextBox object
+$textBox = New-Object System.Windows.Forms.TextBox
+$textBox.Location = New-Object System.Drawing.Point(10,40)
+$textBox.Size = New-Object System.Drawing.Size(260,20)
+$form.Controls.Add($textBox)
+
+$form.Topmost = $true
+
+$form.Add_Shown({$textBox.Select()})
+
+Do
+{
+    # open Dailog
+    $result = $form.ShowDialog()
+
+    Try
+    {
+        # if 'Ok' was clicked
+        if ($result -eq [System.Windows.Forms.DialogResult]::OK){
+            $getUsername = $textBox.Text.Trim()
+            $checkUsername = Get-ADUser -Identity $getUsername -Properties *
+   
+        }
+
+        # if 'Cancel' was clicked
+        if($result -eq [System.Windows.Forms.DialogResult]::Cancel){
+            Exit
+        }
+    }
+    Catch
+    {
+        # Couldn't be found the user, Show message:
+        [System.Windows.MessageBox]::Show('Cannot find APRA account for ' + $textBox.Text)
+
+        # Restart loop
+        $getUsername = $null
+    }
+
+}
+While ($getUsername -eq $null)
+
+# Clear variable from previous use
+$zeroaccountname = $null
+
+try{
+    # Zero account SamAccountName variable
+    $AccountName = "0" + $checkUsername.SamAccountName
+    # get the 0 account
+    $zeroaccountname = Get-ADUser -Identity $AccountName -Properties *
+
+}catch{
+    # could not get the 0 account, error to log
+    write-error "No existing zero account exists"
+    
+}finally{
+    # Zero account doesnt exist
+    if($zeroaccountname -eq $null){
+
+        # create zero account variables from APRA account details
+        $AccountName = "0" + $checkUsername.SamAccountName
+        $FirstName = $checkUsername.GivenName
+        $Surname = $checkUsername.Surname
+        $Name = $checkUsername.Name + " (Zero)"
+        $UserPrincipalName = "0" + $checkUsername.UserPrincipalName
+
+        # Create a new 0 account user in 'Administrative Accounts' in AD
+    	New-ADUser `
+            -SamAccountName $AccountName `
+            -UserPrincipalName $UserPrincipalName `
+            -Name "$Name" `
+            -GivenName $Firstname `
+            -Surname $Surname `
+            -Enabled $True `
+            -DisplayName "$Name" `
+            -Description "Created By Zero Account creater" `
+            -Path 'OU=Administrative Accounts, dc=internal,dc=*******,dc=gov,dc=au' `
+            -AccountPassword (convertto-securestring "" -AsPlainText -Force) -ChangePasswordAtLogon $True
+
+        [System.Windows.MessageBox]::Show('Zero Account Created for ')
+    }else {
+        # user already exists
+        [System.Windows.MessageBox]::Show('Zero Account Exists for ' + $zeroaccountname.SamAccountName)
+    }
+
+    #Exit
+}