Tcppwebbrowser и cookies

@Flyer · Регистрация: 21.05.2010

Студворк — интернет-сервис помощи студентам

Собственно хочу почистить куки определенного сайта, но не удалением файлов. Погугли, но ничего толкового не нашел. Надеюсь на помощь

@DefineTrueFalse · 20.01.2012, 18:50

Проверь тогда вариант с окнами, если помогает, нужно пролистать исходный код компонента и найти (пусть и protected) функцию, отвечающую за инициализацию. Если не поможет, то все печально и нужно искать стронний компонент.

@Flyer · 03.04.2012, 16:32 **[ТС]**

Вот нашел решение, может кому надо будет

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
void ClearCookies(UnicodeString User, UnicodeString URL) {
TSearchRec searchResult;
TStringList *fl = new TStringList();
TStringList *fc = new TStringList();
int i, j, pos;
if(FindFirst("C:\\Users\\" + User +
    "\\AppData\\Roaming\\Microsoft\\Windows\\Cookies\\*.txt", faAnyFile,
    searchResult)==0);
fl->Add(searchResult.Name);
while (FindNext(searchResult) == 0) {
    fl->Add(searchResult.Name);
}
FindClose(searchResult);
for (i = 0; i < fl->Count; i++) {
    fc->LoadFromFile("C:\\Users\\" + User +
        "\\AppData\\Roaming\\Microsoft\\Windows\\Cookies\\" + fl->Strings[i]);
    for (j = 0; j < fc->Count; j++) {
        pos = fc->Strings[j].Pos(URL);
        if (pos != 0) {
            DeleteFileW(L"C:\\Users\\" + User +
                "\\AppData\\Roaming\\Microsoft\\Windows\\Cookies\\" +
                fl->Strings[i]);
            break;
        }
    }
 
}
fl->Clear();
DeleteUrlCacheEntryW(("http://"+URL).w_str());
DeleteUrlCacheEntryW(("http://www."+URL).w_str());    }

C++
1
2
ClearCookies(L"текущий юзер компа", L"домен");
 InternetSetOption(0, INTERNET_OPTION_END_BROWSER_SESSION, 0, 0);

В проект нужно заинклудить то ли urlmon.lib то ли wininet.lib или обе :P не помню

@BRcr · 03.04.2012, 20:05

Надеюсь, никто не против маленькой оптимизации.

То же самое, только посимпатишнее:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
void ClearCookies( String _path, String _url, bool _end_browser_session = true ) {
    TSearchRec search_res;
    TStringList *cookfile_slst = new TStringList( );
    do {
        if ( search_res.Name.IsEmpty( ) ) {
            if ( FindFirst( _path + "*.txt", faAnyFile, search_res ) ) {
                return;
            }
        }
        cookfile_slst->LoadFromFile( _path + search_res.Name );
        for ( int i = cookfile_slst->Count - 1; i >= 0; i-- ) {
            if ( cookfile_slst->Strings[i].Pos( _url ) ) {
                DeleteFile( _path + search_res.Name );
                break;
            }
        }
    } while ( !FindNext( search_res ) );
    FindClose( search_res );
    delete cookfile_slst;
    DeleteUrlCacheEntryW( ( "http://" + _url ).w_str( ) );
    DeleteUrlCacheEntryW( ( "http://www." + _url ).w_str( ) );
    if ( _end_browser_session ) {
        InternetSetOption( 0, INTERNET_OPTION_END_BROWSER_SESSION, 0, 0 );
    }
}

C++
1
2
ClearCookies( String( "C:\\Users\\Владимир\\AppData\\Roaming\\Microsoft\\Windows\\Cookies\\" ),
        String( "adxpose.com" ) );

Новые блоги и статьи Все статьи Все блоги /
сукцессия 14. Обновленная схема модели anaschu 28.06.2026 ГЛОБАЛЬНАЯ ОПИСАТЕЛЬНАЯ СПЕЦИФИКАЦИЯ ЭКОСИСТЕМНОЙ МОДЕЛИ «SOIL CHEMISTRY & MYCORRHIZA 2. 0» https:/ / ibb. co/ NnkGpfMd Представленная интегрированная схема описывает непрерывную нелинейную. . .	сукцессия 13. Питон модель трехзонного мицелия, пока что в основном арбускулярного anaschu 28.06.2026 ## Разработка агентной модели микоризной сукцессии: от выявления артефактов к созданию комплексной системы ### Аннотация Представлено исследование по разработке агентной модели микоризной. . .	сукцессия 12. краткий список проверок модели перед запуском. anaschu 27.06.2026 Скрытые отказы в моделях систем динамики (SD-models) экологических систем: два случая из практики Контекст Разбирался прототип модели систем динамики (SD-модели) микоризной сукцессии: пять. . .	Сукцессия 11. Проверка орудий перед войной: разработка через тестирование anaschu 27.06.2026 Как не дать модели соврать самой себе: проверки для симуляции микоризной сукцессии Введение Когда вы строите математическую модель живой системы — грибов, растений, почвы — главная опасность. . .
10 сукцессия. Питон код войны грибов и растений anaschu 27.06.2026 import numpy as np class PlantAgent: def __init__(self, name, strategy, initial_biomass): self. name = name self. strategy = strategy # "greedy" (широколиственные) или. . .	сукцессия 9. Математика подлости: как растения предали грибных друзей anaschu 27.06.2026 Статья 2. Глобальная фосфорная война: эволюционно-экономические механизмы распределения биомов Земли Введение: Экологический рынок как игра с нулевой суммой Традиционная экология долгое время. . .	сукцессия 8. Как я спорил с ИИ, которые - агенты растений и ненавистники грибов! anaschu 27.06.2026 Статья 1. Хроники грибного восстания: как Сократов диалог разрушил академические догмы ИИ Введение: Синдром «цифрового учебника» Современные большие языковые модели (LLM) обладают колоссальным. . .	Главный вопрос моделирования сукцессии anaschu 27.06.2026 главный вопрос. Если эктомикориза лучше добывает недоступный фосфор. И ее масса максимальна из всех. А широколиственный лес тоже имеет самую крутую биомассу. То почему не возникло их симбиоза? Это. . .

@Flyer wtf!? 750 / 281 / 25 Регистрация: 21.05.2010 Сообщений: 732

	Tcppwebbrowser и cookies 11.01.2012, 17:33. Показов 4674. Ответов 22 Метки нет (Все метки) Собственно хочу почистить куки определенного сайта, но не удалением файлов. Погугли, но ничего толкового не нашел. Надеюсь на помощь 0

@DefineTrueFalse 872 / 448 / 35 Регистрация: 25.10.2011 Сообщений: 910
	20.01.2012, 18:50
	Проверь тогда вариант с окнами, если помогает, нужно пролистать исходный код компонента и найти (пусть и protected) функцию, отвечающую за инициализацию. Если не поможет, то все печально и нужно искать стронний компонент. 0