[其它工具]

安装media player11通过验证另一个方法 [复制链接]

（注：本人验证好后，可升级系统，现在还没见出现五角星） ;$(a+?  
*&>1A A  
把下面这段代码复制到记事本里，保存为key.vbs,双击打开就可以了  wo84V!"A  
ON ERROR RESUME NEXT  vk+TWf  
aT"q}UTK  
Dim VOL_PROD_KEY  =35^k-VS  
if Wscript.arguments.count<1 then  [g/Hf(&  
VOL_PROD_KEY=InputBox("Powered By www.cnbeta.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")  oddS~lW  
if VOL_PROD_KEY="" then  _
h7!  
Wscript.quit  R3wK@D  
end if  JAen=%2b  
else  Bm"jf]  
VOL_PROD_KEY = Wscript.arguments.Item(0)  c[?S}u|['  
end if  cnC&=6=a<  
pq+Gsu1^  
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any  "EF:+gi#"  
lQ!ukl)  
for each Obj in GetObject("winmgmts:{impers}").InstancesOf ("win32_WindowsProductActivation")  a*6x^R;)  
TZi%,yK  
result = Obj.SetProductKey (VOL_PROD_KEY)  ~HI|t2C  
'81$8xxdY  
if err = 0 then  W@AZ
<(RI:  
Wscript.echo "OK！去微软验证吧！"  Xoml  
end if  Yq4_ss'nB  
X3".  
if err <> 0 then  $TtCVR  
Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"  0^*4LM|z  
Err.Clear  m[!t7e  
end if  fxXZ^#2wX  
bqFGDmu6'  
Next #,Fk  

我喜欢vitas的歌！！！！

有用没

i不知是不是真的

好东西 支持

安装他干嘛？ lm$T`:c