TWebBrowser - Cookies löschen, aber wie?

[crAzywuLf]

Hi Leute,
ich sitz hier vor einem Problem und such nach Rat
Also ich habe ein Programm was auf einer Seite ein paar Links betätigt, nun ist es aber so, dass
der Server der Seite sich das ganze in Sessions speichert und natürlich dem Browser die SessionID in Form
eines Cookies übergibt. Nun möchte ich das dieser Cookie im Browser gelöscht wird, weil wenn ich mein Programm
neustarte und somit auch den TWebBrowser dann funktionierts einbanfrei

Wenn ich mir die Cookies ausgeben lasse über:

Delphi-Quellcode:

  document: IHTMLDocument2;
  cookies: String;
begin
  document := WebBrowser1.Document as IHTMLDocument2;
  listbox1.AddItem(document.cookie,listbox1);

Dann gibt er mir die 2 Cookies aus:

Zitat von Ausgabe:

lol_see_hide=blalbala; lol_sid=blabla

Jetzt möchte ich denn Cookie "lol_sid" natürlich löschen um eine neue Session zu bekommen, nur finde ich einfach keine
Möglichkeit um dies zu realisieren.

Gruß crAzywuLf

[Larsi]

Ist doch eigentlich ganz einfach oder? Kann man nicht das entweder mit Pos und so machen oder den FileDownload des Webbrowsers auch false stellen, vielleicht sind Cookies dann auch verbannt. Oder wo werden Sie denn gespeichert, lösch die Datei. Oder Destroye die Komponente einfach und erstelle Sie neu, vielleicht gehts dann! Viele Vorschläge, keine Ahnung ob einer von dehnen funktioniert, aber vielleicht hat's dir doch geholfen^^


MFG Lars Wiltfang

[Klaus01]

Guten Morgen,

Du könntest den EmbeddedWebBrowser verwenden.
Der hat eine Methode um den Pfad zu den Cookies zu ermitteln.

Delphi-Quellcode:

//GetCookiesPath: If you Call this function the result will be the IE Cookies path.
 procedure TfrmMain.GetCookiesClick(Sender: TObject);
 var
 st : string;
begin
     st:= EmbeddedWB1.GetCookiesPath;
     ShowMessage('Cookies Path: '+ st);
end;

Du könntest dann die Cookies per Programmcode löschen.

Desweiteren gibt es noch die ClearCache und ClearHistory Methoden.

Grüße
Klaus

[toms]

Zitat von Larsi:

Ist doch eigentlich ganz einfach oder? Kann man nicht das entweder mit Pos und so machen oder den FileDownload des Webbrowsers auch false stellen, vielleicht sind Cookies dann auch verbannt.
[...] Oder Destroye die Komponente einfach und erstelle Sie neu, vielleicht gehts dann!

Diese Vorschläge machen keinen Sinn

[crAzywuLf]

Zitat von Klaus01:

Guten Morgen,

Du könntest den EmbeddedWebBrowser verwenden.
Der hat eine Methode um den Pfad zu den Cookies zu ermitteln.

Delphi-Quellcode:

//GetCookiesPath: If you Call this function the result will be the IE Cookies path.
 procedure TfrmMain.GetCookiesClick(Sender: TObject);
 var
 st : string;
begin
     st:= EmbeddedWB1.GetCookiesPath;
     ShowMessage('Cookies Path: '+ st);
end;

Du könntest dann die Cookies per Programmcode löschen.

Desweiteren gibt es noch die ClearCache und ClearHistory Methoden.

Grüße
Klaus

Ne das kann ich nicht machen sonst müsste ich mein Programm komplett neuschreiben und das ist ein riesen Aufwand...
Ich sitz schon seit 3 Tagen Tag und Nacht an diesem Program
Es muss doch ne Möglichkeit geben... Es kann doch nicht sein das das nicht möglich ist

[defede]

Den Pfad aus der Registry holen:
HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Explorer\Shell Folders
Key = "Cookies"

und der Rest ist einfach oder?

[toms]

Zitat von crAzywuLf:

Ne das kann ich nicht machen sonst müsste ich mein Programm komplett neuschreiben und das ist ein riesen Aufwand...
Ich sitz schon seit 3 Tagen Tag und Nacht an diesem Program
Es muss doch ne Möglichkeit geben... Es kann doch nicht sein das das nicht möglich ist

Du kannst dir ja auch nur die entsprechenden Funktionen anschauen resp. verwenden.

[Klaus01]

Zitat von crAzywuLf:

Ne das kann ich nicht machen sonst müsste ich mein Programm komplett neuschreiben und das ist ein riesen Aufwand...
Ich sitz schon seit 3 Tagen Tag und Nacht an diesem Program :mrgreen:
Es muss doch ne Möglichkeit geben... Es kann doch nicht sein das das nicht möglich ist

Der TEmbeddedWebbrowser ist kompatibel zu dem TWebbrowser.
Du brauchst nur den Twebbrowser von Deiner Form entfernen und den
TEmbeddedWebbrowser auf die Form ziehen.
Die Namen der ObjectInstanzen müssen aber gleich sein.
Also wenn Dein TWebbrowser browser1 heißen sollte, dann
muß auch der TEmbeddedWebbrowser browser1 heißen.

Grüße
Klaus