Home
»
»Unlabelled
»
اكواد اوتوايت :)
اكواد اوتوايت :)
كود Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#RequireAdmin
#NoTrayIcon
$process = ( "notepad.exe" )
$process = ( "chrome.exe" )
$proc=ProcessExists ($process)
$proc=ProcessExists ($process)
While 1
if not $proc Then
MsgBox(0, "" , "virous غير منشط" )
Exit
Else
ProcessClose ($process)
EndIf
WEnd
|
process تكتب الي بدك اياه من اسم الفيروس الموجود بالبروسيس
طبعا لو وجده راح يظل يقتل العملية
الكود الثاني للحدف .. المجلد او الامتداد على حسب
كود Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
#RequireAdmin
#NoTrayIcon
$filenew = "c:\virous"
$file = "c:\virous.exe"
if not $file or $filenew Then
MsgBox(0, "" , "غير موجود الفيروس" )
Exit
Else
DirRemove($filenew,1)
FileDelete ($file)
EndIf
|
file new تكتب اسم المجلد مع المسار
او تكتب المسار مع الامتدا ب file
موفقين
المزيد من الدروس و القوالب على
مدونة Mr.MoHaNaD
0 التعليقات :
إرسال تعليق