Differenze tra le versioni di "Identificare un tipo di file dalla sua estensione"
Da Gambas-it.org - Wikipedia.
(Nuova pagina: Mostreremo un possibile algoritmo per identificare un tipo di file fra molti dalla sua estensione. Nell'esempio seguente si cercherà di individuare un file avente estensione ''.avi''...) |
|||
(3 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 1: | Riga 1: | ||
− | + | In via generale per ottenere l'estensione di un file, si utilizza la Proprietà ".Ext" della Classe statica ''File''. | |
− | + | Print File.Ext(<FONT Color=darkgreen>''/percorso/del/file''</font>) | |
− | + | Qualora si voglia identificare un tipo di file fra molti aventi la medesima estensione, si potrà usare il seguente codice di esempio, nel quale si cercherà di individuare un file avente estensione ''.avi'': | |
− | + | Public Sub Main() | |
− | |||
− | Dim | + | Dim s As String |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
+ | <FONT color=gray>' ''Individua e carica nella variabile-array di tipo stringa soltanto i file aventi estensione .avi e poi li mostra:''</font> | ||
+ | For Each s In Dir("<FONT Color=darkgreen>''/percorso/cartella/contenente/i/file''</font>", "*.avi", gb.File) | ||
+ | Print s | ||
Next | Next | ||
− | + | End |
Versione attuale delle 09:37, 19 nov 2023
In via generale per ottenere l'estensione di un file, si utilizza la Proprietà ".Ext" della Classe statica File.
Print File.Ext(/percorso/del/file)
Qualora si voglia identificare un tipo di file fra molti aventi la medesima estensione, si potrà usare il seguente codice di esempio, nel quale si cercherà di individuare un file avente estensione .avi:
Public Sub Main() Dim s As String ' Individua e carica nella variabile-array di tipo stringa soltanto i file aventi estensione .avi e poi li mostra: For Each s In Dir("/percorso/cartella/contenente/i/file", "*.avi", gb.File) Print s Next End