Total HTML Converter X

 dim C Set C=CreateObject("HTMLConverter.HTMLConverterX") C.Convert "c:\\source.HTML", "c:\\dest.JPG", "-cJPG -log c:\\html.log" C.Convert "https://www.coolutils.com/", "c:\\URL Page.PDF", "-cPDF -log c:\\html.log" set C = nothing 

 dim C Set C=CreateObject("HTMLConverter.HTMLConverterX") Response.Clear Response.AddHeader "Content-Type", "binary/octet-stream" Rresponse.AddHeader "Content-Disposition", "attachment; filename=test.pdf" Response.BinaryWrite c.ConvertToStream("C:\\www\\ASP\\Source.html", "C:\\www\\ASP", "-cpdf -log c:\\html.log") set C = nothing 

 Przykład PHP: $src="C:\\test\\test.html"; $dest="C:\\test\\test.pdf"; if (file_exists($dest)) unlink($dest); $c= new COM("HTMLConverterPro.HTMLConverterX"); $c->convert($src,$dest, "-c pdf -log c:\\HTML.log"); if (file_exists($dest)) echo "OK"; else echo "fail:".$c->ErrorMessage; 

 require 'win32ole' c = WIN32OLE.new('HTMLConverterPro.HTMLConverterX') src="C:\\test\\test.html"; dest="C:\\test\\test.tiff"; c.convert(src,dest, "-c TIFF -log c:\\test\\HTML.log"); if not File.exist?(dest) puts c.ErrorMessage end 

 import win32com.client import os.path c = win32com.client.Dispatch("HTMLConverterPro.HTMLConverterX") src="C:\\test\\test.eml"; dest="C:\\test\\test.tiff"; c.convert(src, dest, "-c TIFF -log c:\\test\\HTML.log"); if not os.path.exists(file_path): print(c.ErrorMessage) 

 uses Dialogs, Vcl.OleAuto; var c: OleVariant; begin c:=CreateOleObject('HTMLConverterPro.HTMLConverterX'); C.Convert('c:\\test\\source.html', 'c:\\test\\dest.tiff', '-c TIFF -log c:\\test\\HTML.log'); IF c.ErrorMessage<> Then ShowMessage(c.ErrorMessage); end; 

 var c = new ActiveXObject("HTMLConverterPro.HTMLConverterX"); c.Convert("C:\\test\\source.html", "C:\\test\\dest.pdf", "-c PDF"); if (c.ErrorMessage!="") alert(c.ErrorMessage) 

 use Win32::OLE; my $src="C:\\test\\test.html"; my $dest="C:\\test\\test.tiff"; my $c = CreateObject Win32::OLE 'HTMLConverterPro.HTMLConverterX'; $c->convert($src,$dest, "-c TIFF -log c:\\test\\HTML.log"); print $c->ErrorMessage if -e $dest;