Se (
IsBlank ( Txt_Nome . Texto ) ||
IsBlank ( Txt_Cargo . Texto ) ||
IsBlank ( Txt_CEP . Texto ) ||
IsBlank ( Txt_Telefone . Texto ) ||
IsBlank ( Drp_Projeto . SelectedText . Value ) ||
IsBlank ( Drp_Gestor . SelectedText . Valor ) ||
IsBlank ( Drp_Departamento . SelectedText . Value ) ,
Notify ( "Preencha todos os campos antes de gerar o texto." , NotificationType.Error ) , // Ação quando a condição é verdadeira
Definir (
Texto gerado,
"Comando para criação de usuário no AD:" & Char ( 10 ) &
"dsadd usuário \" CN = " & Txt_Nome.Text & " ,OU = " & Drp_Departamento.SelectedText.Value & " ,OU = PrimeiraDecisão,DC = primeiradecisão,DC = local\ " " &
"-samid " & Inferior ( Txt_Nome.Text ) & " -display \"" & Txt_Nome.Text & " \ " " &
"-fn \"" & Primeiro(Split(Txt_Nome.Text, " ")).Resultado & " \ " -ln \"" & Último(Split(Txt_Nome.Text, " ")).Resultado & " \ " " &
"-pwd P@ssw0rd -email \"" & Lower(Txt_Nome.Text) & " @firstdecision.local\ " -pwdneverexpires no -mustchpwd no" & Char ( 10 ) &
"get-aduser " & Inferior ( Txt_Nome.Text ) & " | set-aduser -replace @{proxyAddresses=\" SMTP: " & Inferior(Txt_Nome.Text) & " @firstdecision.local\ "};" &
"Departamento=\"" & Drp_Departamento.SelectedText.Value & " \ ";Manager=\"" & Drp_Gestor.SelectedText.Value & " \ ";homePhone=\"" & Txt_Telefone.Text & " \ ";" & Char ( 10 ) &
" = ...
Txt_Nome.Texto & Char ( 10 ) &
"Informações de acesso à rede firstdecision.local" & Char ( 10 ) &
"Usuário: " & Lower ( Txt_Nome.Text ) & Char ( 10 ) &
"Senha: P@ssw0rd" & Char ( 10 ) &
"Domínio: firstdecision.local"
)
)
E estes são os erros:
Caracteres inesperados. Caracteres são usados em fórmula de forma inesperada.
Número inválido de argumentos: 1 recebido, 2 ou mais esperados.
Caracteres inesperados. A fórmula contém 'Error', em que se espera 'ParenClose'.