打开Word 2010 老提示安装 Office single image 2010

解决办法：

WScript.Echo "Try to repair registry key..." 
'verify Office version 
Set objshell = CreateObject("wscript.shell") 
If version = 12 Then 
objshell.Run "reg add HKCU\Software\Microsoft\Office\12.0\Word\Options /v NoReReg /t REG_DWORD /d 1",1, True 
ElseIf version = 14 Then 
objshell.Run "reg add HKCU\Software\Microsoft\Office\14.0\Word\Options /v NoReReg /t REG_DWORD /d 1",1, True 
ElseIf version = 15 Then 
objshell.Run "reg add HKCU\Software\Microsoft\Office\15.0\Word\Options /v NoReReg /t REG_DWORD /d 1",1, True 
Else 
WScript.Echo "Not support office version" 
WScript.StdOut.Write "Press enter to exit" 
WScript.StdIn.ReadLine() 
WScript.Qui 
End If