🚀 go-pugleaf

Ciao, Gattuso!
hai scritto 421b0a50$0$6307$5fc30a8@news.tiscali.it
Tue, 22 Feb 2005 11:33:08 +0100:

 >Vorrei sapere se in visual basic 6 esiste  una funzione
 >che mi permette di richiamare in automatico una finestra di scelta file,


 >Esempio:

 >Dim szFile as string

 >szFile = BoxSelectFile("c:\temp\",*.cnc)<<< "*.cnc" !!!


 >Qualcosa del genere dove in szFile mi venga ritornato il nome del file selezionato.

con un poco di fantasia....

aggiungi un *controllo commondialog* sul form
copia la nuova(?!?) funzione BoxSelectFile
nel codice del form

'
private function BoxSelectFile(spath$, sestensione$) as string
on error goto gesterr
dim retf$

with commondialog
    .filename=""
    .initdir=spath
    .filter="file ("& sestensione &")|" & sestensione
    .flags=cdlofnfilemustexist or cdlofnhidereadonly
    .cancelerror=true
    .showopen
    retf=.filename
    '.filetitle contiene solo il nome del file, senza percorso
end witj

gesterr:
'se e' stato scelto annulla o altro err, la function restituisce ""
err.clear
BoxSelectFile=retf
end function
'

 >Ciao e Grazie

p.s.
non giochi piu' a pallone? :)

Cordialita', ~Incoming.