this ought to do it...
code:
 
$acrobat=readvalue('HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\AcroRd32.exe','')
$acrover=getfileversion($acrobat)
if left($acrover,1)='5'
$UnInstKey=readvalue('HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Adobe Acrobat 5.0','UninstallString')
shell "$uninstkey -q"
endif

_________________________
How to ask questions the smart way <-----------> Before you ask