DUAS CONEXOES NO DAO

USUARIO.EXCLUIDOS 23/03/2005 06:56:04
#74408
Pessoal, estou com um problema que não consigo solução.
Tenho uma aplicação que utiliza DAO para ocnectar ao banco SQL. Quando abro uma conexão utilizando um usuário User1 funciona perfeitamente, quanto fecho essa conexão e tento abrir uma nova utilizando um User2, ele abre a conexão utilizando o User1....
Ex.:
    Set DbSQL = OpenDatabase("", False, False, dbconnect)

Onde dbconnect = odbc;UID=User1;PWD=Pass1;Database=Banco;DSN=DSNx;LoginTimeOut=20

Até aqui tudo bem... Mas quando fecho essa conexão:
DbSQL.close
set DbSQL = nothing

e tento abrir uma nova:
    Set DbSQL = OpenDatabase("", False, False, dbconnect)

Onde dbconnect = odbc;UID=User2;PWD=Pass2;Database=Banco;DSN=DSNx;LoginTimeOut=20

Percebo que ele continua conectando com o primeiro usuário...

Alguém sabe de alguma solução?
Já agradeço
UNIAO 23/03/2005 07:38:56
#74409
tente fazer a conexão somente com o User2, e verifique se ele fez....
tb verifique se não existe nada definido para pegar o User1
USUARIO.EXCLUIDOS 23/03/2005 08:57:46
#74419
Na verdade preciso fazer a conexão com o User1 primeiro e depois com o User2.
O User1 vai até a base e verifica se o User2 existe e se existir, conecta com o User2... (foi a maneira utilizada ém um módulo de segurança do programa legado aqui da empresa - VB4)
Exemplo do meu problema.:


    dbconnect = "ODBC;UID=User1;PWD=Senha1;DATABASE=MinhaBase;DSN=MeuDSN"
    Set DbSQL = OpenDatabase("", True, False, dbconnect)
    
'debug.Print Workspaces(0).Databases(0).Connect
Debug.Print DbSQL.Connect
....
    DbSQL.Close
    Set DbSQL = Nothing
    
    dbconnect = "ODBC;UID=User2;PWD=Senha2;DATABASE=MinhaBase;DSN=MeuDSN"
    Set DbSQL = OpenDatabase("", False, False, dbconnect)
Debug.Print DbSQL.Connect
'Debug.Print Workspaces(0).Databases(0).Connect

Perceba que a conexão não mudou

O que faço??????

Obs.: [S28] MALDITO VB4 E MALDITO DAO
USUARIO.EXCLUIDOS 28/03/2005 07:02:22
#75240
Alguém?
THIAGO.CESAR 28/03/2005 07:19:49
#75244
Rodrigo, me desculpe se eu falar alguma besteira, mas vou dar um chutão aqui:
Não seria por causa do DSN?
USUARIO.EXCLUIDOS 28/03/2005 09:22:58
#75260
Infelizmente não. Mesmo porquê, o DSN está com um terceiro usuário...
USUARIO.EXCLUIDOS 30/03/2005 06:33:09
#75681
Infelizmente não consegui resposta... Tive que fazer uma "gambearra" para contornar a situação...
Tópico encerrado , respostas não são mais permitidas
Voltar