IORRT - The Official Office 2010 VL Rearm Solution

Discussion in 'MDL Projects and Applications' started by timesurfer, Dec 1, 2010.

Thread Status:
Not open for further replies.
  1. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    Post new code and I'll try it...lol
     
  2. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #422 timesurfer, Dec 19, 2010
    Last edited: Dec 19, 2010
    (OP)
    Just noticed your a MDL tester. Some might think your MDL Scriptor :eek:

    MD is definitely more than a scriptor as I think he is a professional high language guy ;)

    I like the wording with this addition to IORRT script

    Also I changed my CS5 Tool name to simply CS5T :p...lol In case you were wondering
     
  3. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #423 DARKOR04, Dec 19, 2010
    Last edited: Dec 19, 2010
    Working on it, I'll post soon...

    Actually I have learned a lot in the past few weeks, I've burned my eyebrows reading Command Line in Windows...lol
     
  4. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    Did you read my last post?
     
  5. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    Yes Why you ask ts?
     
  6. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
  7. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #427 DARKOR04, Dec 19, 2010
    Last edited by a moderator: Apr 20, 2017
    @timesurfer

    Well finish the new code, now is fully working.. Sorry for the late post was haveing problems doing the numerical comparison of %r% now resolved hehe

    Here is the working code hope you find it useful....

    Code:
    :Rearmcheck
    echo. Veriying If Rearms are Available. Wait...
    echo.
    mkdir "%SystemDrive%"\RearmCheckTemp"
    net stop osppsvc >nul
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\RearmCheckTemp\Backup\Files\Tokens" >nul
    mkdir "%SystemDrive%\RearmCheckTemp\Backup\Registry" >nul
    REG SAVE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\RearmCheckTemp\Backup\Registry\OfficeSPPInfo.hiv >nul
    REG EXPORT "HKLM\SOFTWARE\Microsoft\Office\14.0\Registration" %SystemDrive%\RearmCheckTemp\Backup\Registry\Registration.reg >nul
    net start osppsvc >nul
    set r=0
    :RearmLoop
    IF EXIST "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    goto:StartCheck86
    ) ELSE ( 
    "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" | FIND /i "Microsoft Office rearm successful." >nul
    IF '%ERRORLEVEL%' EQU '0' ( 
    goto:ADD1
    ) ELSE (
    goto:RestoreDisplay
    )
    :StartCheck86
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" | FIND /i "Microsoft Office rearm successful." >nul
    IF '%ERRORLEVEL%' EQU '0' (
    goto:ADD1
    ) ELSE ( 
    goto:RestoreDisplay
    )
    :ADD1
    set /A r=r+1
    goto:RearmLoop
    )
    :RestoreDisplay
    net stop osppsvc >nul
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\RearmCheckTemp\Backup\Files\Tokens" >nul
    REG DELETE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f >nul
    REG DELETE "HKLM\SOFTWARE\Microsoft\Office\14.0\Registration" /f >nul 
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >nul
    REG ADD HKLM\SOFTWARE\Microsoft\Office\14.0\Registration /f >nul
    REG RESTORE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\RearmCheckTemp\Backup\Registry\OfficeSPPInfo.hiv >nul
    REG IMPORT %SystemDrive%\RearmCheckTemp\Backup\Registry\Registration.reg >nul 
    net start osppsvc >nul
    SET file=%SystemDrive%\RearmCheckTemp
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    :RearmAvailable
    echo. You have %r% available rearms.
    IF %r% GEQ 1 (
    echo. Press any key to install IORRT.
    pause >nul
    goto:Install
    ) ELSE (
    echo. You need at least 1 rearm available to install IORRT.
    pause >nul
    goto:MAINMENU
    )
     
  8. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #428 timesurfer, Dec 19, 2010
    Last edited by a moderator: Apr 20, 2017
    (OP)
    That was nice of you :eek:

    I was also working on it too to do what I want for IORRT

    I want it to not mention rearms until it is checked that 0 rearms are available and if rearm is available then restore with no msg and install as usual. So just a msg if no rearms are available. No need to show rearm total ;)

    Here's my code that isn't working but reflects what I want...lol

    Code:
    @echo off
    echo.Performing Office 2010 VL Check Please Wait...
    echo.
    mkdir "%SystemDrive%\CheckForRearms"
    net stop osppsvc
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\CheckForRearms\Backup\Files\Tokens"
    mkdir "%SystemDrive%\CheckForRearms\Backup\Registry"
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\CheckForRearms\Backup\Registry\OfficeSPPInfo.hiv
    net start osppsvc
    set r=0
    :RearmLoop
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( 
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >nul
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe"
    IF '%ERRORLEVEL%' EQU '0' (
    goto:ADD1
    ) ELSE (
    goto:Restore
    )
    :ADD1
    set /A r=r+1
    :Restore
    goto:RearmLoop
    )
    net stop osppsvc
    xcopy /cheriky "%SystemDrive%\CheckForRearms\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform"
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\CheckForRearms\Backup\Registry\OfficeSPPInfo.hiv
    net start osppsvc
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv"
    SET file=%SystemDrive%\CheckForRearms
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    if "%r%" == "%0%"
    goto:RearmStatus
    ) ELSE (
    goto:Install
    )
    :RearmStatus
    if "%r%" == "%0%"
    echo.You have to repair your office 2010 VL because you have no rearms which IORRT needs to install...
    pause >nul
    goto:MAINMENU
     
  9. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #429 DARKOR04, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    Then just make this change

    From this:
    Code:
    :RearmAvailable
    echo. You have %r% available rearms.
    IF %r% GEQ 1 (
    echo. Press any key to install IORRT.
    pause >nul
    goto:Install
    ) ELSE (
    echo. You need at least 1 rearm available to install IORRT.
    pause >nul
    goto:MAINMENU
    )
    To this:
    Code:
    :RearmAvailable
    IF %r% GEQ 1 (
    goto:Install
    ) ELSE (
    echo. You have %r% available rearms.
    echo. You need at least 1 rearm available to install IORRT.
    pause >nul
    goto:MAINMENU
    )
    So this way no meesage is display unless you have no rearms available... lol
     
  10. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #430 timesurfer, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    (OP)
    Yea there is no need to show rearms at all and I want it to go straight into install otherwise without any press to continue msg's. I can't think right now. I have a serious health problem and my migraines and nausea are almost unbearable otherwise I'd try to fix it based on my first post link and my last code

    Maybe later
     
  11. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #431 DARKOR04, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    So here is the whole IORRT Script you need....

    Code:
    @echo off
    @color 0C
    title IORRT 1.9
    REM Variables
    set InstallRoot=
    set OfficeArchType=
    REM Check Office Architecture Type
    if '%processor_architecture%'=='x86' Set OfficeArchType=32 && Goto:EndArchCheck
    goto:WOWCheck
    :WOWCheck
    2>nul REG QUERY HKLM\SOFTWARE\Microsoft\Office\14.0\Common | find /i "InstallRoot" 1>nul
    IF ERRORLEVEL 1 Set OfficeArchType=WOW && Goto:EndArchCheck
    Set OfficeArchType=64
    :EndArchCheck
    REM Get Office Installed Path
    if %OfficeArchType%==WOW (
    FOR /F "tokens=2* delims=  " %%A IN ('REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot" /v Path') DO SET InstallRoot=%%B 
    Goto:FoundPath
    )
    FOR /F "tokens=2* delims=  " %%A IN ('REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot" /v Path') DO SET InstallRoot=%%B
    :FoundPath
    REM Start OSPPSVC (To make sure it is started to prevent strange cases where it doesn't start automatically from failing (XP))
    1>nul 2>nul net start osppsvc
    :MAINMENU
    mode con: cols=45 lines=10
    CLS
    echo.
    echo.
    echo.  
    echo.    InfiniteOfficeRestoreRearmTask (IORRT) 
    echo.    
    echo.               A. Install
    echo.               B. Uninstall
    echo.               C. Restore/Rearm
    echo.               D. Status
    echo.               E. Exit
    echo.
     
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto RearmCheck
    if /i "%userinp%"=="B" goto Uninstall
    if /i "%userinp%"=="C" goto Restore/Rearm
    if /i "%userinp%"=="D" goto Status
    if /i "%userinp%"=="E" goto Exit
    echo.Try Again...
    GOTO CHOOSEACTION
     
    :Rearmcheck
    echo. Performing Security Check... Wait...
    echo.
    mkdir "%SystemDrive%"\RearmCheckTemp"
    net stop osppsvc >nul
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\RearmCheckTemp\Backup\Files\Tokens" >nul
    mkdir "%SystemDrive%\RearmCheckTemp\Backup\Registry" >nul
    REG SAVE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\RearmCheckTemp\Backup\Registry\OfficeSPPInfo.hiv >nul
    REG EXPORT "HKLM\SOFTWARE\Microsoft\Office\14.0\Registration" %SystemDrive%\RearmCheckTemp\Backup\Registry\Registration.reg >nul
    net start osppsvc >nul
    set r=0
    :RearmLoop
    IF EXIST "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    goto:StartCheck86
    ) ELSE ( 
    "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" | FIND /i "Microsoft Office rearm successful." >nul
    IF '%ERRORLEVEL%' EQU '0' ( 
    goto:ADD1
    ) ELSE (
    goto:RestoreDisplay
    )
    :StartCheck86
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" | FIND /i "Microsoft Office rearm successful." >nul
    IF '%ERRORLEVEL%' EQU '0' (
    goto:ADD1
    ) ELSE ( 
    goto:RestoreDisplay
    )
    :ADD1
    set /A r=r+1
    goto:RearmLoop
    )
    :RestoreDisplay
    net stop osppsvc >nul
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\RearmCheckTemp\Backup\Files\Tokens" >nul
    REG DELETE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f >nul
    REG DELETE "HKLM\SOFTWARE\Microsoft\Office\14.0\Registration" /f >nul 
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >nul
    REG ADD HKLM\SOFTWARE\Microsoft\Office\14.0\Registration /f >nul
    REG RESTORE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\RearmCheckTemp\Backup\Registry\OfficeSPPInfo.hiv >nul
    REG IMPORT %SystemDrive%\RearmCheckTemp\Backup\Registry\Registration.reg >nul 
    net start osppsvc >nul
    SET file=%SystemDrive%\RearmCheckTemp
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    :RearmAvailable
    IF %r% GEQ 1 (
    goto:Install
    ) ELSE (
    echo. You have %r% available rearms.
    echo. You need at least 1 rearm available to install IORRT.
    pause >nul
    goto:MAINMENU
    )
    :Install
    CLS
    mode con: cols=64 lines=21
    title IORRT 1.9
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF ERRORLEVEL 1 (
    echo Installing IORRT
    ) ELSE (
    echo IORRT has already been installed!
    echo.
    echo Press any key to return to the main menu
    PAUSE 1>nul
    GOTO MAINMENU
    )
    mkdir "%SystemDrive%\IORRT"
    net stop osppsvc
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\IORRT\Backup\Files\Tokens"
    mkdir "%SystemDrive%\IORRT\Backup\Registry"
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv
    net start osppsvc
    SET file=%SystemDrive%\IORRT\IORRT.bat
    IF EXIST %file% attrib -h %file% 
    echo @echo off >%file%
    echo net stop osppsvc >>%file%
    echo xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >>%file%
    echo REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >>%file%
    echo net start osppsvc >>%file%
    echo IF Exist "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( >>%file%
    echo "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) ELSE ( "%COMMONPROGRAMFILES(X86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) >>%file%
    echo schtasks /delete /tn "IORRT" /f >>%file%
    echo schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc daily /mo 1 /ru "" >>%file%
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( 
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" 
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" 
    )
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc onstart /ru ""
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc daily /mo 1 /ru ""
    echo.
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus
    schtasks /query | FINDSTR /I "IORRT"
    echo.Press any key to return to the main menu
    pause > nul
    GOTO MAINMENU
    )
    :Uninstall
    mode con: cols=64 lines=21
    title IORRT 1.9
    schtasks /query | FINDSTR /I "IORRT" >NUL
    IF '%ERRORLEVEL%' EQU '0' (
    echo Uninstalling IORRT
    ) ELSE (
    echo IORRT is already uninstalled
    echo.
    echo Press any key to return to the main menu
    PAUSE 1>nul
    GOTO MAINMENU
    )
    net stop osppsvc
    xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform"
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv
    net start osppsvc
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv"
    SET file=%SystemDrive%\IORRT
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    schtasks /delete /tn "Hybrid" /f
    schtasks /delete /tn "IORRT" /f
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus
    schtasks /query | FINDSTR /I "IORRT"
    echo.
    echo.Press any key to return to the main menu
    pause > nul
    GOTO MAINMENU
    )
    :Restore/Rearm
    mode con: cols=64 lines=21
    title IORRT 1.9
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF '%ERRORLEVEL%' EQU '0' (
    echo Restoring/Rearming IORRT
    ) ELSE (
    echo Install IORRT before you Restore/Rearm
    echo.
    echo Press any key to return to the main menu
    PAUSE 1>nul
    GOTO MAINMENU
    )
    net stop osppsvc
    xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform"
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv
    net start osppsvc
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( 
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" 
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" 
    )
    schtasks /delete /tn "IORRT" /f 
    schtasks /create /tn "IORRT" /tr '"%SystemDrive%\IORRT\IORRT.bat"' /sc daily /mo 1 /ru ""
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus
    schtasks /query | FINDSTR /I "IORRT"
    echo.Press any key to return to the main menu
    pause > nul
    GOTO MAINMENU
    )
    :Status
    mode con: cols=64 lines=21
    title IORRT 1.9
    cd /D "%InstallRoot%"
    cscript OSPP.VBS /dstatus
    schtasks /query | FINDSTR /I "IORRT"
    IF ERRORLEVEL 1 echo IORRT is not yet Installed
    echo.
    echo.Press any key to return to the main menu
    pause > nul
    GOTO MAINMENU
    )
    :Exit
    ;)
     
  12. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    Well see ya later guys, gota work, Will come later at Work break, lol
     
  13. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #433 timesurfer, Dec 20, 2010
    Last edited: Dec 20, 2010
    (OP)
    I just tried to look at your code in your console and you did a lot of changing stuff to IORRT. That isn't what I wanted when I said you could put IORRT in your combo console. Please put it back so IORRT can be like I did it on first post. It works fine the way it is and I'd like it to be presented as such. I appreciate you helping me to do rearm check but that is all IORRT needs or could make it easier to troubleshoot 0 rearms error

    Thank you
     
  14. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #434 DARKOR04, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    I change this :MAINMENU TO :IRMAINMENU and all starts with :IR..... Conflicts with original ones.
    Added in menu your instructions
    This:
    Code:
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto RearmCheck
    to this: because my console menus use this format.
    Code:
    choice /C abcdefg /N /M "Make your selection [a-g]: "
    echo.
    IF ERRORLEVEL 7 goto OSCHECK <this one added for compatibility with windows vista and xp the user see nothing.
    IF ERRORLEVEL 6 goto END
    IF ERRORLEVEL 5 goto IORRTINSTRUCTION
    IF ERRORLEVEL 4 goto IRStatus
    IF ERRORLEVEL 3 goto IRRestore/Rearm
    IF ERRORLEVEL 2 goto IRUninstall
    IF ERRORLEVEL 1 goto IRInstall
    and put a >nul at the end of some procedures to only show a message
    of what have done..
    The original code is intact just that... I think is no big deal since user will not notice unless
    open the batch with Notepad...

    Note: Whitout those minor changes IORRT part crash WOAT....
     
  15. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #435 timesurfer, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    (OP)
    I saw this

    REG DELETE "HKLM\SOFTWARE\Microsoft\Office\14.0\Registration" /f >nul
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >nul
    REG ADD HKLM\SOFTWARE\Microsoft\Office\14.0\Registration /f >nul
    REG RESTORE "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\RearmCheckTemp\Backup\Registry\OfficeSPPInfo.hiv >nul
    REG IMPORT %SystemDrive%\RearmCheckTemp\Backup\Registry\Registration.reg >nul
     
  16. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #436 DARKOR04, Dec 20, 2010
    Last edited: Dec 20, 2010
    That part is for the Rearm Check code I use nothing else, that will not interfiere with IORRT...
    When finish rearm check then is when IORRT really start.... your code is intact...;)

    BTW that code is not yet in WOAT is in the part I wrote for your console rearm check if 0 then cannot install else Installs as always the user do not see that eather...
     
  17. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #437 timesurfer, Dec 20, 2010
    Last edited: Dec 20, 2010
    (OP)
    You said via pm if I wanted you'd remove my IR4 and IORRT from your tool and I sent you a pm regarding that. I believe there is just no need for two IR4's and IORRT's at MDL!

    Even though MD's bat file is exactly the same as was used in the IR4 project he did do a project of IR4 in batch so just give it his console name

    Windows 7 Rearm Forever 2.0
     
  18. DARKOR04

    DARKOR04 MDL Tester/Developer

    Jul 5, 2010
    497
    909
    10
    #438 DARKOR04, Dec 20, 2010
    Last edited: Jan 22, 2011
    Deleted by darkor, inappropriate content...
     
  19. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #439 timesurfer, Dec 20, 2010
    Last edited by a moderator: Apr 20, 2017
    (OP)
  20. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    If people can't get their status to say 43200 after IORRT install it means they have no rearms!

    So odd's are someone will post it didn't work and I'll just tell to check their rearms with Cody's tool to see if it's 0 rearms thus they will have to again use Cody's tool to repair the rearms

    This is much simpler since they the only reason IORRT doesn't work is rearm error thus they'll have to use only Cody's tool to repair office

    Thanks again Cody for your toolkit :worthy: