deleting interntet History[Kinda resolved]

[robbedaya]

if I trie this code:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Dim fldr
Set fldr = fso.GetFolder("C:\Documents and Settings\Administrator\Local Settings\geschiedenis\history.IE5")
Dim subFldr
 
For Each subFldr In fldr.subfolders
    MsgBox subFldr
    subFldr.Delete
Next

this error occurs:

Run time Error '70'
permission denied

my folder for my history is "C:\Documents and Settings\Administrator\Local Settings\geschiedenis\history.IE5". I have a dutch version of Win2000.

how can I solve this?

[robbedaya]

If I use the exact same code, but with another folder, it does work

[amitabh]

Actually, the folder contains few sub folders too. You will have to delete files in these folders too.

[robbedaya]

if I only trie to delete the files in the folders/subfolders I get the same error.

[robbedaya]

I think i've solved it myself.

I believe it isn possible because i'm logged in as administrator, when i tried to run it on the history of another user, it does work without problems