Come per assicurarsi che un file è stato copiato in VB6

November 8

Come per assicurarsi che un file è stato copiato in VB6


Creare, modificare, spostare, copiare e cancellare sono azioni comuni eseguite in un programma che elabora i file. Le applicazioni possono ricevere un file da qualsiasi fonte esterna, come e-mail o in un'altra applicazione, leggere attraverso il file ed eseguire un certo tipo di azione, come l'inserimento di tali informazioni in un database e quindi spostare o copiare il file in una posizione diversa, che indica che il file è già stato elaborato. Il sistema operativo Windows ha un API built-in per la gestione di tutte le suddette funzioni di file-elaborazione.

istruzione

1 Creare un nuovo progetto EXE standard in Visual Basic. Aggiungere Microsoft Scripting Runtime al progetto selezionando "Progetto", "Riferimenti", "Microsoft Scripting Runtime" e "OK" per salvare e chiudere la schermata.

2 Creare un nuovo oggetto FileScripting dichiarando una variabile di tipo "Scripting.FileScriptingObject." Il codice dovrebbe essere simile a:

Dim oFile come nuovo Scripting.FileScriptingObject

Questa riga di codice definirà la variabile denominata "oFile" e creare l'oggetto che può essere fatto riferimento nel codice da seguire.

3 Determinare se il file esiste codificando "oFile.FileExists (filepath)" dove "percorsofile" è il nome completo e il percorso del file. Il risultato di questa funzione è vera o falsa. Se il risultato è vero, allora il file esiste ed è possibile continuare con la funzione di copia. Tuttavia, se il file non esiste, è necessario codificare un certo tipo di gestione degli errori.

4 Copiare il file specificato nella variabile "filepath" in una nuova posizione codificando questa linea "oFile.CopyFile filepath, newloc" dove "newloc" è il percorso nella nuova posizione. Un esempio della nuova posizione sarebbe "C: \ CopiedFiles" o "D: \ Backup." Il nome del file rimarrà lo stesso all'interno della nuova cartella.

5 Verificare che il file è stato copiato da sempre utilizzando il metodo "FileExists". Per verificare che il file specificato nella variabile "percorsofile" ha ottenuto copiato nella posizione specificata nella variabile "newloc", assicurarsi di aver salvato il nome del file individuo a una variabile indipendente. Ad esempio, il "oFile.FileExists (newloc & filename)" codice restituirà TRUE se il nome del file in "nomefile" è stato copiato con successo nella nuova cartella.