THT DUYURU

 
 
THT Yardım Merkezi THT Yardım Merkezi bölümünden; teknoloji ve bilişim ile ilgili her konu için yardım isteyebilirsiniz.

Seçenekler

VB6 virus tara kodu

AlperenHackerAdayi - ait Kullanıcı Resmi (Avatar)
Hesap Askıya Alındı
Üyelik tarihi:
10/2012
Nereden:
Biz Heryerdeyiz Gardas :D
Mesajlar:
943
Konular:
114
Teşekkür (Etti):
101
Teşekkür (Aldı):
219
Ticaret:
(0) %
3
629
26-11-2012 21:28
#1
VB6 virus tara kodu bilen varmi kucuk bir virus programi yapmak m iistiyorum anlatimi varmi diyim ya forumda ve google uzerinden aradim ama bi sonuca varamadim yardimlarinizi bekliyorum.
AlperenHackerAdayi - ait Kullanıcı Resmi (Avatar)
Hesap Askıya Alındı
Üyelik tarihi:
10/2012
Nereden:
Biz Heryerdeyiz Gardas :D
Mesajlar:
943
Konular:
114
Teşekkür (Etti):
101
Teşekkür (Aldı):
219
Ticaret:
(0) %
26-11-2012 21:38
#2
up up acil beyler kimse bilmiyomu ?
Fenerist® - ait Kullanıcı Resmi (Avatar)
Kıdemli Üye
Üyelik tarihi:
04/2012
Nereden:
Kadıköy
Mesajlar:
3.610
Konular:
2017
Teşekkür (Etti):
372
Teşekkür (Aldı):
808
Ticaret:
(0) %
26-11-2012 22:31
#3
Visual Basic Antivirüs Programı Yapımı - YouTube
Antivirus Programı Kodları.txt
VB 2008


Arkadaşlar lütfen bir teşekkürü çok görmeyelim
işte size antivirus daha doğrusu program tarama kodları
çok nadir bir teşekkürü çok görmeyeceğinizi düşünüyorum

nse işte gerekli kodlar
2 Button
3 TextBox
1 label

2.textbox u = txthash
3. sünü = txthashes

label in adını ise "lblstatus" yapın

şeklinde adlarını değiştirip forumun diğer ucuna saklayalım

daha sonra programın başlangıç pozisyonuna "Virus hash" şeklinde bir dosya açıp içine "Virus hash" isimle bir textbox yapın(viruslerin hashlerini buraya kaydetceksiniz)

bu kodu Public class form1 in yani forumun en üstüne ekleyin

PHP Code:
Imports System
Imports System.IO.FileStream
Imports System.Security.Cryptography
Imports System.Text
Imports System.IO
PHP Code:
Public Sub New()
' Yapımcı : Hommerhart,aLcohoL_95,straxxxD
AddHandler MyBase.Load, New EventHandler(AddressOf Me.MD5VirMain_Load)

Form1.__ENCList.Add(New WeakReference(Me))


Dim provider As New MD5CryptoServiceProvider
Dim inputstream As New FileStream((Application.StartupPath & "\Virus hash\Virus hash.txt"), FileMode.Open, FileAccess.Read, FileShare.Read, &H2000)
Dim Builder As New StringBuilder
Me.InitializeComponent()
Dim dialog As New OpenFileDialog

End Sub
bu kodun altına bunu ekleyin

Button2 yani taranacak dosyayı açma buttonu

PHP Code:
Dim dialog As New OpenFileDialog
dialog.Title = "Taranacak dosyayı seçin"
dialog.CheckFileExists = True
dialog.CheckPathExists = True
dialog.ShowDialog()
TextBox1.Text = dialog.FileName

If TextBox1.Text = "" Then
Button1.Enabled = False

Else
Button1.Enabled = True

End If
Button1 yani tarama kodu


PHP Code:
If (Me.TextBox1.Text = "") Then
Interaction.MsgBox("Taranacak dosya eklenmedi -.-", MsgBoxStyle.Exclamation, "...")
ElseIf File.Exists(Me.TextBox1.Text) Then
Dim provider As New MD5CryptoServiceProvider
Dim inputStream As New FileStream(Me.TextBox1.Text, FileMode.Open, FileAccess.Read, FileShare.Read, &H2000)
provider.ComputeHash(inputStream)
Dim hash As Byte() = provider.Hash
Dim builder As New StringBuilder
Dim num As Byte
For Each num In hash
builder.Append(String.Format("{0:X2}", num))
Next
Me.txthash.Text = builder.ToString

End If

If Me.txthashes.Text.Contains(Me.txthash.Text) Then
Me.lblstatus.Text = "tehlikeli dosya!"

MsgBox("tehlikeli dosya", , "tehlikeli dosya")

Else
Me.lblstatus.Text = "dosyada virus bulunmadı"
MsgBox("güvenli dosya", , "güvenli dosya")
End If
bir kaç virus hash codu sizin için

PHP Code:
be8929718b85a7e6b44276f15ea9d21e
dde1e5293057da7187c79a27bfcbbbda
5b7ed37e6b4d3a392b1bdc373d609ea4
68f6666296a3fa9260bc88c1b32fa3ba
e9e9d9828194489bfd2f0811924cd1d2
49b10c33b45e929980ac7e23c27592bf
b925c16fff555fd90898ba71c81cd3cf
53d00a5c2a8867528a93a1cf307862b1
80ff6d8eb8e7d12481c737af2b0a2638
0xf0757e2587b6eb2845fdeb1a2eba6599
0x426a5ce4f7c5f2bc010b85fa2ea946db
0xc8582021b1a85b214b0c031f58bc827a
0xd84df9d063eb5b385ed04a4865dba81c
0x9800aae15fecd97b2cd226d4bf543dcd
0x969bd50272ba51ba75ea2f1396da22f8


Visual Basic Adresi - Aradığınız her şey burada - vb.net,visual basic,vb,visual basic 6.0,vb.net portable,portable,program,kod, vb.net forum,visual basic forum - Visual basic 6.0 güvenlik programı yapmak virüs program&#3
Konu Fenerist® tarafından (26-11-2012 22:36 Saat 22:36 ) değiştirilmiştir.
Unlimited Fps - ait Kullanıcı Resmi (Avatar)
Hesap Askıya Alındı
Üyelik tarihi:
10/2012
Nereden:
İstanbul
Yaş:
24
Mesajlar:
1.370
Konular:
87
Teşekkür (Etti):
13
Teşekkür (Aldı):
234
Ticaret:
(0) %
27-11-2012 01:55
#4
Komutanım Vb6 Demiş Kusura Bakmayın Bide Çok Zor Yanlış Anlamada Adamlar Kaç Paraya Yapıyor O Yazılımları Yapsanda Ektili Olmaz He İlle İstiyorsan Bi Arkadaş Turk Antivirüs Diye Bi Program Yapmış Kodu Ondan İste http://www.turkhackteam.net/off-topi...antivirus.html
Konu Unlimited Fps tarafından (27-11-2012 02:02 Saat 02:02 ) değiştirilmiştir.

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler