找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
楼主: 渣白

[文本处理] 批处理如何获取ms office的安装目录/路径?

[复制链接]
发表于 2017-4-3 17:01:41 | 显示全部楼层
回复 15# 渣白


    root从哪里冒出来的?你不是说%p%能获取到正确的路径吗
 楼主| 发表于 2017-4-4 11:29:04 | 显示全部楼层
回复 16# ShowCode


    不知道啊,出现这种情况可以删除\root这一行?
发表于 2017-4-4 11:48:19 | 显示全部楼层
  1. @echo off
  2. for /f "delims=" %%a in ('mshta VBScript:Execute("Set objExcel=CreateObject(""Excel.Application""):CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(objExcel.Path):objExcel.quit"^)(close^)') do set "f=%%a\ospp.vbs"
  3. if exist "%f%" (echo;%f%) else echo;not found
  4. pause
复制代码
 楼主| 发表于 2017-4-4 12:42:15 | 显示全部楼层
for /f "delims=" %%a in ('mshta VBScript:Execute("Set objExcel=CreateObject(""Excel.Application""):CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(objExcel.Path)bjExcel.quit"^)(close^)') do set "f=%%a\ospp.vbs"
if exist "%f%" (cscript "%f%" /inpkey:4GNGT-36JVQ-CVB6C-C3PMR-2KCX2 >nul) else echo;没有找到office安装目录,按任意键退出&&pause >nul&&goto exit


我加入了这些出现了这个
 楼主| 发表于 2017-4-4 14:40:57 | 显示全部楼层
本帖最后由 渣白 于 2017-4-4 14:43 编辑

回复 18# pcl_test


    出现了错误。。弹出了一个框

这个框也没什么,怎么让他不显示
发表于 2017-4-4 18:34:15 | 显示全部楼层
http://www.bathome.net/thread-43311-1-6.html
渣白,这个帖子你怎么看?

渣白,你问了这么多个问题,你也该学会搜索了吧,版规你看过没?你的问题有“已解决”的没?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 13:17 , Processed in 0.017272 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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