dialog-box get-file don't just open a directory

[nebuchadnezar]

I use this syntax:

DEF VAR i AS LOG NO-UNDO.

/* Öffnet Durchsuchen */
i = NO.
SYSTEM-DIALOG GET-FILE w-exp
TITLE "Datei Einlesen"
FILTERS "Word Datei (*.doc)":U "*.doc":U, "Word Datei (*.dot)":U "*.dot":U, "Alle Datein (*.*)":U "*.*":U
MUST-EXIST
USE-FILENAME
UPDATE i.
IF i THEN w-filename:SCREEN-VALUE IN FRAME {&FRAME-NAME} = w-exp.

It works, but is not wot I need!
With this syntax, it's possible to open a File... But I need to open a directory.
So, now for example the retur-value is "C:\WINNT\test.doc"
but i just need the return-value "C:\WINNT\".

Is there somebody hwo can help me?
Tenks...

 

[AdzDaz]

Have a look at this site:

http://www.global-shared.com/api/index.htm

look for BrowseForFolder.


The above site is shows how to access the windows API from progress.