Find the tool called tempman, I don't remember the origin, but it's great!
+__________________________________________+ "There are two major products that come out of Berkeley: LSD and [Unix] BSD. We don't believe this to be a coincidence." -Jeremy S. Anderson Kevin M. Flanagan C/S Planning Engineer III IT Systems Implementation Branch Banking & Trust 3261 Atlantic Ave Suite 116 Raleigh, NC 27604 919-716-6209 > -----Original Message----- > From: Jasper Smith [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, December 19, 2001 3:44 PM > To: MSWinNT Discussions > Subject: Re: NT file find > > > I don't know of a utility but you can use FSO (File Scripting > Object) in a vb script file to do this > > e.g. (please don't try this anywhere important its just an > example off the top of my head) > > Dim folderpath,old,yesno,fso,fldr,files,i > > folderpath = Inputbox("Please Enter Folder Path") > old = Inputbox("Delete files older than this date") > > yesno = Msgbox("Are you sure ?",4,"delete.vbs") > > If (yesno<>6) Then > WScript.Quit > End If > > set fso=WScript.CreateObject("Scripting.FileSystemObject") > If (fso.FolderExists(folderpath)) Then > > set fldr=fso.GetFolder(folderpath) > set files = fldr.Files > > For each f in files > > If (DateDiff("d",old,f.DateLastModified) < 0) Then > f.Delete True > i=i+1 > End If > > Next > > If (i>0) Then > Msgbox(i & " files deleted !") > WScript.Quit > Else > Msgbox("No files to delete !") > WScript.Quit > End If > > Else > > Msgbox("Folder not found [" & folderpath & "]") > WScript.Quit > End If > > > ----- Original Message ----- > From: "Craig Manske" <[EMAIL PROTECTED]> > To: "MSWinNT Discussions" <[EMAIL PROTECTED]> > Sent: Wednesday, December 19, 2001 6:43 PM > Subject: NT file find > > > > I'm looking for something similar to Unix find for NT. > What I want to > > do > is > > search through a directory for files older then a certain date and > > delete them. Anyone know of such a utility without > installing one of > > those Unix shells for NT? > > > > -cm > > > > > > ------ > > You are subscribed as [EMAIL PROTECTED] > > Archives: http://www.swynk.com/sitesearch/search.asp > > To unsubscribe send a blank email to > > [EMAIL PROTECTED] > > > > ------ > You are subscribed as [EMAIL PROTECTED] > Archives: http://www.swynk.com/sitesearch/search.asp > To unsubscribe send a blank email to > [EMAIL PROTECTED] > ------ You are subscribed as [email protected] Archives: http://www.swynk.com/sitesearch/search.asp To unsubscribe send a blank email to [EMAIL PROTECTED]
