PDF Convert
API Declarations
dim strTools as string
strTools=App.path & "\pdftohtml.exe"
Dim intRet as integer
intRet=Shell(strTools & " -c -hr " & strIn & " " & strOut, vbHide)
if intRet=0 then
msgbox ("Error..." & vbCrlf & Err.Description)
End If
End sub