Futura
|
PORTO FERREIRA SP - BRASIL
|
|
Postada em 26/01/2006 16:24 hs
Em uma rotina de atualização, estou recebendo esta mensagem
"contagem de bloqueio de compartilhamento excedida", aumente a entrada de registro Maxlocksperfile" , onde aumento isto ?
|
|
|
|
|
Postada em 27/01/2006 08:56 hs
Private Sub ExecutarConsulta() On Error GoTo final Dim cont As Long DBEngine.SetOption dbMaxLocksPerFile, 200000 cont = 0 Screen.MousePointer = 11 Dim db As DAO.Database Dim Rst As DAO.Recordset (...seu código) (...)
|
|
|
Futura
|
PORTO FERREIRA SP - BRASIL
|
|
Postada em 27/01/2006 13:43 hs
Marcone, mas não é dao é ado.
|
|
|
Futura
|
PORTO FERREIRA SP - BRASIL
|
|
Postada em 28/01/2006 10:18 hs
pessoal, ainda não consegui resolver, se alguem puder ajudar....
|
|
|
|
Postada em 29/01/2006 09:57 hs
Para ADO, basta adaptar o código abaixo: Dim cnn As New ADODB.Connection (...) cnn.Provider = "Microsoft.Jet.OLEDB.4.0;" cnn.Open ".NorthWind.mdb" cnn.Properties("Jet OLEDB:Max Locks Per File") = 300000
Marcone
|
|
|
Futura
|
PORTO FERREIRA SP - BRASIL
|
|
Postada em 30/01/2006 06:58 hs
vealu marcone, zerou. só um comentário, acho que isto não é muito comum de acontecer não é ?, pois esta duvida rola em outro fórum a dias, e ninguém respondeu.
|
|
|