ACESSO AO BANCO

USUARIO.EXCLUIDOS 27/05/2004 16:15:30
#27026
Coloquei meu banco no servidor, como faço para acessa-lo via DAO? Fiz o seguinte codigo, esta correto? Pois ele me diz que o servidor não existe!

Dim bdMat As DAO.Database
Dim Tbloc As DAO.Recordset

Set bdMat = DBEngine.Workspaces(0).OpenDatabase("\\Srv\Estoque\\Materiais.mdb")
Set Tbloc = bdMat.OpenRecordset("Localizacao", dbOpenTable)
VB6MASTER 27/05/2004 21:13:38
#27092
Resposta escolhida
Irenko.
O MAX tem razão existe uma varra a mais em seu código
Set bdMat = DBEngine.Workspaces(0).OpenDatabase("\\Srv\Estoque\\Materiais.mdb") 

Veja, antes de seu banco de dados. Então deveria ficar assim
Set bdMat = DBEngine.Workspaces(0).OpenDatabase("\\Srv\Estoque\Materiais.mdb") 

A idéia dele também é muito boa e evita qualquer erro de digitação, pegando o caminho compleno na barra do explore (selecionando, copiando e colando em seu código.

Boa sorte e t+
Tópico encerrado , respostas não são mais permitidas