MS Access 2003 ODBC Call Failed

Have you tried reading data from db2 without using the schedulere form? If so does it work?

Are you using a timer in the form? If so then maybe you should disable it when you start reading data from dB2 then activate when finished.

Hi Terry

Everything works with and without the scheduler form, until I leave it alone for a couple hours and then it drops all ODBC connections. There is a timer in the form, but it's only refreshing in between "jobs".

I did however find a nice solution myself though (sorry hehe), I've made a module that activates before each update and deletes all ODBC linked tables and recreates the link. That will hopefully do the trick.

Hej
Nu kan jeg godt se du har lukket spørgsmålet, men jeg vil lige dele mine erfaringer alligevel.
Jeg undgår helst linkede tabeller, det kører meget ustabilt - istedet bruger jeg 'pass through' forespørgsler (videregivelse). Det virker utroligt stabilt fordi sql'en bliver sendt direkte til serveren.
Jeg bruger 2 forespørgsler Q_select og Q_action som jeg har et lille modul der ændre sql fra mine forms her et eksempel med Q_Select.

Public Function QrySelect(sSql As String ) As DAO.Recordset

    Dim q As DAO.QueryDef
    Dim rs As DAO.Recordset
    Set q = CurrentDb.QueryDefs("Q_Select")
    'OdbcConString er en global variabel
    q.Connect = "ODBC;" & OdbcConString
   
    q.sql = sSql
    'Debug.Print q.Connect
   
    Set rs = q.OpenRecordset
    Set QrySelect = rs
    q.Connect = "ODBC;"
    q.Close
    Set q = Nothing
End Function

Mine database kører noget mere stabilt efter jeg har implementeret ovenstående både med MSSQL, MYSQL og en enkelt DB2.

mvh Niels

Hej Niels,

mange tak for dit input, det ser ret interessant ud.

Jeg var nok for hurtig til at lukke spørgsmålet, for det viser sig jeg er ikke nået et skridt videre. Jeg får stadig Run-time error '3146' ODBC Call failed.

Selvom jeg har et modul der sletter samtlige linkede ODBC tabeller og genopretter dem, så virker det altså stadig ikke. Det er ikke fordi maskinen mister netværksforbindelsen, jeg har haft en RDP connection til den de sidste 36 timer uden problemer.

Som jeg skrev i spørgsmålet, så har jeg sørget for at ODBC-Timeout står som standard til 0, både for databasen og samtlige forespørgsler og VBA scripts.

Jeg kan ikke se nogen grund til at det ikke virker og det irreterer mig helt vildt :-)

Hej
Når ODBC timeout = 0 får du (eller ihvertfald burde du) ikke få 'timeout error', men du er vel heller ikke sikker på at det er en 'timeout'.
'ODBC Call failed' kan dække over flere errors i din connection. Jeg googlede lidt:
http://support.microsoft.com/kb/161288

Niels

Yes, det har du helt ret i, jeg har også her til morgen udvidet min error handling lidt, så jeg får alle bagvedligende fejl frem. Håber det virker, ellers er jeg en smule lost :-)

Koden jeg bruger er som følger, burde ha' samme effekt som den du linkede:

Dim objErr As ErrObject
On Error GoTo Err_Form_Timer

Bla bla bla kode..........

Exit_Form_Timer:
Exit Sub

Err_Form_Timer:
Select Case Err
    Case 3146 To 3299
        For Each objErr In DBEngine.Errors
            MsgBox objErr.Description
        Next
    Case Else
        MsgBox Err.Description
End Select

så må vi håbe du får en mere sigende error message

Niels