tempi di attesa operazioni ADODB (vb6)

[gaullo]

Ciao a tutti
Sto utilizzando delle connessioni adodb per oprire e operare sulle mie tabelle (access).
In alcune circostanze effettuo + query sulle stesse tabelle
A questo punto, effettuata una operazione, chiudo la queri e successivamente apro l'altra (sulla stessa tabella).
Ma sulla mia macchina (600Mhz) la chiusura di un recorset è + lenta rispetto a il mio codice che gli fa aprire l'altro recordset.
Gli errori visualizzati sono

'-2147217887 (80040e21)': ODBC driver does not support the requested properties.

oppure

'-2147467259 (8004005)': [Microsoft][ODBC Microsoft Access Driver] Could not save; currently locked by another user.

Eseguendo lo stesso programma su un computer a 2Ghz non viene segnalato nessun errore: è normale???
come posso aggirare questo problema di lentezza nella chiusura, oppure se apro il secondo recordset in sola lettura, non dovrebbe consentirmi di aprire + volte la stessa tabella???
I recordset li apro :

'inizio pagina
Dim numagg As New ADODB.Recordset

'nelle procedure
Set numagg = Nothing
numagg.Open "numeriaggiuntivi", conn, 1, 1

A, il primo recordset che impiega troppo tempo a chiudersi è un altro (sempre aodb), dove però apro la stessa tabella (con una query)

[DeBe99]

A volte problemi di sincronismo possono essere dati dalle connsessioni. Usi sempre lo stesso oggetto connection o lo chiudi e ricrei tra un recordset e l'altro?

[gaullo]

per la connessione al db la apro all'avvio del programma e la mantengo fissa (la dichiaro in un module come public) utilizzando poi sempre lei....

'nel module
Public conn As ADODB.Connection

'nella prima form del programma
Set conn = New ADODB.Connection
conn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & App.Path & "\db.mdb"
conn.Open

[DeBe99]

Prova a postare un po di codice di dove apri i recordset...

[gaullo]

aspe che lo pulisco lasciando 1 sola tabella...

[gaullo]

Private Sub Form_Load()
query4 = "SELECT apparatiusati.idlinea, apparaticonnessi.Apparato, Linea.idcentralino FROM Linea " & _
"INNER JOIN (apparaticonnessi INNER JOIN apparatiusati ON apparaticonnessi.idapparato = apparatiusati.idapparato) " & _
"ON Linea.idlinea = apparatiusati.idlinea;"

appusati.Open query4, conn, 3, 3
end sub

Private Sub carica()

appusati.Requery
appusati.MoveFirst
Do While Not appusati.EOF
   If appusati("idlinea") = linea("idlinea") Then
      List2.AddItem (appusati("apparato"))
      If appusati("apparato") = "Centralino" Then
         List2.ItemData(List2.NewIndex) = appusati("idcentralino")
         Frame6.Enabled = True
        Else
         List2.ItemData(List2.NewIndex) = 0
         Frame6.Enabled = True
      End If
   End If
   appusati.MoveNext
Loop

end sub

Private Sub Salva_Click()
Set generica = Nothing
generica.Open "apparatiusati", conn, 3, 3
Do While Not generica.EOF
   If generica("idlinea") = linea("idlinea") Then
      If generica("idapparato") = 1 Then
         linea("idcentralino") = 0
      End If
      generica.Delete
      generica.Update
   End If
   generica.MoveNext
Loop
If List2.ListCount > 0 Then
   For i = 0 To List2.ListCount - 1
       List2.ListIndex = i
       If List2.text = "Centralino" Then
          If centralino.EOF = True And centralino.BOF = True Then
             MsgBox ("Attenzione, non è presente in memoria nessun centralino! Prima di poter selezionare il centralino bisogna inserirlo")
             Exit Sub
            Else
             linea("idcentralino") = centralino("idcentralino")
          End If
       End If
       generica.AddNew
       generica("idlinea") = linea("idlinea")
       generica("idapparato") = List2.ItemData(List2.ListIndex)
       generica.Update
   Next
   generica.Close
End If
end sub

La sub carica la uso nel form_load e dopo aver salvato...

[gaullo]

quando, dopo aver salvato, richiamo carica...mi mostra l'errore nel comando "appusati.Requery" dicendo appunto '-2147467259 (8004005)': [Microsoft][ODBC Microsoft Access Driver] Could not save; currently locked by another user.

[DeBe99]

Alposto di requery prova a chiudere e riaprire il recordset

[gaullo]

a dimenticavo...è solo un problema di tempi...se infatti clicco su debug e poi "rilancio il codice" non da + nessun errore perchè a quel punto mi e stato realmente "liberata" la tabella apparatiusati.
Tra l'altro nella sub salva "completa", riutilizzo il recordset generica (come dice il nome) per aprire altre tabelle e query.
Quindi presumo sia un problema del odbc che è "lento" nel disconnettersi dalla tabella (ripeto che su un pc + veloce e in rari casi anche con il mio, il problema non sussiste).
Volevo sapere come si fa da codice a mettere un controllo per , nel caso la tabella sia occupata...di aspettare finchè non si libera

[gaullo]

diciamo che per il momento ho risolto aprendo il primo recordset "appusati" in sola lettura (che mi consente di aprire la stessa tabella quante volte voglio).
Però mi interesserebbe lo stesso approfondire la questione....
Potrebbe accadermi di dover aprire la stessa tabella + volte in lettura/scrittura, e magari senza nemmeno saperlo, il mio applicativo potrebbe crashare con computer un po' lenti (nemmeno troppo visto che uso un 600MHz)