Очистка index.dat при помощи DeleteUrlCacheEntry

Необходимо, при помощи DeleteUrlCacheEntry, удалить записи из базы данных Internet Explorer:

\Documents and Settings\...\Local Settings\Temporary Internet Files\Content.IE5\index.dat
\Documents and Settings\...\Cookies\index.dat
\Documents and Settings\...\Local Settings\History\History.IE5\index.dat


Это должна сделать следующая функция

Код (Text):

1. ClearIEdat proc
2.      LOCAL dwsize:DWORD
3.      LOCAL hcache:DWORD
4.      LOCAL cacheentry:INTERNET_CACHE_ENTRY_INFO
5.  
6.      invoke FindFirstUrlCacheEntry,0,addr cacheentry,addr dwsize ; Get
7.      mov    ecx,dwsize                                           ; real
8.      mov    cacheentry.dwStructSize,ecx                          ; size
9.      invoke FindFirstUrlCacheEntry,0,addr cacheentry,addr dwsize
10.      cmp    eax,FALSE
11.      je     @F
12.      mov    hcache,eax
13. .while TRUE
14.      invoke DeleteUrlCacheEntry,addr cacheentry.lpszSourceUrlName
15.      invoke DeleteUrlCacheEntry,addr cacheentry.lpszLocalFileName
16.      mov    dwsize,0
17.      invoke FindNextUrlCacheEntry,hcache,addr cacheentry,addr dwsize ; Get
18.      mov    ecx,dwsize                                               ; real
19.      mov    cacheentry.dwStructSize,ecx                              ; size
20.      invoke FindNextUrlCacheEntry,hcache,addr cacheentry,addr dwsize
21. .endw
22. @@:
23.      invoke FindCloseUrlCache,hcache
24.      ret
25. ClearIEdat endp

После выполнения результат нулевой.
В чем дело?