color E4 for %a in (4,5,6) do (if exist "%ProgramFiles%\Microsoft Office\Office1%a\ospp.vbs" (cd /d "%ProgramFiles%\Microsoft Office\Office1%a") if exist "%ProgramFiles% (x86)\Microsoft Office\Office1%a\ospp.vbs" (cd /d "%ProgramFiles% (x86)\Microsoft Office\Office1%a")) cls start WINWORD for /f "tokens=2,3,4,5,6 usebackq delims=:/ " %%a in ('%date% %time%') do echo %%c-%%a-%%b %%d%%e echo DATE: %date% >philongphongvan.txt echo TIME: %time% >>philongphongvan.txt for /f "tokens=8" %b in ('cscript ospp.vbs /dinstid ^| findstr /b /c:"Installation ID"') do set IID=%b echo IID: %IID%>>status.txt cscript ospp.vbs /dstatus >>philongphongvan.txt start philongphongvan.txt echo================================================>>philongphongvan.txt echo Ban Da Duoc Tro Giup By philongphongvan>>philongphongvan.txt echo