[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

Function Create_User
{
$samaccountname = $Surname_textbox.Text + $Intitial_textbox.Text
$displayname = ("$FN $SN")
$password = "Thursday.1" | Convert-ToSecureString -AsPlainText -Force
$FN = $firstname_textbox.Text
$SN = $Surname_textbox.Text
$IN = $Intitial_textbox.text
$LC = $Location_textbox.Text
$JT = $JobTitle_textbox.Text
$mu = $MirrorUser_textbox.Text
$HomeDriveCheckbox.checked
$HomeDrive = 'H:'
$userroot = 'C:\test\'
$HomeDirectory= $userroot+ $samaccountname
$HomeDirectory2 = $HomeDirectory + "\Documents"
$email = $DropdownOptions.SelectedItem

    Get-ADUser -identity $samaccountname
    If ($samaccountname -eq $true)
    {

    }

    New-ADUser -Name "$FN $SN" -UserPrincipalName "$Samaccountname@test.local" -SamAccountName $samaccountname -GivenName $FN -Surname $SN -DisplayName "$FN $SN" -Office $LC -ChangePasswordAtLogon $true -Title $JT -AccountPassword $password -Enabled $true -EmailAddress "$FN.$SN$email"
    $members = Get-ADUser -Identity $mu -Properties Memberof | Select-object -ExpandProperty Memberof | Get-ADGroup -Properties name
    foreach ($group in $members)
    {
    Add-ADGroupMember -Identity $group.name -Members $samaccountname
    }
    If ($HomeDriveCheckbox.checked -eq $true)
    {
    New-Item $userroot -Name $samaccountname -ItemType Directory
    $rights = [System.Security.AccessControl.FileSystemRights]::Read -bor [System.Security.AccessControl.FileSystemRights]::Write -bor [System.Security.AccessControl.FileSystemRights]::Modify -bor [System.Security.AccessControl.FileSystemRights]::FullControl
    $inherit = [System.Security.AccessControl.InheritanceFlags]::ContainerInherit -bor [System.Security.AccessControl.InheritanceFlags]::ObjectInherit
    $propagation = [System.Security.AccessControl.PropagationFlags]::None
    $access = [System.Security.AccessControl.AccessControlType]::Allow
    $accessrule = New-Object System.Security.AccessControl.FileSystemAccessRule("$samaccountname",$rights,$inherit,$propagation,$access)
    $acl = Get-Acl $HomeDirectory
    $acl.AddAccessRule($accessrule)
    $account = New-Object System.Security.Principal.NTAccount($samaccountname)
    $acl.SetOwner("builtin\Administrator")
    $acl.SetAccessRule($accessrule)
    Set-Acl $HomeDirectory $acl
    New-item $HomeDirectory -Name "Documents" -ItemType Directory
    Set-ADUser -Identity $samaccountname -HomeDrive $HomeDrive -HomeDirectory $HomeDirectory2
    }
}
$textboxsize = New-Object System.Drawing.Size (85,8)
$labelsize = New-Object System.Drawing.Size(65,15)

$NewStarterForm = New-Object System.Windows.Forms.Form
    $NewStarterForm.Text = "New Start Form"
    $NewStarterForm.Size = New-Object System.Drawing.Size(300,500)
    $NewStarterForm.FormBorderStyle = "FixedDialog"
    $NewStarterForm.TopMost = $true
    $NewStarterForm.MaximizeBox = $false
    $NewStarterForm.MinimizeBox = $false
    $NewStarterForm.ControlBox = $true
    $NewStarterForm.KeyPreview = $True
    $NewStarterForm.StartPosition = "CenterScreen"
    $NewStarterForm.Font = "Segoe UI"

#firstname Label
$FirstName_NewStarterForm = New-Object System.Windows.Forms.Label
    $FirstName_NewStarterForm.Location = New-Object System.Drawing.Size(8,8)
    $FirstName_NewStarterForm.Size = $labelsize
    $FirstName_NewStarterForm.TextAlign = "TopLeft"
    $FirstName_NewStarterForm.Text = "First Name :"
    $NewStarterForm.Controls.Add($FirstName_NewStarterForm)
#firstname textbox
    $firstname_textbox = New-Object System.Windows.Forms.TextBox
    $firstname_textbox.Location = New-Object System.Drawing.Size (85,8)
    $firstname_textbox.Size = $textboxsize
    $firstname_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($firstname_textbox)

    #Initial Label
$Intial_NewStarterForm = New-Object System.Windows.Forms.Label
    $Intial_NewStarterForm.Location = New-Object System.Drawing.Size(175,40)
    $Intial_NewStarterForm.Size = New-Object System.Drawing.Size(25,32)
    $Intial_NewStarterForm.TextAlign = "TopLeft"
    $Intial_NewStarterForm.Text = "In:"
    $NewStarterForm.Controls.Add($Intial_NewStarterForm)

#Initial textbox
$Intitial_textbox = New-Object System.Windows.Forms.TextBox
    $Intitial_textbox.Location = New-Object System.Drawing.Size (200,40)
    $Intitial_textbox.Size = $textboxsize
    $Intitial_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($Intitial_textbox)

#Surname Label
$Surname_NewStarterForm = New-Object System.Windows.Forms.Label
    $Surname_NewStarterForm.Location = New-Object System.Drawing.Size(10,44)
    $Surname_NewStarterForm.Size = $labelsize
    $Surname_NewStarterForm.TextAlign = "MiddleLeft"
    $Surname_NewStarterForm.Text = "Surname:"
    $NewStarterForm.Controls.Add($Surname_NewStarterForm)

#Surname textbox
$Surname_textbox = New-Object System.Windows.Forms.TextBox
    $Surname_textbox.Location = New-Object System.Drawing.Size (85,40)
    $Surname_textbox.Size = $textboxsize
    $Surname_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($Surname_textbox)

#Location Label
$Location_NewStarterForm = New-Object System.Windows.Forms.Label
    $Location_NewStarterForm.Location = New-Object System.Drawing.Size(10,75)
    $Location_NewStarterForm.Size = $labelsize
    $Location_NewStarterForm.TextAlign = "BottomLeft"
    $Location_NewStarterForm.Text = "Location:"
    $NewStarterForm.Controls.Add($Location_NewStarterForm)

#Location textbox
$Location_textbox = New-Object System.Windows.Forms.TextBox
    $Location_textbox.Location = New-Object System.Drawing.Size (85,70)
    $Location_textbox.Size = $textboxsize
    $Location_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($Location_textbox)

#Job Title Label
$JobTitle_NewStarterForm = New-Object System.Windows.Forms.Label
    $JobTitle_NewStarterForm.Location = New-Object System.Drawing.Size(10,105)
    $JobTitle_NewStarterForm.Size = $labelsize
    $JobTitle_NewStarterForm.TextAlign = "BottomLeft"
    $JobTitle_NewStarterForm.Text = "Job Title:"
    $NewStarterForm.Controls.Add($JobTitle_NewStarterForm)

#Job Title textbox
$JobTitle_textbox = New-Object System.Windows.Forms.TextBox
    $JobTitle_textbox.Location = New-Object System.Drawing.Size (85,100)
    $JobTitle_textbox.Size = $textboxsize
    $JobTitle_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($JobTitle_textbox)

##HomeDrive Checkbox
$HomeDriveCheckbox = New-Object System.Windows.Forms.CheckBox
    $HomeDriveCheckbox.Location = New-Object System.Drawing.Size(250,75)
    $HomeDriveCheckbox.Size = New-Object System.Drawing.Size(20,20)
    $HomeDriveCheckbox.TabIndex = 4
    $NewStarterForm.Controls.Add($HomeDriveCheckbox)

#HomeDrive Label
$HomeDriveLabel = New-Object System.Windows.Forms.Label
    $HomeDriveLabel.Location = New-Object System.Drawing.Size (175,75)
    $HomeDriveLabel.Size = New-Object System.Drawing.Size(75,15)
    $HomeDriveLabel.Text ="Home Drive ?"
    $NewStarterForm.Controls.Add($HomeDriveLabel)

#Dropdown Label
$DropdownLabel = New-Object System.Windows.Forms.Label
    $DropdownLabel.Location = New-Object System.Drawing.Size(10,125)
    $DropdownLabel.Size = New-Object System.Drawing.Size(250,15)
    $DropdownLabel.TextAlign = "BottomLeft"
    $DropdownLabel.Text = "Please pick OPS code from the list below:"
    $NewStarterForm.Controls.Add($DropdownLabel)




#Dropdown Options
$DropdownOptions = New-Object System.Windows.Forms.ListBox
    $DropdownOptions.Location = New-Object System.Drawing.Size(10,145)
    $DropdownOptions.Size = New-Object System.Drawing.Size(250,35)
    [void] $DropdownOptions.Items.Add('@test1.co.uk')
    [void] $DropdownOptions.Items.Add('@test2.co.uk')
    [void] $DropdownOptions.Items.Add('@test3.co.uk')
    [void] $DropdownOptions.Items.Add('@test4.co.uk')
    [void] $DropdownOptions.Items.Add('@test5.co.uk')
    [void] $DropdownOptions.Items.Add('@test6.co.uk')
        $NewStarterForm.Controls.Add($DropdownOptions)



#Mirror Label
$MirrorUser_NewStarterForm = New-Object System.Windows.Forms.Label
    $MirrorUser_NewStarterForm.Location = New-Object System.Drawing.Size(10,180)
    $MirrorUser_NewStarterForm.Size = $labelsize
    $MirrorUser_NewStarterForm.TextAlign = "BottomLeft"
    $MirrorUser_NewStarterForm.Text = "Mirror User:"
    $NewStarterForm.Controls.Add($MirrorUser_NewStarterForm)

#Mirror textbox
$MirrorUser_textbox = New-Object System.Windows.Forms.TextBox
    $MirrorUser_textbox.Location = New-Object System.Drawing.Size (85,175)
    $MirrorUser_textbox.Size = $textboxsize
    $MirrorUser_textbox.TextAlign = "Left"
    $NewStarterForm.Controls.Add($MirrorUser_textbox)

#CreateUser Button
$CreateUser_Button = New-Object System.Windows.Forms.Button
    $CreateUser_Button.Location = New-Object System.Drawing.Size(180,205)
    $CreateUser_Button.Size = New-Object System.Drawing.Size(80,20)
    $CreateUser_Button.Text = "Create User"
    $CreateUser_Button.add_click({Create_User})
    $NewStarterForm.Controls.Add($CreateUser_Button)
#HomeDrive Creation

#Return Results + show form
$NewStarterForm.Add_Shown({$NewStarterForm.Activate()})
$result = $NewStarterForm.ShowDialog()
return
$FN = $firstname_textbox.Text,  $SN = $Surname_textbox.Text,  $IN = $Intitial_textbox.text,  $LC = $Location_textbox.Text,  $JT = $JobTitle_textbox.Text