Adobe PDF -filer är skyddade dokument som du kan dela ut till läsare på Internet . Du kan konvertera flera filtyper till PDF för att skydda ditt arbete från att kopieras eller redigeras . Dessa filer kan konverteras on- the-fly med hjälp av Visual Basic -programmering . Detta är bra när du har dokument på din webbserver som du vill skydda och distribuera på nätet . Visual Basic har interna bibliotek som används för att konvertera Excel-fil till PDF . Instruktioner
1
Skapa din anslutning till Excel . Detta görs med hjälp av en anslutning objekt som innehåller Excel drivrutinen . Följande kod skapar Excel -anslutning :
Dim conn Som ADODB.Connection
Dim connstring As String
connstring = " Driver = { Microsoft Excel Driver ( * xls . ) }; DriverId = 790 ; DBQ = excelfile.xls ; "
conn.ConnectionString = connstring
2
hämta information från Excel-kalkylblad . I det här exemplet , är all information från Excel vidtagits för att konvertera hela filen till PDF . Följande kod kopierar alla Excel- data:
sql = " SELECT * FROM Tabell1 "
excel_records = recordset.Open sql , con , , adLockOptimistic , adCmdText
Ersätt " Blad1 " med namnet på kalkylbladet i filen .
3
Skapa PDF-filen . Du måste först initiera PDF- klassen och ange filen vars innehåll överförs . I följande kod skapas och öppnar filen :
Dim pdf Som New mjwPDF
pdf.PDFTitle = " Excel till PDF konvertering "
pdf.PDFFileName = " converted.pdf "
4
Spara Excel informationen till PDF-filen . Följande kod överför din Excel uppgifter :
pdf.PDFTextOut excel_records.ToString
5
Stäng Excel- och PDF- filer för att frigöra de resurser som används för att öppna dem . Detta är bra för serverns prestanda och frigör alla operativsystem lås på filerna . Följande kod släpper filerna :
Set pdf = Nothing
Set conn = Nothing
