Article ID: 113808
Article Last Modified on 2/12/2007
*
*
SET STATUS OFF && SET STATUS BAR OFF in FoxPro for Windows
fyl = GETFILE('DBF','Choose a table:')
USE (fyl)
LIST STRUCTURE
USE
ACCEPT 'Enter field list, separated by commas (or ENTER for all):' ;
TO flds
IF EMPTY(flds)
flds='*'
ENDIF
?
ACCEPT 'Enter conditions (or ENTER for none) ' TO cond
IF EMPTY(cond)
cond=''
ELSE
cond='WHERE '+cond
ENDIF
SELECT &flds FROM (fyl) &cond INTO CURSOR query NOCONSOLE
IF _TALLY>0
BROWSE
ELSE
WAIT WINDOW 'No matching records found...'
ENDIF
Additional query words: VFoxWin FoxMac FoxDos FoxWin null blank
Keywords: kbcode KB113808