AJUDA ERRO UNLOAD

BRESSAN 13/08/2009 14:44:38
#319773
Pessoal Boa Tarde!

Estou com um problema que não consigo resolver, o pior é que já estou no final do projeto.

criei um modulo onde vai verificar se o usuario tem permissão para acessar o form.
pois bem até ai tudo bem, mais eu chamo alguns form[ô]s em vbmodal e a verificação de permissão está dentro dos forms no load.
           
If Acesso(Me.Name) = False Then
            MsgBox [Ô]Acesso Negado.[Ô] & vbCrLf & _
                    [Ô]Talves você não tenha previlegios para acessar este modulo[Ô], vbInformation, [Ô]Acesso Negado[Ô]
            Unload me
        End If

só que ele dá um erro estranho.
Run Time errror [ô]364[ô]
object was unloaded
e fica tentando abrir o form novamente....como posso resolver este problema.

Att,
Marcelo Bressan
ROBIU 13/08/2009 15:20:40
#319780
Por que você não verifica se há permissão e só da o show se houver? No lugar que você pede para abrir o form, coloca assim: 

 If Acesso(Me.Name) = False Then
            MsgBox [Ô]Acesso Negado.[Ô] & vbCrLf & _
                    [Ô]Talves você não tenha previlegios para acessar este modulo[Ô], vbInformation, [Ô]Acesso Negado[Ô]
        else
             NomeDoForm.Sow 1
        End If


Da forma que está fazendo, não funciona nem com Load Form. Está tentando fechar o forme antes de ele abrir.
Tópico encerrado , respostas não são mais permitidas
Voltar