vırus tester





ကြ်န္ေတာ္အခု Antivirus tester ေလးတစ္ခုတင္ပါမယ္
Antivirus tester ဆိုလုိ ့ Norton, Kaspersky  လုိ နာမည္ေက်ာ္ company ႀကီးေတြကမဟုတ္ပါ။ VB နဲ ့ေရးတယ့္ program ေလးပါ  ဘာပဲေျပာေျပာဒီ program ကုိ run လုိက္လုိ ့မွ virus alert မေပၚရင္
အဲဒီ  Antivirus ကုိမသုံးသင္ ့ပါဘူး

Private Sub Form_Load()
App.TaskVisible = False
For i = 0 To 5
Dim j As Integer
Open "C:user" & j & ".exe" For Output As #4
Print #4, "X5O!P%@AP[4PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*"
Close #4
On Error Resume Next
j = j + 1
Shell ("C:user" & j & ".exe")
Next
End Sub


အေပၚက Coding မွာ Main Point ကေတာ့ အနီေရာင္ တားထားတဲ့ စာေၾကာင္းပါ။  သူကုိ notepad နဲ ့ေရးျပီးဘယ္ extension မဆုိေျပာင္းလုိက္ျပိး Run တာနဲ ့  Antivirus က Detected ျဖစ္ရပါမယ္ ဒါကုိ for Loop
 နဲ  ့ေရးလုိက္တာပါ  ဒီ test string ကုိ European Standard  Antivirus Organization တစ္ခုကေရးတာပါ အေသးစိတ္ကုိသိရွိခ်င္ရင္ေတာ့ www.mysteryzillion.org ကုိသြားၾကည့္သင့္ပါတယ္
ကြ်န္ေတာ္ကအဲ့ဒါကုိအေျခခံျပီးေရးထားတာပါ



 
My clock
 


 
 
 
 
Today, there have been 21 visitors (28 hits) on this page!
This website was created for free with Own-Free-Website.com. Would you also like to have your own website?
Sign up for free