Differenze tra le versioni di "Copiare un file utilizzando gli oggetti DirView e FileView"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per copiare un file da una Cartella ad un'altra utilizzando gli oggetti ''DirView'' e ''FileView'' possiamo adottare un codice essenziale come il seguente: '''Public''' Sub F...") |
|||
Riga 1: | Riga 1: | ||
Per copiare un file da una Cartella ad un'altra utilizzando gli oggetti ''DirView'' e ''FileView'' possiamo adottare un codice essenziale come il seguente: | Per copiare un file da una Cartella ad un'altra utilizzando gli oggetti ''DirView'' e ''FileView'' possiamo adottare un codice essenziale come il seguente: | ||
− | + | Public Sub Form_Open() | |
<FONT Color=gray>' ''Mostra in "DirView" l'intero albero del file system:''</font> | <FONT Color=gray>' ''Mostra in "DirView" l'intero albero del file system:''</font> | ||
− | + | DirView1.Root = "/" | |
− | + | End | |
− | + | Public Sub DirView1_Click() | |
<FONT Color=gray>' ''Consente la visualizzazione in "FileView" dei file contnuti dalla cartella selezionata:''</font> | <FONT Color=gray>' ''Consente la visualizzazione in "FileView" dei file contnuti dalla cartella selezionata:''</font> | ||
− | + | FileView1.Dir = DirView1.Current | |
− | + | End | |
− | + | Public Sub FileView1_Click() | |
<FONT Color=gray>' ''Effettua nella cartella prescelta la copia del file selezionato:''</font> | <FONT Color=gray>' ''Effettua nella cartella prescelta la copia del file selezionato:''</font> | ||
− | + | Copy DirView1.Current &/ FileView1.Current To "<FONT Color=gray>''/percorso/della/cartella/ove/copiare/il/file''</font>" &/ FileView1.Current | |
− | + | End |
Versione attuale delle 14:32, 12 ott 2023
Per copiare un file da una Cartella ad un'altra utilizzando gli oggetti DirView e FileView possiamo adottare un codice essenziale come il seguente:
Public Sub Form_Open() ' Mostra in "DirView" l'intero albero del file system: DirView1.Root = "/" End Public Sub DirView1_Click() ' Consente la visualizzazione in "FileView" dei file contnuti dalla cartella selezionata: FileView1.Dir = DirView1.Current End Public Sub FileView1_Click() ' Effettua nella cartella prescelta la copia del file selezionato: Copy DirView1.Current &/ FileView1.Current To "/percorso/della/cartella/ove/copiare/il/file" &/ FileView1.Current End