btfisher

forfiles，好人啊，谢谢！

btfisher

回复 8# forfiles
感谢，非常感谢！前两天出去了没看见，今天回来看见，感动啊。谢谢您。

forfiles

回复 7# btfisher

@echo off
setlocal enabledelayedexpansion
for /l %%a in (8,1,14) do (
    reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\%%a.0\Common\LanguageResources /v SKULanguage>nul 2>nul
    if !errorlevel!==0 (
        if %%a==8 (
            set OffiVer=Office 97
        ) else if %%a==9 (
            set OffiVer=Office 2000
        ) else if %%a==10 (
            set OffiVer=Office XP
        ) else if %%a==11 (
            set OffiVer=Office 2003
        ) else if %%a==12 (
            set OffiVer=Office 2007
        ) else if %%a==14 (
            set OffiVer=Office 2010
        ) else (
            set OffiVer=没有安装
        )
    )
)
echo Office版本：%OffiVer%
pause
复制代码

btfisher

回复 6# forfiles
哈哈，我本机是14.0，这个正常也能看到。现在的关键是我想做成一个批处理给其他人（客户端，很多）使用检查自己的软件环境，而不能通过手工开始---运行....（你知道我要让客户端都去手工检查的话他们非把我扁死不可）

forfiles

回复 5# btfisher


开始，运行，regedit
看看这个分支下面是版本是不是13.0
HKEY_CURRENT_USER\Software\Microsoft\Office

btfisher

再次感谢forfiles，上面的代码我试了一下，在我的本机上不能执行，更准确的说是一闪而过（我的机器装了office2010）。因为自己小白一个，不清楚为什么。还有上面的代码没交代如果客户机没有安装office会怎样，是回馈 “其它”？

forfiles

网上搜到的一个代码

@echo off
setlocal enabledelayedexpansion
for /l %%a in (8,1,12) do (
    reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\%%a.0\Common\LanguageResources /v SKULanguage>nul 2>nul
    if !errorlevel!==0 (
        if %%a==8 (
            set OffiVer=Office 97
        ) else if %%a==9 (
            set OffiVer=Office 2000
        ) else if %%a==10 (
            set OffiVer=Office XP
        ) else if %%a==11 (
            set OffiVer=Office 2003
        ) else if %%a==12 (
            set OffiVer=Office 2007
        ) else (
            set OffiVer=其它
        )
    )
)
for /f "tokens=2 delims=x" %%a in ('reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Common\LanguageResources /v SKULanguage') do (
    if %%a==409 (
        set OffiLan=英文
    ) else if %%a==2052 (
        set OffiLan=中文
    ) else (
        set OffiLan=其它
    )
)
echo Office版本：%OffiVer%
echo Office语言版本：%OffiLan%
pause
复制代码

btfisher

谢谢forfiles，但是，如果没安装office，注册表中上述路径是不存在的，对吗？而且关键的是我想判断出office的版本然后给出不同的动作

forfiles

用reg query命令检查注册表
HKEY_CURRENT_USER\Software\Microsoft\Office