Recuperare oggetti Access eliminati

Question

Ciao,

vorrei poter recuperare oggetti erroneamente eliminati in un .Accdb. (2007 o superiore).

Mimmo

Answer 1

Ciao Karl e Mauro,

dagli articoli consigliati mi sembra di capire che **solo l'undo (Ctrl+z)**immediato dopo l'eliminazione, consenta il recupero degli oggetti.

Personalmente, nel 2010, ho trovato che il seguente codice recupera tabelle eliminate purchè non sia stato chiuso o compattato il Db.

Sub RecuperaOggetti()

    Dim myDb As Database

    Dim myTd As TableDefs

    Dim i As Integer

    Set myDb = CurrentDb

    Set myTd = myDb.TableDefs

    For i = 0 To myTd.Count - 1

        If myTd.Item(i).Attributes = 1 Then

           myTd.Item(i).Name = "Tabella_" & Format(i + 1, "000")

           myTd.Item(i).Attributes = 0

           Debug.Print "<<< " & myTd.Item(i).Name & " >>> - Recuperata"

        End If

    Next i

    myDb.Close

    Set myTd = Nothing

    Set myDb = Nothing

End Sub

Speravo fosse possibile qualcosa di simile anche su altri oggetti.

Grazie Mimmo

Answer 2

Ciao Mimmo,

http://www.donkarl.com/it?FAQ1.16

Answer 3

Ciao,

vorrei poter recuperare oggetti erroneamente eliminati in un .Accdb. (2007 o superiore).

Mimmo

Ciao Domenico. Quali oggetti? Il db è già stato chiuso?