WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

File Searcher
plus

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

Example: Search for Files and then FileCopy Them

Keywords:  search and filecopy

BoxOpen("File Finder","Initializing")

AddExtender("wsrch34I.dll")

file="winbatch.exe"
hand=srchInit("C:\",file,"","",16)

c=0

fh=FileOpen("c:\temp\whereitis.txt","WRITE")
dest="c:\temp\junker\"

while 1 
if FileExist(strcat(dest,file)) then FileDelete(strcat(dest,file))
if !DirExist(dest) then DirMake(dest)
a=srchNext(hand)          
  if a=="" then break  
  BoxOpen("Find File", a)
  Message("",a)
  FileCopy(a, dest, @false)
  FileWrite(fh,strcat(a,@crlf))
  c=c+1 
     
   
  
 ;Display(1,c,a)
endwhile

Message("Find Complete",a)
srchFree(hand)  

exit

Article ID:   W12558
Filename:   Search for Files and then Copy Them.txt
File Created: 2001:03:01:15:34:20
Last Updated: 2001:03:01:15:34:20