Problema em script q fiz

[D@rk]

Bom dia,

Gostaria que analisassem o script abaixo.

Eu quero o seguinte, após logar na tela de login, se for escolhido o usuário "administrador", habilite a opção no menu (um botão), só que não sei porque ele já cai diretamente no Else, ele já entra desabilitado. Tem algo de errado no script abaixo?

Obg,

Private Sub Form_Open(Cancel As Integer)

If Me.xUso = "administrador" Then

Me.Comando20.Enabled = True

Else

Me.Comando20.Enabled = False

End If

End Sub

[MrMALJ]

Talvez o critério da comparação esteja preciso, talvez em vez de texto o valor possa ser numerico. Verfica e retorna.

[Humm]

só uma questao..

a rotina que voce criou acontece antes do form abrir..

se o form ainda não abriu, como voce quer testar um campo dentro dele?

outra é que.. se for um form de varios registros.. esse campo me.xuso pode estar em branco.

o correto ai é usar a função dlookup que vai pesquisar o valor de xuso diretamente na tabela, e não no form, sacou?

ou se voce ta querendo pesquisar esse valor de outro form, especifique o form usando forms!campo.value

exemplo:

if dlookup("[xuso]", "tabela ou consulta que contem esse valor") = "administrador" then

outra é que a metodologia que voce ta usando no seu algoritimo vai te gerar problemas mais tarde.

campos de referencia, usa-se sempre numeros para indexa-los..

ou seja, você atribui um numero para cada nivel de usuario..

de uma pesquisada aqui que eu postei um exemplo de sistema de LOGIN

[D@rk]

MrMALJ e Humm,

O sistema de LOGIN, foi feito pelo MrMALJ, não sei se ele lembra....

o xUso é um objeto não acoplado referenciado a tabela de login....

eu uso um outro objeto não acoplado referenciado de outra tabela na hora de dar os comprimentos "bom dia" "boa tarde"... e funciona referencialmente ao login digitado sem problemas... pra esse script é que ele não funciona.

O que acontece, o script até funciona, mas o if de cara da False, e cai no caso do Else, ai ele desabilita sempre.... é como se eu nunca logasse como administrador .... :(

Vou tentar alterar no if com a condição que você postou acima Humm.... mas por enq consegui não.

Abração a vocês,

[MrMALJ]

Fera tenta inverter a lógica do IF pra ver se continua pegando o mesmo valor, ou então posta pra gente poder analisar.