Scuste ma no ho buona dimestichezza con Access.
Ho creato un db che utilizza una unita di rete che viene utilizzato da piu front end su vari pc della lan.
con il codice qui sotto genero in numero di ricevuta, interrogando la tabella che contiene tutte le vendite, e siccome spesso ni creava problemi generando ricevute con numero a 0 xche non trovava il db in rete, ho inserito il controllo che se il numero di ricevuta è diverso da 1 interrompe l'operazione.
Esiste un metodo piu consono x verificare corretta lettura del file mdb??????
sotto riporto il cod utilizzato
Dim stDocName As String
Dim stDocName1 As String
stDocName = "rptRicevute"
stDocName1 = "QrySelRicevuta"
stDocName3 = "QRYCancellaNoConnessione"
Dim curX As Currency
curX = Nz(DMax("[MaxDiIDRicevuta]", "QMRicevuta", "[AnnoRifRicevuta] = 2020")) + 1
'curX = Nz(DMax("[MaxDiIDRicevuta]", "QMRicevuta", "[AnnoRifRicevuta] =year(now())")) + 1
If curX < 2 Then 'se il numero di ricevuta è 1
MsgBox "Prova di connessione al DB non riuscita"
DoCmd.OpenQuery stDocName3
End If
Grazie 100000000