internet explorer geçmişi

[fatih97008]

internet explorer ın geçmişini yani ziyaretedilen sitelerin listesini silmek istiyorum. windwos bu listeyi index.dat dosyasında saklıyormuş.fakat bu dosya sistem dosyası gibi gizli ne silebiliyorsun ne üzerne yazabiliyorsun.
başlat-ara derseniz index.dat yazıp karşınıza çıkar. geçmişi nesıl silebilirim teşekkürler

[husonet]

Uses kısmına Registry unit'ini eklemeyi unutma test edilmiştir çalışıyor.

Uses Registry;

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var
    adresler: TStrings;
    i: integer;
begin
    adresler := TStringlist.create;
    with TRegistry.Create do
    begin
        RootKey := HKEY_CURRENT_USER;
        if KeyExists('Software\Microsoft\Internet Explorer\TypedURLs\') then
            OpenKey('Software\Microsoft\Internet Explorer\TypedURLs\',false);
            GetvalueNames(adresler);
                if adresler.Count > 0 then
                begin
                    for i := 0 to adresler.Count - 1 do
                    begin
                        deletevalue(adresler.Strings[i]);
                    end;
                end;
        CloseKey;
        adresler.Free;
    end;
end;

Kolay Gelsin...

[fatih97008]

göndermiş olduğunuz kod parçası internet explorer da adres barındaki combobox içeriğini siliyor. ama kod kısa ve güzel. teşekkürler. benim istediğim internet explorer araç çubuğuna tıkladığınızda ie nin soluna açılan pencerede ziyaret edilen siteler listesini silmek. teşekkürler.

[gkimirti]

İnternetExplorer da menuden Araçlar/İnternet Seçenekleri
Genel Sekmesinde
Geçmişi Sil butonuna tıkla

[DotCom]

bencede elle silmek daha mantıklı ,,, hocam şunu sorayım bunu nerede kullanıcaksın ,,, dalga geçmek degil maksadım yalnış anlama çok merak ettim.

[fatih97008]

ben unu kod marifetiyle silmek istiyorum delphide. şurada kullanacağım internet kafe sahibi arkadaşım var. internet kafelerde ne kadar uğraşırsan uğran müşteriler yine de pornografik içerikli sitelere girerler. ve böylece kafe sahibi olan arkadaşım ister istemez ceza yer. ve ceza yedi de 1 hafta dükkanı kapalı kaldı. bende geri dönüşüm kutusu, başlat belgelerim menüsün, inernet temprorary files dizinini, adres bardaki combobox geçmişini, cookileri silen program yaptım. program ağda çalışacak ana makineye bağlantı kurulup ana makinenin istediği zaman aralığında bu bilgileri silecek. ama bu geçmiş olayına takıldım. bir haftadır. tabiiki internet explerın ilgili yerinden silinir. ama kod ile sildiğimizde ana makineden komut verilip otomatik olarak silinecek. yoksa kafedeki 20 bilgisayarlar tek tek nasıl uğraşılır. ayrıca bu bilgisayar lab. ındada geçerli bir program olacak. ben bilg. öğretmeniyim. öğrenciler benzer şekilde istemesen de giriyorlar. girdiklerini diğer öğrenciler görmesin otomatik olarak silinsin. ilginiz için teşekkürler

[mussimsek]

Merhaba,

donanımsal çözüm düşünürseniz, bundan 2 sene kadar önce bir internet cafe'de görmüştüm. HDD Sheriff isminde bir kart var, bilgisayara takıyorsunuz. Sonra Admin (yönetici) modunda girip Windows'u, gerekli programları vs. kuruyorsunuz. Tüm ayarları yapıyorsunuz.

İşiniz bittiğinde normal açılışta kullanıcı girip her türlü işlemi yapıyor. Ancak restart ettiğiniz zaman kullanıcının indirdiği herşey siliniyor, yani siz en son Admin olarak nasıl bırakmışsanız aynen öyle açılıyor.

Değişiklik yapmak istediğinizde yine Admin şifresini girip, istediğiniz işlemi yapıyorsunuz.

Tek dezavantajı varmış, harddiski yarı kapasite de kullanabiliyorsunuzç Yani disk 40 GB ise, 20 GB'ını kullanabiliyorsunuz. Diğer 20 sini kart bloke ediyor.

Kolay gelsin.

[DotCom]

mustafa hocamın soyledigine katılıyorum fakat benimde bir fikrim var...

program yazmana hiç gerek yok. muftafa hocamın söyledigi yontem ile kart alman gerekli ve ayrıca bu kartlar şuanda piyasada yok 2-3 yıl önce kullanılıyordu. tabiki günümüzde bu iş için bir çok program var.

ben sana kısaca yöntemi açıklayayım...

atıyorum diskler 40 gb , bu diskleri 20 , 20 ikiye bölersin daha sonra c sine istedigin tüm oyun program işletim sistemi vs kurarsın... daha sonra internetten bootstar isimli programı ve symantech şirketinin ghost 7 yazılımını indirirsin. ikinci bölüme ghost ile image ini alırsın disk in ondan sonrada bootstar programında c ye bir alias d ye bir alias verirsin. bilgisayarı sabah ilk açtıgında karşısına iki sebenek çıkar normal ve restore eğeer normali seçerse bilgii sayar her zamanki gibi açılır eğer restoreyi seçerse bilgisayar image aldıgın gündeki ayarlarına 15 dakika içinde geri döner biz tüm müşterilerimize + cafe sahiplerine bu yöntemi uyguluyoruz.

şimdi bazı arkadaşlar dicekki , sadece ghost ile yap eğer sadece ghost u kulanırsanız müşterilerden fırlama olanları d bölümünü formatlıyor... ama Normal i seçip açtıgınızda bootstar programında d sürücüsü gizleniyor bilgisayarımda gözükmüyor. bu yüzden bootstar programı çok iyi şiddetle tavsiye ederim. yinede aklınızı kurcalıyan bir yer olursa. icq dan ulaşa bilirsiniz. tarif ederim....

Not: ben şirkette kurdugum tüm bilgisayarlara image alrıım daha sonra servis e gittimgimde makine göçmüş ise benim makineyi kurmam + driver tanıtmam + programları kurmam + tüm ayarlarını update lerini yapmam = sadece 15 dakika.

hepinize saygılar.

[fahrettin]

Farkli bir fikir de ben belirteyim. Bir alternatif olsun..
VirtualMachine programlari var. Makinaniza bu programi kurudktan sonra o program ile makinaniz icinde diskinizin imkan verdigi oranda farkli virtual machine'ler tanımlayabiliyorsunuz ve bunlara istediginiz isletim sistemini kurabiliyorsunuz. Mesela benim makinamda var. makinam windows 2000, virtual machine olarak da icinde 2 adet win95, 2 adet Win98 ve de 2 adet de Window200 var. ozellikle yeni programlari sifir makinalarda denemek icin cok iyi oluyor. mesela bir kurulum setini denemek icin hemen 95 ya da 98 makinayi start ediyorum ve onun icine kopyaladigim programi kuruyorum. Virtualm machine'ler tabi ki icinde bulunduklari diger isletim sisteminden tamamen habersizler. Tıpkı Matrix gibi. Kendilerini o makinanin tek işletim sistemi sanıyorlar Cafe de'de kurulan alt isletim sistemini müşterilere kullandırtabilirsiniz. Hatta ben 2Ser tane alt işletim sistemini şundan dolayı tutuyorum. Ornegin 98 icin bir tane sifir kurulup driver'larin tanitilmis hali var ve de baska hic bir islem yapılmamıs hali.. Onun bir kopyasini alip kopya uzerinde denemelerimi yapiyorum tekrar sifir ihitiyacim olursa hic dokunmadigim asildan istedigim kadar cogaltiyorum.

Kolay gelsin...

[mrmarman]

Selamlar.

- Yapacağınız işlem Windows Startup sırasında yapmanız gereken bir işlemdir.

- Windows'un Registry ayarlarında, kendi programınızı veya yazacağınız ve Windows'u kapatmadan önce ilgili parametrelerle donatacağınız minik bir programı RunOnce kısmına koyup, ona bu işlemi yaptırabilirsiniz.

- Windows açıkken yapacağınız işlemlerle sadece görünmez kılabilirsiniz. Ama HDD'de hep mevcut kalır. Sebebi ise aşağıda vereceğim klasördeki index.dat'ın ReadOnly olmasının yanı sıra ShareDenyNone ile açık olduğundan, Attrib değişimi dahil, üzerine yazılmasına-silinmesine Windows müsade etmez.

Kod: Tümünü seç

C:\WINDOWS\History\History.IE5

klasörü altında göreceğiniz klasörleri sildiğinizde IE'de geçmiş namına herşey görünmez oluyor.

- Kalıcı çözüm için Index.DAT'ı da silmeniz gerekiyor.

- Ben daha önce böyle bir yanlış kanıya varmıştım onun için yazıyorum.

[safak]

Kesin bir çözüm değil ama genede zamanla gelişir ve pek de göz ardı edilmemeli. Bir alternatif olarak aktarıyorum:

Amaç, müşteriler erişşin, sonra silinsin ise yukarıda sayılan yollar kullanılabilir.

Erişemesinler diye düşünülüyorsa:
1. firewall içinde erişim baştan sınırlanır. (IP adresleri yazaklanır ve bu liste zamanla büyür)
2. İternet paylaşımı önüne konan program iki yönlü transfer içeriğini kontrol eder. İzinverilmeyen ASCII karakterle zincirlerini içeren trafiğe izin verilmez.

[sadettinpolat]

biraz geç olcak ama bu mesaji yeni gördüm.
buna benzer bi program istegi bana da gelmişti. biraz araştırmadan sonra
aradığımı http://www.euromind.com/iedelphi/iecache.htm bu sitede bulmuştum.

[mapper]

Çok basit bir kodla halledebilirsiniz

program Delete_IE_Cache;

uses
WinInet;

{sc-----------------------------------------------------------------------
Name: DeleteIECache
Parameters: -
-----------------------------------------------------------------------sc}
procedure DeleteIECache;
var
lpEntryInfo: PInternetCacheEntryInfo;
hCacheDir: LongWord;
dwEntrySize: LongWord;
begin { DeleteIECache }
dwEntrySize := 0;

FindFirstUrlCacheEntry(nil, TInternetCacheEntryInfo(nil^), dwEntrySize);

GetMem(lpEntryInfo, dwEntrySize);

if dwEntrySize>0 then
lpEntryInfo^.dwStructSize := dwEntrySize;

hCacheDir := FindFirstUrlCacheEntry(nil, lpEntryInfo^, dwEntrySize);

if hCacheDir<>0 then
begin
repeat
DeleteUrlCacheEntry(lpEntryInfo^.lpszSourceUrlName);
FreeMem(lpEntryInfo, dwEntrySize);
dwEntrySize := 0;
FindNextUrlCacheEntry(hCacheDir, TInternetCacheEntryInfo(nil^), dwEntrySize);
GetMem(lpEntryInfo, dwEntrySize);
if dwEntrySize>0 then
lpEntryInfo^.dwStructSize := dwEntrySize;
until not FindNextUrlCacheEntry(hCacheDir, lpEntryInfo^, dwEntrySize)
end; { hCacheDir<>0 }
FreeMem(lpEntryInfo, dwEntrySize);

FindCloseUrlCache(hCacheDir)
end; { DeleteIECache }


begin
DeleteIECache
end.