[VB.net-WinAPP] - Slow Internet Cache

[zubair1]

Hi,

    Public Sub FindInternetCache()
        Dim cacheDir As String = Environment.GetFolderPath(Environment.SpecialFolder.InternetCache)
 
        Dim cacheFiles As ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetFiles(cacheDir, FileIO.SearchOption.SearchAllSubDirectories, "*.*")
 
 
        Dim fCounter As Integer = 0
        Dim fSize As Double
 
 
        For Each cacheFound As String In cacheFiles
            fCounter = fCounter + 1
 
 
        DisplayBox.Text &= Environment.NewLine
        DisplayBox.Text &= "Found: " & cacheFound & Environment.NewLine
 
 
            fSize += My.Computer.FileSystem.GetFileInfo(cacheFound).Length
        Next
 
 
        DisplayBox.Text &= Environment.NewLine
        DisplayBox.Text &= "IE Temporary Internet Files Found " & "(" & fCounter & " Files) " & SetBytes(fSize) & Environment.NewLine
 
 
    End Sub
 

I am using the above function to Output all the files in the Temporary Internet Files folder - its working alright. But its very slow and also hangs.

I was wondering if theres a better method to do this.

Thank you
Regards

[Plater]

Is it faster if you use the the .NET Directory.GetFi les() function and not that strange Computer.FileSy stem call?

[zubair1]

Is it faster if you use the the .NET Directory.GetFi les() function and not that strange Computer.FileSy stem call?

it seems to be the same

i used it like this to find all files

Directory.GetFiles(cacheDir, "*.*", SearchOption.AllDirectories)

:(

[Curtis Rutland]

Try using the DirectoryInfo object. See if that is any faster.

[zubair1]

Try using the DirectoryInfo object. See if that is any faster.

Oops, sorry i forgot about this :(

I tried the directoryInfo object with no help.

:(

[Plater]

Well the temporary internet cache is usually PACKED with files... I have over 3k in mine right now.
It takes IE quiet a long time to flush the cache as well.

Also, why are you doing this??
fCounter = fCounter + 1

Why not just say fCounter=cacheF iles.Length after the loop (or before it, it does not matter

[zubair1]

Well the temporary internet cache is usually PACKED with files... I have over 3k in mine right now.
It takes IE quiet a long time to flush the cache as well.

Also, why are you doing this??
fCounter = fCounter + 1

Why not just say fCounter=cacheF iles.Length after the loop (or before it, it does not matter

Hi,

it has alot of files but i've seen many apps made in VB and C# that shows all the cache files to the end user but works perfectly fine :(

yeah, i learned that very late about using .length =P

but i still use fCounter to determine how many files were deleted.
i also removed that thinking maybe it could be slowing down :( but that didn't help either :(

:(

[Plater]

Well I just implented it and I can tell you that its the string concatination that is killing you. I re-wrote it to use a StringBuilder object instead of just concatinating text to the texbox.
Here is the last line (I am not pasting in the Found: lines since there is alot):
IE Temporary Internet Files Found (10492 Files) 203080648

It took .8 seconds. Now granted that time was recorded after the whole thing had been searched durring testing, so it was all indexed for faster searching, but it wasn't too much longer.

So consider making your function return a string value (from a stringbuilder) rather then working directly with a textbox.

[zubair1]

Well I just implented it and I can tell you that its the string concatination that is killing you. I re-wrote it to use a StringBuilder object instead of just concatinating text to the texbox.
Here is the last line (I am not pasting in the Found: lines since there is alot):
IE Temporary Internet Files Found (10492 Files) 203080648

It took .8 seconds. Now granted that time was recorded after the whole thing had been searched durring testing, so it was all indexed for faster searching, but it wasn't too much longer.

So consider making your function return a string value (from a stringbuilder) rather then working directly with a textbox.

Hi,

WoW - i was having a doubt that it might be something with the way of outputing the results but i'm still not sure how you did it :(

Is it possible for you to paste the code please =(

Would really appreciate that

Regards

[Plater]

Well you are aware that string concatination is a degrading effect right? (I only recenlty learned just how BAD it gets)
Everytime you do a &= (or += in c#), it recreates the entire string. So as your string gets longer, it takes more and more time. With a StringBuilder, it does not re-create the string, it does what you would think the &= does, just append things to the end of the string.

I wrote my code in C#, but you could probably see what the changes where:

private string FindInternetCache()
{
    DateTime Start = DateTime.Now;//Only used for timing
    StringBuilder retval = new StringBuilder("");
    int fCounter = 0;
    double fSize = 0.0;
    string cacheDir = "";
 
    cacheDir= Environment.GetFolderPath(Environment.SpecialFolder.InternetCache);
    DirectoryInfo di = new DirectoryInfo(cacheDir);
    FileInfo[] cacheFiles=di.GetFiles("*.*", SearchOption.AllDirectories);
 
    foreach (FileInfo cacheFound in cacheFiles)
    {
        fCounter = fCounter + 1;
        fSize += cacheFound.Length;
        retval.AppendFormat("Found: {0}\r\n", cacheFound.FullName);
    }
    retval.AppendFormat("\r\nIE Temporary Internet Files Found ({0} Files) {1}\r\n", fCounter, fSize);
    DateTime End = DateTime.Now;//Only used for timing
    TimeSpan t = (End - Start);//Only used for timing
 
    return retval.ToString();
}