I do not believe you can disable the All Files option with either PUTFILE(), GETFILE() or LOCFILE()
You could errortrap the result with:-
lcFile = GETFILE([DBF],[Browse DBF],[Browse],1,[Browse a DBF])
IF UPPE(JUSTEXT(lcFile)) # [DBF]
[tab]MESSAGEBOX...
ELSE
[tab]* code
ENDIF
Chris
You might have to right your own dialog box. Use ADIR() and the list control perhaps... it would be a real pain though. You can probably find a freeware one out there.. Perhaps at
If you use the MS Common Dialog ActiveX control, this is suppose to be an option. Just set the Flags property to cdlOFNFileMustExist (4096). It should display a warning to the user if they input a file that does not exist on disk.
Refer to the CommonDialog control in the VB help or search the MSDN for more info. Jon Hawkins
jonscott8@yahoo.com
The World Is Headed For Mutiny,
When All We Want Is Unity. - Creed
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.