Usando Ado

[Guest - Robinson -]

Boas..

Gostaria de solicitar um help sobre abertura de conexão ADO.

Eu tenho uma aplicação feita em VB6 e Access, nessa eu conecto assim:

Public Sub pubConectar()

On Error GoTo Erro

Set conn = New ADODB.Connection
conn.ConnectionTimeout = 0
conn.Open "Estoque", "", ""
conn.CursorLocation = adUseClient
Exit Sub

Erro:

Call prvTrataErro: Screen.MousePointer = 0

End Sub

O problema que estou tendo é que essa aplicação é usada simultaneamente por vários usuários, e devido a isso estou tendo um erro com a seguinte mensagem "Arquivo já está em uso", creio eu que quem chega primeiro trava e pronto!!Eu gostaria de fazer uma conexão específica para "consulta" e outra para ser usada apenas na hora de "inserir, atualizar, excluir", alguém pode-me auxiliar!! Muito grato..

[ViniciusJau]

cara cria um arquivo de conexão e fecha as outras conexões....

verifica também se você não está com o BD aberto na hora que você tenta acessar ele via aplicativos ou paginas sei lá o q você tá usando ai....