Need help in modifying Visio 2013 Professional to Standard downgrade script

Hi People,

Can anyone here please assist me in how to fix the below script so that it works to downgrade Visio 2013 Professional to Standard Edition ?

REM @echo off

if "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" goto x86
set ProgramFilesPath=%ProgramFiles(x86)%
goto RUN

:x86
set ProgramFilesPath=%ProgramFiles%

:OSPP
reg query HKLM\Software\Microsoft\Office\15.0\Common\OSPPRUNONCE
if %errorlevel%==1 (goto RUN) else (goto END)

:RUN
C:\Windows\system32\cscript.exe "%ProgramFilesPath%\Microsoft Office\Office15\ospp.vbs" /inpkey:J484Y-4NKBF-W2HMG-DBMJC-PGWR7
C:\Windows\system32\cscript.exe "%ProgramFilesPath%\Microsoft Office\Office15\ospp.vbs" /act

REM Rename the Visio Professional display name into Standard edition in the Add/Remove Program lists.
REG ADD "HKLM\Software\Microsoft\Office\15.0\Common\OSPPRUNONCE"
REG ADD "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Office15.VISPRO" /v DisplayName /d "Microsoft Visio Standard 2013"
REG ADD "HKLM\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Office15.VISPRO" /v DisplayName /d "Microsoft Visio Standard 2013"

:END
Exit

pause

Appendix:

• Source of the script: http://blogs.technet.com/b/odsupport/archive/2010/12/03/volume-license-editions-of-visio-2010-install-premium-edition-by-default.aspx
• Serial number: https://technet.microsoft.com/en-us/library/dn385360.aspx
  

Because when I execute the above script into my workstations, it doesn't down grade the Visio Edition, but the Registry to rename the Installation works as expected.

Here's the error message:

Thank you in advance.

/* Server Support Specialist */