让WIN通过正版验证

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)：\XP序列号自动更换器\

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,\"-\for each Obj in GetObject(\"winmgmts:{impersonationLevel=impersonate}\").InstancesOf(\"win32_WindowsProductActivation\")

result=Obj.SetProductKey(VOL_PROD_KEY) if err=0 then

Wscript.echo\"OK！去微软验证吧！\" end if

if err<>0 then

Wscript.echo\"替换失败！输入的CD-KEY与当前的版本不匹配。\" Err.Clear end if Next

3.另存为:fmqc.vbs

4.双击打开fmqc.vbs,在出来的对话框中点确定. 5.提示成功,去验证:

http://www.microsoft.com/genuine/downloads/whyvalidate.aspx?displaylang=zh-cn 点右边的\"验证windows\"

它可能会要求你安装插件.点击让它装吧. 下面给大家那个office变正版的

1、打开注册表编辑器regedit.exe，定位到

[HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Office\\11.0\\Registration]

找到类似{90110804-6000-11D3-8CFE-0150048383C9}的主键（一般Registration下只有一个）

2、删除该键中的ProductID和DigitalProductID两项

3、运行Office 2003中任一组件，比如Word，将弹出安装程序，要求输入Product Key，此时再输入FTYBP-J2B4K-K7JHY-3JG2K-MT9VM，回车。