|
fichiers Adobe PDF sont protégés documents que vous pouvez distribuer aux lecteurs sur Internet. Vous pouvez convertir différents types de fichiers au format PDF pour protéger votre travail d'être copiés ou modifiés . Ces fichiers peuvent être convertis à la volée en utilisant la programmation Visual Basic. Ceci est utile lorsque vous avez des documents sur votre serveur Web que vous souhaitez protéger et distribuer en ligne. Visual Basic possède des bibliothèques internes utilisés pour convertir votre fichier Excel au format PDF . Instructions
1 Créer votre connexion à la feuille de calcul Excel. Ceci est fait en utilisant un objet de connexion qui comprend le pilote Excel. Le code suivant crée la connexion Excel :
conn As ADODB.Connection
connString Dim As String
connString = " Driver = { Microsoft Excel Driver ( * . Xls ) }; DriverID = 790 ; Dbq = excelfile.xls ; "
conn.ConnectionString = connString
2 Récupérer les informations de la feuille de calcul Excel. Dans cet exemple, toutes les informations de la feuille de calcul Excel est pris pour convertir le fichier entier à la PDF . Le code suivant copie toutes les données Excel :
sql = "SELECT * FROM sheet1 "
excel_records = Recordset.Open sql , con , adLockOptimistic , adCmdText
Remplacer " Sheet1 " avec le nom de votre feuille de calcul dans le fichier .
3 Créer le fichier PDF . Vous devez d'abord lancer la classe PDF et spécifier le fichier dont le contenu est transféré . Le code suivant crée et ouvre le fichier : Photos pdf As New mjwPDF
pdf.PDFTitle = " Excel au format PDF conversion "
pdf.PDFFileName = " converted.pdf "
4 Enregistrer les informations Excel au format PDF. Le code suivant transfère vos données Excel :
pdf.PDFTextOut excel_records.ToString
5 fermer les fichiers Excel et PDF afin de libérer les ressources utilisées pour les ouvrir. C'est bon pour les performances du serveur et libère tous les verrous du système d'exploitation sur les fichiers . Le code suivant libère les fichiers :
Set pdf = Nothing
Set conn = Nothing
|
