Pc'deki Tüm Cookie'leri Memoda Toplama?

[Trial_Cooder]

Pc'deki Tüm Cookie'leri Memoya Nasıl Toplarım?

[nitro]

cookilerin toplandığı klasörü biliyorsun zaten, o klasör için aşağıdaki kodları uygula

Kod: Tümünü seç

Procedure DosyaAra(const Yol, Tur: string; AltDizin: boolean; Out List:TStringList);
var
  AramaSonucu: integer;
  Arama : TSearchRec;
begin
  AramaSonucu := FindFirst(Yol + Tur, faAnyFile - faDirectory, arama);
  while AramaSonucu = 0 do
  begin
    List.Add(Yol + Arama.Name); // Dosya ismi yoluyla birlikte
//List.Add(Arama.Name)  sadece dosya ismi
    AramaSonucu := FindNext(Arama);
  end;
  FindClose(Arama);
  if not AltDizin then Exit;
  AramaSonucu := FindFirst(Yol + '*.*', faDirectory, Arama);
  while AramaSonucu = 0 do
  begin
    if (Arama.Name <> '.') and (Arama.Name <> '..') then
        DosyaAra (Yol + Arama.Name + '\', Tur, TRUE,List);
    AramaSonucu := FindNext(Arama);
  end;
  FindClose(Arama);
end;

kullanımı şöyle

Kod: Tümünü seç

Var
i:Integer;
liste:TStringList;
begin
    liste:=TStringList.Create;
    DosyaAra(ShellTreeView1.Path+'\','*.txt',True,liste);
    Memo1.Lines.Clear;
    Memo1.Lines:=Liste;
    liste.Free;
end;

kolay gelsin

[Trial_Cooder]

Girdiği Sitelerdeki Cookieleri Ftp (Kullanıcı Adları Felan)

[nitro]

o zaman sen cookie içeriklerini toplamak istiyorsun.
yukarıda verdiğim yöntem ile cookie dosyalarının isimlerini topla. sonra da listededi her dosya adı için:

Kod: Tümünü seç

for i:=0 to memo2.lines.count do
memo3.lines.add(loadfromfile(memo2.lines[i]));

ben cookilere baktım, öyle kullanıcı adı şifre bulamadım.
acaba firefox kullandığım için mi?

[Trial_Cooder]

Kullanıcı Adı Şifre Felan Gelmiyoki ID'lerden Başka Bişey Yok
Bunun Bi Okunuşu Var Ama :S
C:\Documents and Settings\***\Cookies
Tüm Cookieler Burdamı Tutuluyor? Başka Biryer Yokmu? Reg Felan?

[aLonE CoDeR]

Sen bunu nerde kullanacaksın, bana pek normal gelmedi, illegal şeyler yapmaya çalışıyorsun gibi..