无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
查看: 2194|回复: 38
打印 上一主题 下一主题

[分享] 留个纪念:用批获取Microsoft Office的版本号

[复制链接]
跳转到指定楼层
1#
发表于 2024-2-12 14:53:09 | 显示全部楼层 |只看大图 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 七仙花 于 2024-2-12 16:06 编辑
  1. @echo off

  2. echo 获取 Microsoft Office 安装路径
  3. Setlocal Enabledelayedexpansion
  4. for /f "delims=\ tokens=5,*" %%a in ('reg query HKLM\SOFTWARE\Microsoft\Office /f "." /k 2^>nul') do (
  5.     for /f "skip=1 tokens=2,* delims= " %%b in ('reg query HKLM\SOFTWARE\Microsoft\Office\%%~a\Word\InstallRoot /v Path 2^>nul') do (
  6.         set "WordPath=%%~c"
  7.     )
  8. )
  9. if defined WordPath (set "WordPath=%WordPath:root\Office16=Office16%") else (
  10. echo 未检测到当前系统安装有 Microsoft Office 软件,请直接关闭或按任意键退出 ......
  11. pause >nul
  12. goto :eof
  13. )
  14. echo.
  15. echo Microsoft Office 安装路径是:
  16. echo %WordPath%
  17. echo.
  18. echo 获取 Microsoft Office 文件的版本号
  19. echo.
  20. for /f "delims=\ tokens=1-4" %%i in ("%WordPath%") do set "WordPath=%%i\\%%j\\%%k\\%%l\\"

  21. ::显示misc.exe的版本号
  22. wmic datafile where Name="%WordPath%misc.exe" get Version

  23. ::使用wmic获取misc.exe的版本号并赋值给变量

  24. for /F "skip=1 delims= " %%i in ('wmic datafile where "Name='%WordPath%misc.exe'" get Version') do (
  25.           set "V=%%i"
  26.           goto Ver
  27. )
  28. :Ver
  29. echo Microsoft office 的版本号是%V%
  30. echo.
  31. pause
复制代码


稍做修改,也可以获取其它文件的版本号。
2#
 楼主| 发表于 2024-2-12 16:18:41 | 显示全部楼层
本帖最后由 七仙花 于 2024-2-12 16:24 编辑

奇怪,明明编辑的时候,代码是正确的,但保存后第21行代码少了一个反斜杠“\",直接复制帖子里的代码,也是少了一个反斜杠。

编辑时是这样的


保存后是这样的


重新编辑,在最后加多一个反斜杠”\",变成3个反斜杠。


保存后才能显示正确的代码








回复

使用道具 举报

3#
 楼主| 发表于 2024-2-12 16:28:11 | 显示全部楼层
是论坛的问题,还是我的电脑中毒了,明明回复的时候字是正确的,重新编辑就会有几个字变成乱码了,不做改动直接保存,也是显示乱码。

点评

放心吧, 绝不是你的问题,,我也发现了,http://bbs.wuyou.net/forum.php?mod=viewthread&tid=438589&page=2#pid5129985  详情 回复 发表于 2024-2-13 09:37
本坛帖子编辑有不少问题,特别是代码编辑。  详情 回复 发表于 2024-2-12 19:33
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-5-17 11:08

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表