operazione su file e directory

[allegfede]

per estrarre da un file la sua directory mi verrebbe da fare cosi':

dim oggettofile as file
dim cartella as string

set oggettofile.path=percorso da un dialog.openfile

cartella = oggettofile.getparentdirecory

... in gambas?

[pastrank]

... in gambas?

file.dir(nomefile)

[vuott]

...e quindi, integrando, se usi la finestra di dialogo per scegliere il file:

Codice: gambas [Seleziona]

Public Sub Button1_Click()

  Dim s As String

    If Dialog.OpenFile() Then Return

    s = File.Dir(Dialog.Path)

    Print s

End

[allegfede]

Dengiu ( Thank you) grazie ;-)