home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast.iso
/
pcmag
/
vol12n08.zip
/
WINCMD.ZIP
/
SEARCH.WCM
< prev
next >
Wrap
Text File
|
1993-04-07
|
991b
|
31 lines
===================================================================
//---------------------------------------------------------
// WinCmd program that uses file manager to
// search a disk for a set of files.
//---------------------------------------------------------
//
// Ask user for file spec. Default to all files
//
ans = AskBox ("Enter the file name to look for", "*.*")
//
// If user pressed the Cancel button, quit
//
if ans+a == a
exit
//
// If the file manager isn't running, start it
//
if (AppActivate ("File Manager") = 0)
winfile
//
// Send keys to File Manager to search disk.
//
sendkeys ("%-n") //Minimize directory tree window
sendkeys ("%fh") //Open file search dialog
sendkeys (ans) //Enter file spec
sendkeys ("{tab}") //Tab to directory window
sendkeys ("c:\") //Enter hard drive root
sendkeys ("{enter}") //Start search
sendkeys ("%-x") //Maximize search results window
exit