Database Search

match allmatch any Look in all areasLook in current areas Check all datesPrevious dayPrevious 3 daysPrevious weekPrevious fortnightPrevious monthPrevious 2 monthsPrevious 3 monthsPrevious half-yearPrevious year

TechHome

File And Folder Extender

• !!NEWS FLASH!!
• !!Simple Search!!
• Box with SrchNext Function Problem
• Dealing File and Directory Names that Contain Non Displayable Characters
• File Searcher requires WITZSRCH DLL
• Generic Searcher Ex to Find a File Recursively
• Get a List of Subfolders
• How to Search for Multiple File Types
• How to Skip a Directory
• Leading Dot in Directory Name
• Locate a Folder
• More than 100 Handles
• Search for Files and then Copy Them
• Search String With Whitepace
• Searcher - How to get Directories only
• Searcher Sort Order
• Searcher Updates Last Access Time
• SrchInit and Exact Matches
• Using SrchInit for 2 FileTypes
• Xcopy Only Newer Files

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Locate a Folder

---

Question:

What is the cleanest way to look for a folder.

Answer:

I would use the File Searcher Extender. Here is some undebugged code that locates all directories named 'temp'.

;Load File Search Extender
AddExtender("WSRCH34I.DLL")
;Display dialog box.
BoxOpen("Directory searcher","")
;Define name of folder to look for
dirname="temp"
;Define the root directory to start the search from
root = 'c:\'
;Initalize search
;Specify a file name you know doesn't exist (i.e. xxxxxxx.xxx)
;Use flags 16:recurse sub-directories and 32:return directory names
handle=SrchInit(root, "xxxxxxx.xxx", "", 0, 16|32)
BoxTitle("Searching %drvroot% for %Dirname%")
While 1
      ;Find the next file.
      hit = SrchNext(handle)
      ;No more files to search give up
      If hit == ""  Then Break
      ;Display dialog box with folder name
      BoxText( "Dirname: " : hit)
      ;Extract out the last folder name in the folder path
      dirnamefound = ItemExtract( ItemCount( hit, "\" )-1, hit, "\" )
      ;See if found folder name matches your folder name
      If StrUpper(dirnamefound)==StrUpper(dirname)
         Message("Found",hit)
      EndIf
EndWhile
SrchFree(handle)

---

Article ID:   W16859

File Created: 2007:07:03:14:26:38

Last Updated: 2007:07:03:14:26:38