File Search

[Garrett19212]

How can I make it so it searches the whole computer for a file? And if it finds it, it deletes it?

I tried FileFindFirstFile but I can't get it to work right.

[GaryFrost]

Search in Scripts and Scraps, there's a few FileSearch UDF's there that should do the job.

[Garrett19212]

I couldn't find anything that looks like that I need, or atleast it doesn't look what I need.

Im new to AU3 so still learning what everything does.

I have a txt file, with a filename on each line.

And I have a loop which sets the next line to a variable, which the FileFindFirstFile set to search for the variable. But its not working, i made a file with the exact name of what I want it so look for, but it doesn't find it.

How can I make it search the whole C: drive, for the file?

[therks]

You could do something like this (I'm not at home and cannot test this, so bear in mind I may have written a function name wrong or something):

$resultFile = 'c:\SearchResults.txt'
$file = 'stupidfile.exe'
RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)
If FileSize($resultFile) = 0 Then
   MsgBox(0, 'File Not Found', 'File Not Found')
Else
   $searchResults = FileRead($resultFile, FileSize($resultFile))
EndIf

Give it a try.

[Garrett19212]

Seems to work, changed filesize to filegetsize and im not getting any errors so.

How would I make it so that if it finds something it deletes it?

[Garrett19212]

bump^

[blindwig]

Seems to work, changed filesize to filegetsize and im not getting any errors so.

How would I make it so that if it finds something it deletes it?

<{POST_SNAPBACK}>

Have you tried FileDelete()?

[Garrett19212]

what would i put for it though, since the file isnt in the folder where the script?

Ill try FileDelete($file) and see what happens.

[Garrett19212]

Nope, i made it search for a file called 4096, and i made a file called 4096 and put it on my desktop and it didn't delete it.

[Brona]

I added the following to the script and it appears to work:

$file = FileOpen($resultFile, 0)
While 1
    $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
    FileDelete($line)
Wend

FileClose($file)
;FileDelete($resultFile)

[Garrett19212]

$resultFile = 'c:\SearchResults.txt'

$file = 'stupidfile.exe'

RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)

If FileSize($resultFile) = 0 Then

MsgBox(0, 'File Not Found', 'File Not Found')

Else

$searchResults = FileRead($resultFile, FileSize($resultFile))

EndIf

$file = FileOpen($resultFile, 0)

While 1

$line = FileReadLine($file)

If @error = -1 Then ExitLoop

FileDelete($line)

Wend

FileClose($file)

;FileDelete($resultFile)

Like that?

Is the ; suppose to be by the filedelete

[blindwig]

You could do something like this (I'm not at home and cannot test this, so bear in mind I may have written a function name wrong or something):

$resultFile = 'c:\SearchResults.txt'
$file = 'stupidfile.exe'
RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)
If FileSize($resultFile) = 0 Then
   MsgBox(0, 'File Not Found', 'File Not Found')
Else
   $searchResults = FileRead($resultFile, FileSize($resultFile))
EndIf

Give it a try.

<{POST_SNAPBACK}>

You probably want to start the search at the root of the drive:

RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)

[blindwig]

Since you're just shelling out to run the DIR command, why even bother with autoit? Why not just write a batch file?

RecursiveDelete.Bat:

FOR /F "tokens=*" %%A in ('DIR "\%~1" /s/b') do DEL %%A

Then call it like this:

RecursiveDelete FileName.Ext

it will also work for wildcards.

EDIT: Oh, I forgot to mention - this method won't work on Windows 9x or WindowsNT 4 or earlier. I don't know about ME.

Edited July 11, 2005 by blindwig

[Garrett19212]

I would like to do it in Autoit.

$resultFile = 'c:\SearchResults.txt'

$file = 'stupidfile.exe'

RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)

If GetFileSize($resultFile) = 0 Then

MsgBox(0, 'File Not Found', 'File Not Found')

Else

$searchResults = FileRead($resultFile, GetFileSize($resultFile))

EndIf

How would I make that, delete the files it finds?

[Brona]

Like that?

Is the ; suppose to be by the filedelete

<{POST_SNAPBACK}>

That last ; I put in just in case you did not want to delete the 'SearchResults.txt' file when you are done ... I did on mine as not to leave any files behind when done running the script. Edited July 11, 2005 by Brona

[blindwig]

I would like to do it in Autoit.

Then take out the RunWait line and use FileFindFirstFile. Look at the example in the help file, it shows you exactly how to loop through the files, matched by a mask.

$resultFile = 'c:\SearchResults.txt'

$file = 'stupidfile.exe'

RunWait(@ComSpec & ' /c dir "' & $file & '" /b/s > "' & $resultFile & '"', 'C:\', @SW_HIDE)

If GetFileSize($resultFile) = 0 Then

  MsgBox(0, 'File Not Found', 'File Not Found')

Else

  $searchResults = FileRead($resultFile, GetFileSize($resultFile))

EndIf

How would I make that, delete the files it finds?

The files that it finds will be listed in the $resultFile, so go through that file and delete each file entry. Use FileOpen, FileReadLine, and FileClose, to use the file.