I’m currently doing another deployment of Acrobat Reader, this time with VBScript. I wrote about using Visual Basic to do that here.
Function CheckForPro
' returns TRUE if Acrobat Pro found OR we're not able to read registry key
Dim strHost,sAddRemTmp,iRegRC,objFCReg,strAddRemValue,arrSubKeys,strSubKey
Const strBaseKey = "Software\Microsoft\Windows\CurrentVersion\Uninstall\"
Const HKEY_LOCAL_MACHINE = &H80000002
strHost = "."
sAddRemTmp = ""
iRegRC = 0
CheckForPro = False
Set objFCReg = GetObject("winmgmts://" & strHost & "/root/default:StdRegProv")
iRegRC = objFCReg.EnumKey (HKEY_LOCAL_MACHINE, strBaseKey, arrSubKeys)
If iRegRC <> 0 Then
CheckForPro = True
Exit Function
End If
For Each strSubKey In arrSubKeys
intAddRemRet = objFCReg.GetStringValue(HKEY_LOCAL_MACHINE, strBaseKey & strSubKey, "DisplayName", strAddRemValue)
If intAddRemRet = 0 Then
If InStr(lcase(strAddRemValue),"acrobat") <> 0 Then
If InStr(lcase(strAddRemValue),"pro") <> 0 Then
CheckForPro = True
Exit Function
End If
End If
End If
Next
CheckForPro = False
End Function
Update 11 DEC 2013:
A clever co-worker also points out that if you have a “acrobat.exe” somewhere in Acrobat Program Files directory, then this means you have a Acrobat Pro installation.