arquivos Adobe PDF são documentos que você pode distribuir para os leitores na Internet protegido. Você pode converter vários tipos de arquivos para PDF para proteger o seu trabalho de ser copiado ou editado . Esses arquivos podem ser convertidos on-the -fly usando programação Visual Basic. Isso é benéfico quando você tem documentos em seu servidor web que você deseja proteger e distribuir online. Visual Basic tem bibliotecas internas usadas para converter o arquivo do Excel para PDF. Instruções
1
Crie a sua conexão com a planilha do Excel. Isso é feito usando um objeto de conexão que inclui o controlador do Excel. O código a seguir cria a conexão Excel:
Dim conn As ADODB.Connection
Dim connString As String
connString = " Driver = { Microsoft Excel ( *. Xls) }; DriverId = 790 ; Dbq = ExcelFile.xls ; "
conn.ConnectionString = connString
2
Recuperar as informações da planilha do Excel. Neste exemplo, todas as informações da planilha Excel é levado para converter o arquivo inteiro para o PDF. Os seguintes códigos de cópias de todos os dados do Excel:
sql = "SELECT * FROM sheet1 "
excel_records = Recordset.Open sql, con, , adLockOptimistic , adCmdText
Substituir " Sheet1 " com o nome de sua planilha no arquivo .
3
Crie o arquivo PDF. Primeiro, você deve iniciar a classe PDF e especificar o arquivo para o qual o conteúdo é transferido. O código a seguir cria e abre o arquivo :
Dim pdf As New mjwPDF converted.pdf
pdf.PDFTitle = " Excel para conversão de PDF "
pdf.PDFFileName = " "
4
Salve as informações do Excel para o arquivo PDF. O código a seguir transfere suas informações Excel:
pdf.PDFTextOut excel_records.ToString
5
Feche o Excel e PDF para liberar os recursos utilizados para abri-los. Isso é bom para o desempenho do servidor e libera os bloqueios do sistema operacional sobre os arquivos . O código a seguir libera os arquivos:
Set pdf = Nothing
Set Conn = Nothing