Adobe PDF- filer er beskyttet dokumenter du kan distribuere til lesere på internett . Du kan konvertere flere filtyper til PDF for å beskytte arbeidet blir kopiert eller redigert . Disse filene kan konverteres on-the -fly ved hjelp av Visual Basic programmering. Dette er gunstig 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. Instruksjoner
en
Lag din forbindelse til Excel-regneark . Dette gjøres ved hjelp av en tilkobling objekt som inneholder Excel -driveren. Følgende kode oppretter Excel -tilkobling : en
Dim conn Som ADODB.Connection
Dim connstring As String
connstring = " Driver = { Microsoft Excel Driver ( * xls . ) }; DriverId = 790 ; DBQ = excelfile.xls ; "
conn.ConnectionString = connstring
2
igjen informasjonen fra Excel-regneark. I dette eksemplet er all informasjon fra Excel regneark tatt for å konvertere hele filen til PDF . Følgende kode kopierer alle Excel data : en
sql = "SELECT * FROM Ark1 "
excel_records = recordset.Open sql , con, , adLockOptimistic , adCmdText
Erstatt " Ark1 " med navnet på regnearket i filen .
3
Opprett PDF-fil . Du må først starte PDF klasse og angi filen der innholdet er overført. Følgende kode oppretter og åpner filen : en
Dim pdf Som New mjwPDF
pdf.PDFTitle = "Excel til PDF-konvertering "
pdf.PDFFileName = " converted.pdf "
4
Lagre Excel informasjon til PDF-fil . Følgende kode overfører Excel informasjon : en
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 alle operativsystem låser på filer . Følgende kode slipper filene : en
Set pdf = Ingenting
Set conn = Ingenting