Som det kører nu er der forbindelse men det kan jo være at forbindelsen til databasen ryger, således at der vil komme fejl og den fejl vil jeg gerne slippe for, hvis du forstår ?
jep! Jeg går ud fra, at du f.eks. vil vide det inden du udføre din forespørgsel!?
Her er et eks:
On error resume next Dim rs as recordset Set rs = currentdb.openrecordset(\"EtTabelnavn\", dbopensnapshot) if Err then msgbox \"Der er ingen forbindelse til databasen!@@kontakt systemadministratoren!\", vbcritical, \"Ingen forbindelse!\" else docmd.openquery \"DinForespørgsel\" endif rs.close Set rs = Nothing
I cant see why its necessary to TEST if the connection exists by FIRST opening some other table. You may just as well react upon an error IF it occurs while trying to run the query.
A connection could go even while running the query, so what have you achieved doing it before?
thomasjepsen >> jeg acceptere dit svar selvom jeg ikke har fået prøvet det af endnu, men jeg regner stærkt med at det virker det som du har forslået mig :)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.