Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvorte si pripojenie k tabuľke programu Excel . To sa vykonáva pomocou objekt pripojenia , ktorý obsahuje ovládač Excel . Nasledujúci kód vytvorí spojenie programu Excel :
Dim conn Ako ADODB.Connection
Dim connstring As String
connstring = " Driver = { Microsoft Excel Driver ( . * Xls ) } ; DriverId = 790 ; DBQ = excelfile.xls ; "
conn.ConnectionString = connstring
2
Načítať informácie z pracovného hárka programu Excel . V tomto prípade , všetky informácie z tabuľky programu Excel je prijatá previesť celý súbor do formátu PDF . Nasledujúci skopíruje kód všetky dáta programu Excel :
sql = " SELECT * FROM Hárok1 "
excel_records = recordset.Open sql , con , , adLockOptimistic , adCmdText
Nahradiť " Hárok1 " s názvom vašej tabuľky v súbore .
3
Vytvoriť súbor PDF . Najprv je potrebné začať triedu PDF a určite súbor , ktorého obsah je prenesený . Nasledujúci kód vytvorí a otvorí súbor :
Dim pdf As New mjwPDF
pdf.PDFTitle = " Excel ku konverzii PDF "
pdf.PDFFileName = " converted.pdf "
4
Uloženie informácií programu Excel do súboru PDF . Nasledujúci kód odovzdáva svoje informácie Excel :
pdf.PDFTextOut excel_records.ToString
5
Zavrite Excel a PDF súbory uvoľniť prostriedky používané na ich otvorenie. To je dobré pre výkon servera a uvoľnia všetky operačný systém zámky na súboroch . Nasledujúci kód uvoľní súbory :
Set pdf = Nothing
Set conn = Nothing
Copyright © počítačové znalosti Všetky práva vyhradené