Pinho
|
PORTO 22 - PORTUGAL
|
|
ENUNCIADA !
|
|
|
Postada em 25/05/2006 12:30 hs
Oi, Tou a fazer um programa com uma base de dados, mas só consigo colocar um computador a aceder a essa base de dados, qd o coloco em rede só o meu é k consegue entrar, e os outros não. Então fui buscar um código que está aqui neste site, para multiusuarios_ADO, mas mesmo assim não consegui coloca-lo em rede, o código do module1 é o seguinte: Public w_con As ADODB.Connection Sub Main() Set w_con = New ADODB.Connection w_con.CursorLocation = adUseClient w_con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "d1.mdb" Form1.Show End Sub Eu para tentar colocar isto a funcionar alterei o código para: Public w_con As ADODB.Connection Sub Main() Set w_con = New ADODB.Connection w_con.CursorLocation = adUseClient w_con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\Pinhofile0371d1.mdb" Form1.Show End Sub Só que continua só o meu computador a conseguir entrar na base de dados, partilhei a pasta e dei autorização a outros pc de poderem alterar os meus ficheiros, mas mesmo assim não consegui. Gostava que me ajudassem nisto, porque tenho que colocar 5 computadores a aceder em simultâneo à base de dados.
Obrigado, Pinho
|
|
|
|
|
Postada em 25/05/2006 13:38 hs
mepeia a unidade do computador onte esta o bancod e dados.. na estação de rede, por exemplo vc mapeou com unidade R ai vc faz w_con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=R:Pinhofile0371md1.mdb"
|
|
|
|
Postada em 25/05/2006 15:19 hs
Acho que o ideal p/evitar problemas principalmente com o usuário é colocar o caminho completo da rede exemplo: w_con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=||Servidor|diretorio|Arquivo"
dsmn
|
|
|
Pinho
|
PORTO 22 - PORTUGAL
|
|
ENUNCIADA !
|
|
|
Postada em 25/05/2006 15:43 hs
Pois, mas no meu computador R:file0371**** funciona mas nos outros depois de ligar a unidade de rede não dá e o ||Pinho|file0371|bd1.mdb também não, e diz-me: Run-time error '713' Class not registered Looking for object with CLSID:{59245250-********} Será que é porque o outro computador não tem visual basic?? Não faço a menor ideia, Precisava mesmo de ajuda
Obrigado, Pinho
|
|
|
Daniel
|
SÃO PAULO SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 25/05/2006 15:52 hs
Voce criou o instalador do sistema? Não esqueça que é com o instalador que será registrado as dlls e ocxs necessárias para poder executar o programa sem erros
dsmn
|
|
|
|
Postada em 25/05/2006 15:58 hs
CNN.CursorLocation = adUseClient 'faz conexao com o banco CNN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sMDB & ";Jet OLEDB:Database" sSQL = "SELECT * FROM TABELA 'retorna registros da tabela RS.Open sSQL, CNN, adOpenDynamic, adLockOptimistic Se as Dll e a OCX, estiverem instalados nos outros, acho que é isto ai. Tipo do cursor. vlu//
|
|
|