Powershell GUI / 表单 - 不创建 Active Directory 帐户

Powershell GUI / Forms - Not creating Active Directory account

我不太擅长给东西起标题,所以首先,如果标题有点随意,请见谅。

我正在构建一个 Powershell GUI 脚本以便轻松创建 Active Directory 用户,但是当我提交它时并没有创建帐户。

我已经尝试重新定义变量并重写实际的用户创建脚本。

我没有包括所有位置,因为它会使代码更长,但下面是所有相关代码。

希望各位大神帮帮忙!

Function Display-UserCreation {
    $PasswordValue = "Annodata" + [system.web.security.membership]::GeneratePassword(9, 2)
    $Password = ConvertTo-SecureString $PasswordValue -AsPlainText -Force

    $DisplayName = $UCFirstNameParam + " " + $UCsurNameParam
    $Mail = $UCFirstNameParam + "." + $UCsurNameParam + "@" + "annodata.co.uk"
    $MailAlias = $UCFirstNameParam + "." + $UCsurNameParam + "@" + $DNSRoot2

    $SInitial = $UCsurNameParam[0]
    $Initial = $UCFirstNameParam[0]
    $SAMAccountName = $UCFirstNameParam + "." + $UCsurNameParam
    $SAMAccountLower = $SAMAccountName.ToLower()
    $UserPrincipalName = $UCFirstNameParam + "." + $UCsurNameParam

    $defaultname = $SAMAccountName
    $email = $UCFirstNameParam + "." + $UCsurNameParam
    $i = 1

    While ((Get-ADUser -Filter "SamAccountName -eq '$SAMAccountName'" -ErrorAction SilentlyContinue) -ne $null) {
        $SamAccountName = $defaultname + [string]$i 
        $Mail = $email + [string]$i + "@" + "annodata.co.uk"
        $i++
    }

    if ( $UCLocationParam -EQ 'Bracknell' ) {
        $NewUserParams = @{
            path                  = "OU=Bracknell,OU=Sites,DC=annodata,DC=co,DC=uk"
            SamAccountName        = $SAMAccountName
            Name                  = $SAMAccountName
            DisplayName           = $DisplayName
            GivenName             = $UCFirstNameParam
            Surname               = $UCsurNameParam
            EmailAddress          = $Mail
            UserPrincipalName     = "$SAMAccountName@annodata.co.uk"
            Description           = $UCRoleParam
            ChangePasswordAtLogon = $true
            PasswordNeverExpires  = $false
            AccountPassword       = $password
            Enabled               = $true
        }
        New-ADUser @NewUserParams -ErrorAction SilentlyContinue

        Set-ADAccountPassword -Identity $SAMAccountName -Reset -NewPassword (ConvertTo-SecureString -AsPlainText $Password -Force)
    }
}

Function UCSubmit {
    if ([System.Windows.Forms.MessageBox]::Show("Please Confirm That The Details Are Correct. If they are, click ok", "Confirmation", [System.Windows.Forms.MessageBoxButtons]::OkCancel) -eq "Ok") {

        $UCFirstNameParamLong = New-Object System.Windows.Forms.Label
        $UCFirstNameParamLong.Text = $UCFirstName.Text
        $UCFirstNameParamLong.Location = New-Object System.Drawing.Point(180, 100)
        $UCFirstNameParamLong.AutoSize = $true
        $UCFirstNameParamLong.Font = 'Georgia,10'

        $UCSurnameParamLong = New-Object System.Windows.Forms.Label
        $UCSurnameParamLong.Text = $UCSurname.Text
        $UCSurnameParamLong.Location = New-Object System.Drawing.Point(180, 150)
        $UCSurnameParamLong.AutoSize = $true
        $UCSurnameParamLong.Font = 'Georgia,10'

        $UCRoleParamLong = New-Object System.Windows.Forms.Label
        $UCRoleParamLong.Text = $UCRole.Text
        $UCRoleParamLong.Location = New-Object System.Drawing.Point(180, 200)
        $UCRoleParamLong.AutoSize = $true
        $UCRoleParamLong.Font = 'Georgia,10'

        $UCLocationParamLong = New-Object System.Windows.Forms.Label
        $UCLocationParamLong.Text = $UCSiteSelection.Text
        $UCLocationParamLong.Location = New-Object System.Drawing.Point(180, 250)
        $UCLocationParamLong.AutoSize = $true
        $UCLocationParamLong.Font = 'Georgia,10'

        $UCFirstNameParam = $UCFirstNameParamLong.Text
        $UCSurnameParam = $UCSurnameParamLong.Text
        $UCRoleParam = $UCRoleParamLong.Text
        $UCLocationParam = $UCLocationParamLong.Text

        Display-UserCreation
    }
}

仅供大家以后参考。

看起来它一开始并没有导航到创建函数。

问题解决后,运行 就不是 IF 了。 我不得不更改 IF 的参数。

在那之后,由于某些原因密码没有生成,密码的复杂性不够。

我现在改了这个,一切都解决了。