الجمعة، 31 يوليو 2015

اكواد اوتوايت :)






كود 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


موفقين 
الجمعة, يوليو 31, 2015