) else if exist " %ProgramW6432%\Microsoft Office\Office14\ospp.vbs " ( Set " office = %ProgramFiles%\Microsoft Office\Office14 " If exist " %ProgramFiles%\Microsoft Office\Office14\ospp.vbs " ( If %_wow% = 1 reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k > nul 2 >&1 || goto : casVend If %_wow% = 0 reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k > nul 2 >&1 || goto : casVend Set " office = %ProgramFiles(x86)%\Microsoft Office\Office15 " Set " office = %ProgramW6432%\Microsoft Office\Office15 " Set " office = %ProgramFiles%\Microsoft Office\Office15 " Reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath > nul 2 >&1 || goto : casVc10 Reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath > nul 2 >&1 || ( Reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath > nul 2 >&1 || goto : casVc13įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath " 2 ^ > nul') do (set "office= %%b\Office16 ")įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath " 2 ^ > nul') do (set "office= %%b\Office16 ")
Reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath > nul 2 >&1 || ( > nul 2 >&1Ĭscript //nologo slmgr.vbs /dli || (echo Error executing slmgr.vbs &del /f /q slmgr.vbs &popd &goto : casVend)įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ")Įcho *** Office 2016 %_bit%-bit Status ***Ĭscript //nologo " !office!\ospp.vbs " /dstatusįor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ")įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ")Įcho *** Office 2013 %_bit%-bit Status ***įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ")įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ")Įcho *** Office 2010 %_bit%-bit Status ***įor /f "skip=2 tokens=2* " %%a in (' "reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot /v Path " 2 ^ > nul') do (set "office= %%b ") ) else if exist " %ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs " (Ĭopy /y %SystemRoot%\System32\slmgr.vbs. ) else if exist " %ProgramW6432%\Microsoft Office\Office15\ospp.vbs " ( If exist " %ProgramFiles%\Microsoft Office\Office15\ospp.vbs " ( Set " Path = %SysPath% %SystemRoot% %SysPath%\Wbem %SysPath%\WindowsPowerShell\v1.0\ " If exist " %SystemRoot%\Sysnative\reg.exe " (set "SysPath= %SystemRoot%\Sysnative ") Start %SystemRoot%\SysArm32\cmd.exe /c " " !_cmdf! " " If exist " %SystemRoot%\SysArm32\cmd.exe " if /i %PROCESSOR_ARCHITECTURE% =AMD64 ( Start %SystemRoot%\Sysnative\cmd.exe /c " " !_cmdf! " " If exist " %SystemRoot%\Sysnative\cmd.exe " (
0 kommentar(er)
