Slik konverterer en Excel-fil til PDF Gjennom VB6

Adobe PDF-filer er beskyttet dokumenter du kan distribuere til lesere på internett. Du kan konvertere flere filtyper til PDF for å beskytte arbeidet ditt blir kopiert eller redigert. Disse filene kan konverteres on-the-fly ved hjelp av Visual Basic programmering. Dette er praktisk når du har dokumenter på webserveren din som du ønsker å beskytte og distribuere online. Visual Basic har interne biblioteker som brukes til å konvertere Excel-fil til PDF.

Bruksanvisning

1 Lag din forbindelse til Excel-regneark. Dette gjøres ved hjelp av en tilkobling objekt som inneholder Excel-driveren. Følgende kode oppretter Excel forbindelsen:

Dim conn Som ADODB.Connection
Dim connstring As String
connstring = "Driver = {Microsoft Excel Driver (* .xls)}; DriverId = 790; dbq = excelfile.xls;"
conn.ConnectionString = connstring

2 Hente informasjon fra Excel-regnearket. I dette eksemplet er all informasjon fra Excel regneark tatt for å konvertere hele filen til PDF. Følgende kode kopierer alle Excel-data:

sql = "SELECT * FROM Ark1"
excel_records = recordset.Open sql, con,, adLockOptimistic, adCmdText

Erstatt "Ark1" med navnet på regnearket i filen.

3 Lag PDF-filen. Du må først starte PDF klassen og angir filen som innholdet blir overført. Følgende kode oppretter og åpner filen:

Dim pdf som ny mjwPDF
pdf.PDFTitle = "Excel til PDF-konvertering"
pdf.PDFFileName = "converted.pdf"

4 Lagre Excel informasjon til PDF-filen. Følgende kode overfører dine Excel informasjon:

pdf.PDFTextOut excel_records.ToString

5 Lukk Excel og PDF-filer for å frigjøre de ressursene som brukes til å åpne dem. Dette er bra for server ytelse og frigjør eventuelle operativsystem låser på filene. Følgende kode utgivelser filene:

Set pdf = Ingenting
Sett conn = Ingenting