Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.29;
Скачать: CL | DM;

Вниз

Файлы из кеша IE   Найти похожие ветки 

 
Sam Stone ©   (2003-11-12 19:36) [0]

Как программно узнать, с какого сайта закеширован выбранный файл?


 
Vorobyev Sergey ©   (2003-11-13 10:43) [1]

http://www.risingresearch.com/ru/icache/
Может это пригодиться..


 
Sam Stone ©   (2003-11-13 17:02) [2]

Не пригодилось.
Я вот чего нашел:

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
DeleteUrlCacheEntry( lpEntryInfo^.lpszSourceUrlName );
FreeMem(lpEntryInfo);
End;
Until ( dwLastError = ERROR_NO_MORE_ITEMS );
End;

Так что тему можно закрыть........



Страницы: 1 вся ветка

Текущий архив: 2004.01.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
14-93688
hooky-mars
2004-01-06 17:27
2004.01.29
Помагите!


1-93458
Taras
2004-01-16 09:54
2004.01.29
Как перезапустить мое приложение?


1-93518
Pantera111
2004-01-18 17:12
2004.01.29
Запуск моей программы через


14-93668
Kair
2004-01-09 12:05
2004.01.29
Метод градиента


3-93353
uu
2004-01-02 18:39
2004.01.29
Paradox ---> Interbase