IE7.0我怎么装不上啊

我试过这个办法怎么还是装不上啊。？？？？？？？

第一:下载完毕后,双击安装文件,,至验证页面时,点验证!(当然通过不了,这样做是为了让
C:\Documents and Settings\All Users\Application Data\Windows Genuine Advantage\data
路径上产生一个 data.dat 文件!)不要退出安装保留此页!
第二:找到路径C:\Documents and Settings\All Users\Application Data\Windows Genuine
Advantage\data
打开我的电脑,复制上面路径到地址栏,回车!找到data.dat 文件,删除它!
第三:这个是关键,请仔细看好,如果你是LAN上网,请拔掉你的网线,如果是ADSL上网,那就关掉ADSL猫
!并确认,屏幕右下角连接已处于断开的状态!(连接图标上出现红叉) 这是关键一步,请仔细确认!
回到安装页面,再一次验证!会很顺利通过的

这样做了还是验证不了。真是 头疼死了。。。大家帮帮忙吧。。

这个方法早过时了,建议你修改你的序列号,便你的电脑通过验证,

将下面的内容复制到记事本中,名字改为key.vbs，双击运行，继续操作，ok。直接安装你下载的IE7就行了,一步一步来,验证是会通过的

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("Powered By www.cnbeta.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
if VOL_PROD_KEY="" then
Wscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if

VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)