Sådan Konverter en Excel-fil til PDF via VB6

March 23

Sådan Konverter en Excel-fil til PDF via VB6

Adobe PDF-filer er beskyttede dokumenter, du kan distribuere til læserne på internettet. Du kan konvertere flere filtyper til PDF for at beskytte dit arbejde kan kopieres eller redigeres. Disse filer kan konverteres on-the-fly ved hjælp af Visual Basic programmering. Dette er nyttigt, når du har dokumenter på din webserver, som du ønsker at beskytte og distribuere online. Visual Basic har interne biblioteker, der anvendes til at konvertere din Excel-fil til PDF.

Vejledning


• Opret din forbindelse til Excel regneark. Dette gøres ved hjælp af en forbindelse objekt, der indeholder Excel driver. Følgende kode opretter Excel forbindelse: Dim con som ADODB.Connection Dim connstring As String connstring = "Driver = {Microsoft Excel-driver (* .xls)}; DriverId = 790; DBQ = excelfile.xls;" conn.ConnectionString = connstring

• Hente oplysninger fra Excel-regneark. I dette eksempel er alle oplysninger fra Excel-regnearket taget til at konvertere hele filen til PDF. Følgende kode kopier alle Excel data: sql = "SELECT * FROM ark 1" excel_records = recordset.Open sql, con,, adLockOptimistic, adCmdText Erstat "Ark1" med navnet på dit regneark i filen.

• Opret PDF-filen. Du skal først starte PDF klasse og angiv den fil, overføres indholdet. Følgende kode opretter og åbner filen: Dim pdf som ny mjwPDF pdf.PDFTitle = "Excel til PDF konvertering" pdf.PDFFileName = "converted.pdf"

• Gem Excel oplysninger til PDF-filen. Følgende kode overfører dine Excel information: pdf.PDFTextOut excel_records.ToString

• Luk Excel og PDF-filer for at frigøre de ressourcer, der bruges til at åbne dem. Det er godt for serverens ydeevne og frigør eventuelle operativsystem låse på filerne. Følgende kode frigiver filerne: Indstil PDF = Nothing Set Conn = Nothing