Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: guglielmofede - 01 Giugno 2010, 14:36:37

Titolo: [RISOLTO] TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 01 Giugno 2010, 14:36:37
SALVE,

con la riga che segue creo una tabella di file con estensione JPG.

ListaFileDestro = Dir(nomeDirectoryDestro, "*.JPG").Sort(gb.Ascent)

Se volessi nella tabella anche i file con estensione FLV come si fa?

A Presto.............
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: Ceskho - 01 Giugno 2010, 15:30:33
Siccome non posso provare dovresti tentare con questa modifica:

Codice: [Seleziona]
ListaFileDestro = Dir(nomeDirectoryDestro, "*.JPG" OR "*.FLV").Sort(gb.Ascent)

Oppure con

Codice: [Seleziona]
ListaFileDestro = Dir(nomeDirectoryDestro, "*.JPG").Sort(gb.Ascent)
ListaFileDestro &= Dir(nomeDirectoryDestro, "*.FLV").Sort(gb.Ascent)
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 01 Giugno 2010, 16:04:51
SALVE,

eccoti i messaggi di errori:
(http://www.gambas-it.org/home/pannello01/Scrivania/seconda soluzione.png)

[img/home/pannello01/Scrivania/seconda soluzione.png[/img]

A Presto...........
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 01 Giugno 2010, 16:12:09
 riprovo..........

eccoti i messaggi di errore:

(http://www.gambas-it.org/home/pannello01/Scrivania/prima soluzione.jpg)

(http://www.gambas-it.org/home/pannello01/Scrivania/seconda soluzione.jpg)

A Presto............
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 01 Giugno 2010, 16:32:49
allego i file visto che non sono riuscito a incollare le immagini..... non so il perchè.......

Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 01 Giugno 2010, 16:34:44
non so dove ho la testa oggi...............
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: milio - 01 Giugno 2010, 19:00:07
ListaFileDestro = Dir(nomeDirectoryDestro, "*.JPG").Sort(gb.Ascent)
ListaFileDestro.Insert(Dir(nomeDirectoryDestro, "*.FLV").Sort(gb.Ascent))
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 02 Giugno 2010, 17:15:21
SALVE,

la soluzione funziona.
Ma come faccio a fare ordinare tutta la tabella?
Mi spiego meglio:
nella soluzione anzidetta ordina gli elementi *.JPG e li scrive in tabella, ordina gli elementi *.FLV e li scrive in tabella accodandoli a quelli presenti.
Quello che voglio avere è avere tutti i file ordinati alfabeticamente a prescindere dall'estensione.
Come faccio a fare ordinare la tabella risultante ?

A Presto............

Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 02 Giugno 2010, 17:19:23
SALVE,

ho voluto provare e ci sono riuscito:
Codice: [Seleziona]
PUBLIC SUB CaricaListaCentrale()
  ListaFileCentrale = Dir(nomeDirectoryCentrale, "*.JPG").Sort(gb.Ascent)
  ListaFileCentrale.Insert(Dir(nomeDirectoryCentrale, "*.FLV").Sort(gb.Ascent))
  ListaFileCentrale = ListaFileCentrale.Sort(gb.Ascent)
  QuantitaFileCentrale = ListaFileCentrale.Count
END

Cosa ne dite può andare ?

A Presto..............
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: Ceskho - 02 Giugno 2010, 17:20:56
Citazione da: guglielmofede - 02 Giugno 2010, 17:19:23
SALVE,

ho voluto provare e ci sono riuscito:
Codice: [Seleziona]
PUBLIC SUB CaricaListaCentrale()
  ListaFileCentrale = Dir(nomeDirectoryCentrale, "*.JPG").Sort(gb.Ascent)
  ListaFileCentrale.Insert(Dir(nomeDirectoryCentrale, "*.FLV").Sort(gb.Ascent))
  ListaFileCentrale = ListaFileCentrale.Sort(gb.Ascent)
  QuantitaFileCentrale = ListaFileCentrale.Count
END

Cosa ne dite può andare ?

A Presto..............

E lo chiedi a noi? La cosa importante è che funzioni per te.... ;)
Titolo: Re: TABELLA FILE ESTENSIONE JPG e FLV ?
Inserito da: guglielmofede - 02 Giugno 2010, 17:28:09
SALVE,

il tutto FUNZIONA !

Chiedevo se la soluzione è elegante o se c'è nè una più sintetica.
Ribadisco il fatto che sono alle prime armi con GAMBAS  e un occhio esperto può fare tanto.....

A Presto...........