Aloaha Software

Set AloahaPDF = CreateObject(“AloahaSimplePDF_oop.simpleEdit”)
MsgBox CStr(AloahaPDF.readername(0))
Set AloahaPDF = Nothing