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()
+
  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 = "/"
+
  DirView1.Root = "/"
 
    
 
    
  '''End'''
+
  End
 
    
 
    
 
    
 
    
  '''Public''' Sub DirView1_Click()
+
  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
+
  FileView1.Dir = DirView1.Current
 
    
 
    
  '''End'''
+
  End
 
   
 
   
 
   
 
   
  '''Public''' Sub FileView1_Click()
+
  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
+
  Copy DirView1.Current &/ FileView1.Current To "<FONT Color=gray>''/percorso/della/cartella/ove/copiare/il/file''</font>" &/ FileView1.Current
 
    
 
    
  '''End'''
+
  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