Dot Net Versions - uses ASoft .NET Version Detector tool to get list

The code below uses the free .NET version Detector from http://www.asoft.be/prod_netver.html

(I have renamed "dotnet.exe" to "ASoft-Dot-Net-Version-Detector.exe").

I have included a version so that you can run this example however if you use it I recommend getting the latest version from ASoft's website.

The Code for: "Dot Net Versions [uses ASoft .NET Version Detector tool to get list].cmd"

This is the example, a shortcut was installed to this code :

@echo off
setlocal

call :GetDotNetVersions
     echo Install .NET Versions=%DotNetVersions%

goto :EOF



::===========================================================================
:GetDotNetVersions
::===========================================================================
    set DotNetVersions=
    set        TmpFile=%TEMP%\DotNetDetaction.%RANDROM%.txt
    ASoft-Dot-Net-Version-Detector.exe "%DotNetFile%" "%TmpFile%"
        set Mode=?
        for /F "usebackq delims=" %%d in ("%TmpFile%") do call :HandleDetectorFileLine "%%d"
    del "%TmpFile%" >nul 2>&1
    goto :EOF


::===========================================================================
:HandleDetectorFileLine
::===========================================================================
    ::--- Make the line safe to manipulate ----------------------------------
    set LineDQ=%1
    set LineDQ=%LineDQ:>=}%
    set LineDQ=%LineDQ:<={%
    set   Line=%LineDQ:"=%
    ::echo LINE: %Line%

    ::--- In section: ==== FOLDERS ==== ? -----------------------------------
    if not "%Line%" == "%Line: FOLDERS =DIFFERENT%" set Mode=F&set Bits=?& goto :EOF
    if not "%Mode%" == "F" goto NotInFOLDERS
       ::--- Look for "{32Bit}" and similar ---------------------------------
       set L1=%Line:~0,1%
       if "%L1%" == "=" set Mode=?& goto NotInFOLDERS
       if "%L1%" == "{" set Bits=%Line%& goto :EOF

       ::--- Look for "2.0.50727.3053" and similar --------------------------
       if "%L1%" == " " goto :EOF
          if not "%DotNetVersions%" == "" set DotNetVersions=%DotNetVersions%; &rem
                                          set DotNetVersions=%DotNetVersions%%Bits%%Line%
          goto :EOF
    :NotInFOLDERS

    ::--- In section: ==== Installed .NET Frameworks ==== ? -----------------
    if not "%Line%" == "%Line:Installed .NET Frameworks=DIFFERENT%" set Mode=I&goto :EOF
    if not "%Mode%" == "I" goto NotInINSTALLED
        ::--- Exit if at end of report --------------------------------------
        if not "%Line%" == "%Line:END REPORT=DIFFERENT%" set Mode=F&goto :EOF

        ::--- Capture this entry --------------------------------------------
        if not "%DotNetVersions%" == "" set DotNetVersions=%DotNetVersions%; &rem
                                        set DotNetVersions=%DotNetVersions%%Line%
        goto :EOF
    :NotInINSTALLED
    goto :EOF