Delete Prefetch files

[keypuncher]

Well somewhere I am making a mistake in this code.

This is just a small part of a script I am trying to put together that will among other things delete all the files in the Windows\Prefetch directory.

On the system I am experimenting with the Prefetch directory is not located on the C drive, nor is the Windows directory.

It happens to be on the "I" drive

However it can be located by simply typing in "prefetch" in the command line.

I want this to be able to work on most other Windows based systems though wherever Prefetch is located.

I beleive I am making a simple mistake as the script runs fine, no errors, however the files are not deleted.

Kindly help point out my mistakes please.

This obviously is after a msgbox response affirms continuation.

If $answer = 1 then
    $path = @WindowsDir & '\Prefetch'
    $handle_search = FileFindFirstFile($path & '\*.*')
    If $handle_search <> -1 Then
        $folder = FileFindNextFile($handle_search)
        If Not @error Then
            Filedelete($path & '\' & $folder & '\*.*')
        EndIf
        FileClose($handle_search)
        SoundPlay(@WindowsDir & "\media\chimes.wav",1)
    EndIf
EndIf

[rasim]

Try this:

If $answer = 1 then
    $path = @WindowsDir & '\Prefetch'
    $handle_search = FileFindFirstFile($path & '\*.*')
    
    If $handle_search <> -1 Then
        While 1
            $folder = FileFindNextFile($handle_search)
            If @error Then ExitLoop
            Filedelete($path & '\' & $folder)
        WEnd
        FileClose($handle_search)
        SoundPlay(@WindowsDir & "\media\chimes.wav",1)
    EndIf
EndIfoÝ÷ Ùhr{-y§lj'¡×§¢Ö޺ǭ+¡×ºÚ"µÍYÙ]Ú^J[H   ÝÈ[[Q[]J[ [È ][ÝÉÌLÊ][ÝÊ