Originariamente inviato da alexxxb
Ciao, riprendo questo thread per una domanda collegata: è possibile verificare in apertura che ci sia il collegamento con il db?
Se tolgo il db collegato in apertura mi da tutta una serie di errori, mentre io vorrei evitarli, magari con un controllo che verifichi l'esistenza del db.
Si può fare?
secondo me avresti fatto meglio ad aprire un thread nuovo.

guarda con la guida in linea la Funzione Dir

se invece vuoi verificare che sul db in front end sia presenti tabelle collegate dai un'occhiata a questa routine (la tabella inserita non la devi creare, fa parte di quelle di sistema nascoste da access)
codice:
Dim Rst As DAO.Recordset
Dim sql As String


sql = "SELECT MSYSOBJECTS.* FROM MSYSOBJECTS WHERE (((MSYSOBJECTS.Type)=6))"


    Set Rst = CurrentDb.OpenRecordset(sql) 'apre recorset

    If Not Rst.BOF Then 'se il recordset non è vuoto
        MSGBOX "TABELLE COLLEGATE"

    Else 'Not Rst.BOF (il recorset è vuoto)
        MsgBox "TABELLE NON COLLEGATE"
        
    End If 'Not Rst.BOF
  
  'chiudi e azzera il recordset
        Rst.Close: Set Rst = Nothing