How about

Code:
  
$mdac = right(ReadValue("HKEY_CLASSES_ROOT\MDACVer.Version\CurVer", ""),4)

$=Open (1, "\\path\mdac.txt", 4)
$=Writeline (1, @userid + "," + @fullname + "," + @wksta + "," + ",mdac=" + $mdac + chr(13) + chr(10))
$=Close (1)