Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Scusa, ma hai provato ad verificare passo-passo con il debug?
Questo browser non è più supportato.
Esegui l'aggiornamento a Microsoft Edge per sfruttare i vantaggi di funzionalità più recenti, aggiornamenti della sicurezza e supporto tecnico.
Ciao,
facendo una ricerca in rete sono riuscito ad adattare il seguente codice per creare il backup del database.
In un modulo:
Declare PtrSafe Function apiCopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
Sub CopyFile(SourceFile As String, DestFile As String)
'---------------------------------------------------------------
' PURPOSE: Copy a file in use on disk from one location to another.
' ACCEPTS: The name of the source file and destination file.
' RETURNS: Nothing
'---------------------------------------------------------------
Dim Result As Long
If Dir(SourceFile) = "" Then
MsgBox Chr(34) & SourceFile & Chr(34) & _
" is not valid file name."
Else
Result = apiCopyFile(SourceFile, DestFile, False)
End If
End Sub
In un pulsante:
Call CopyFile(CurrentProject.Path & "\Database.mdb", CurrentProject.Path & "\CopiaDatabase.mdb")
Quello che a me servirebbe, è creare ad ogni click del pulsante un backup nuovo, cioè che non si vada a sovrapporre a quello già esistente.
Ad esempio CopiaDatabase1, CopiaDatabase2, CopiaDatabase3 ecc...
Vladimiro
Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.
Scusa, ma hai provato ad verificare passo-passo con il debug?
Nemmeno io so cosa dirti.
Il database l'ho creato da zero. L'unica cosa che posso suggerirti è di fare il debug, aggiungere una routine di gestione degli errori e vedere cosa contengono le variabili con i nomi dei DB e controllare che non esca per motivi strani.
Credo di averla usata almeno in 40 applicazioni, impossibile che non funzioni.
Ok grazie comunque.
Vladimiro
Nemmeno io so cosa dirti.
Il database l'ho creato da zero. L'unica cosa che posso suggerirti è di fare il debug, aggiungere una routine di gestione degli errori e vedere cosa contengono le variabili con i nomi dei DB e controllare che non esca per motivi strani.
Credo di averla usata almeno in 40 applicazioni, impossibile che non funzioni.
Ciao Francesco,
se non c'è nulla da modificare o da inserire nel database scaricato, siamo sempre allo stesso punto.
Quella che vedi è la cartella del download con altre due cartelle inserite come nel tuo esempio.
Le cartelle restano vuote, il database rilasciato viene sovrascritto non tenendo conto sia del nome che della data del backup.
Bho!!!
Vladimiro
Creato il database e copiato in una directory di OneDrive, questo è il link: https://1drv.ms/u/s!ArhAJKUQ4PQ0g9Rqr6Yg4BeoZ1PFrA
Questa la struttura della directory di progetto
Questo il risultato di due bkp successivi a distanza di qualche secondo