Главная страница
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.017 c
6-93620
johny
2003-11-21 08:36
2004.01.29
Заполнение формы загруженной в webbrowser


6-93607
DelphiN!
2003-11-24 21:53
2004.01.29
Как убрать сообщения об ошибках от TServerSocket и TClientSocket


1-93495
Татьяна
2004-01-19 13:46
2004.01.29
Размер ComboBox-а


1-93532
leonidus
2004-01-17 22:53
2004.01.29
Что значит ошибка I/O error 32 ?


1-93510
Filatov
2004-01-18 18:34
2004.01.29
Как программно узнать путь к папке Windows