by Peter Elisa Souhoka (21 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 14th August 2008
Date Added: Mon 8th February 2021
Rating: (1 Votes)
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
Dim strIn as string,strOut as string
strIn=App.Path & "\test2.pdf"
strOut=app.Path & "\test2.html"
Call PDFToHTML (strIn, strOut)
End Sub