Очистка КЕША

← →
Kullibin (2004-05-24 14:30) [0]

Здравствуйте мастера. Подскажите, черз какую WinApi функцию можно очистить кеш Internet Explorera?

← →
Anatoly Podgoretsky © (2004-05-24 14:43) [1]

Смотри функции WinInet

← →
Kullibin (2004-05-24 15:08) [2]

А по конкретней можно?

← →
Sanek_metaller © (2004-05-24 16:18) [3]

Возможно я не прав,и это не ф-я,но можно просто удалить все файлы из Temporary Internet Files.

← →
Dimaxx (2004-05-24 23:08) [4]

Очистка кэша в IE..

Прислал:
Gua (Simferopol) (06 мая 2002 г.)
©
Тестировано:
Nikolay, 30 мая 2002 г.

Зависимости:
WinInet
[0]

Исходный текст:
{ **** UBPFD *********** by delphibase.endimus.com ****
>> Очистка кэша в IE.

Зависимости:
WinInet
Автор: Gua, fbsdd@ukr.net, ICQ:141585495, Simferopol
Copyright:
Дата: 06 мая 2002 г.
***************************************************** }

Procedure EmptyIECache;
Var
lpEntryInfo : PInternetCacheEntryInfo;
hCacheDir : LongWord;
dwEntrySize : LongWord;
dwLastError : LongWord;
Begin
dwEntrySize := 0;
FindFirstUrlCacheEntry( NIL, TInternetCacheEntryInfo( NIL^ ), dwEntrySize );
GetMem( lpEntryInfo, dwEntrySize );
hCacheDir := FindFirstUrlCacheEntry( NIL, lpEntryInfo^, dwEntrySize );
If ( hCacheDir <> 0 ) Then
DeleteUrlCacheEntry( lpEntryInfo^.lpszSourceUrlName );
FreeMem( lpEntryInfo );
Repeat
dwEntrySize := 0;
FindNextUrlCacheEntry( hCacheDir, TInternetCacheEntryInfo( NIL^ ), dwEntrySize );
dwLastError := GetLastError();
If ( GetLastError = ERROR_INSUFFICIENT_BUFFER ) Then Begin
GetMem( lpEntryInfo, dwEntrySize );
If ( FindNextUrlCacheEntry( hCacheDir, lpEntryInfo^, dwEntrySize ) ) Then
DeleteUrlCache Entry( lpEntryInfo^.lpszSourceUrlName );
FreeMem(lpEntryInfo);
End;
Until ( dwLastError = ERROR_NO_MORE_ITEMS );
End;

← →
kullibin (2004-06-07 16:19) [5]

А как нибудь одной функцией все это сделать нет? Или IE что-то подобное делает (сам)

← →
Dimaxx (2004-06-07 20:33) [6]

Одной функцией невозможно.

Очистка КЕША Найти похожие ветки