欢迎大家来到合击私服总部,我们将每日更新最快最准的新开传奇私服,英雄合击给大家,希望大多多支持我们的网站,顺便也可以推荐给你的朋友,我代表搜服对你们真挚的感谢.
新开传奇私服

  

  

  

  

  

 

最新过JAVE外挂

最新BT幻想加速

最新便宜外挂

最新合击加速


XP破解微软验证,VBS版本
文章作者:火星人 文章来源:http://www.zhao3f.com 新开传奇私服 发布日期:2011-6-20 13:21:08 

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
   VOL_PROD_KEY=InputBox("本程序能帮助您更换 WindowsXP 的序列号。"&vbCr&vbCr&"序列号由您自己寻找并输入。下面列出的不一定是您当前用的序列号,仅作格式参考。"&vbCr&vbCr&"请输入新的序列号:","WindowsXP序列号更换器","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)

   if err = 0 then
      Wscript.echo "修改成功。请点击附带的网址到微软网站进行验证。祝您好运!"
   end if

   if err <> 0 then
      Wscript.echo "替换失败!您输入的序列号有误。"
      Err.Clear
   end if

Next
 

·下一篇;自动关闭IDE启动,启动项 浏览次数:

Copyright 2008-2010 传奇私服 zhao3f.com All Rights Reserved
网站备案登记号:苏ICP备AABBCC号 建议使用:1024×768 分辨率 IE5.0以上版本
拒绝盗版游戏 注意自我保护 谨防受骗上当 适度游戏益脑 沉迷游戏伤身 合理安排时间 享受健康生活
*注释:本站发布的所有游戏信息,均采集自互联网,与本站无关,请玩家仔细辨认其真实性,避免上当受骗!!