De docx para pdf. Como?

09/07/2012

0

.NET

Tenho um arquivo:
D:\Documentos\Cobranca_Itau.docx

Como faço para salvar esse cara em pdf usando C# e WindowsApplication?

Esse documento ele vaientrar em um loop(semelhante a uma mala direta) e algumas variáveis serão substituida pelos valores vindos de um BD(MySql) e depois salvar com um determinado nome em pdf. Tenho o iText já, mas ainda não conseguir fazer. Abrir o docx e substituir as variáveis, já fiz, mas o PDF é que tá osso. Tentei instalar o Report.dll, para fazer um exemplo que peguei na net, mas não consigo instalar e até pq não sei se é Report ou Reports. Qualquer ajuda é bem-vinda. Obrigado.
Pjava

Pjava

Responder

Posts

09/07/2012

Moisés Gonçalves

Utilize o interop do Word.


            Microsoft.Office.Interop.Word.Application word = new Microsoft.Office.Interop.Word.Application();
            Microsoft.Office.Interop.Word.Document doc = new Microsoft.Office.Interop.Word.Document();

            object missing = System.Type.Missing;

            try
            {
                object fileName = @C:\Documento.docx;
                doc = word.Documents.Open(ref fileName,
                    ref missing, ref missing, ref missing, ref missing,
                    ref missing, ref missing, ref missing, ref missing,
                    ref missing, ref missing, ref missing, ref missing,
                    ref missing, ref missing, ref missing);

                doc.Activate();

                foreach (Microsoft.Office.Interop.Word.Range tmpRange in doc.StoryRanges)
                {
                    tmpRange.Find.Text = <Valor>
                    tmpRange.Find.Replacement.Text = Valor a substituir;
                    tmpRange.Find.Replacement.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;



                    tmpRange.Find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindContinue;
                    object replaceAll = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll;

                    tmpRange.Find.Execute(ref missing, ref missing, ref missing,
                        ref missing, ref missing, ref missing, ref missing,
                        ref missing, ref missing, ref missing, ref replaceAll,
                        ref missing, ref missing, ref missing, ref missing);
                }

                doc.Save();

                doc.Close(ref missing, ref missing, ref missing);
                word.Application.Quit(ref missing, ref missing, ref missing);
            }
            catch (Exception ex)
            {
                doc.Close(ref missing, ref missing, ref missing);
                word.Application.Quit(ref missing, ref missing, ref missing);
            }
Responder
Gostei + 0

09/07/2012

Moisés Gonçalves

No caso, para salvar no formato word utilize a lógica abaixo no lugar do
doc.Save();

            // Arquivo de Destino
            object newFileName = c:\\Arquivo.pdf;

            // Formato para Salvar o Arquivo – Destino  - No caso, PDF
            object formatoArquivo = Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatPDF;

            // Alterações no tamanho do Papel – No caso, utilizando o formato A5
            doc.PageSetup.PaperSize = Microsoft.Office.Interop.Word.WdPaperSize.wdPaperA4;

            // Alterações na Orientação do Papel
            doc.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientLandscape;

            // Salvar Arquivo
            doc.SaveAs(ref newFileName, ref formatoArquivo, ref missing, ref missing, ref missing, ref missing, ref missing,
                ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);

            // Não salvar alterações no arquivo original
            object salvarAlteracoesArqOriginal = false;
            wordApp.Quit(ref salvarAlteracoesArqOriginal, ref missing, ref missing);
Responder
Gostei + 0

10/07/2012

Pjava

Ok, mas como eu faço para salvar em PDF e não abrir em modo leitura? Vou testar esse código agora, mas tenho essa dificuldade
Responder
Gostei + 0

10/07/2012

Pjava

Com esse código, dá esse erro:

Attempted to read or write protected memory. This is often an indication that other memory is corrupt.

Com o código abaixo eu consigo abrir e alterar, mas está muito lento e não consigo salvar em PDF que é o meu objetivo também

string nome = NOMEVAR;
int count = documento.Words.Count;
for (int i = 1; i <= count; i++)
{
if (nome == documento.Words[i].Text)
{
documento.Words[i].Text = Paulo;
}
documento.Save();
........
Responder
Gostei + 0

10/07/2012

Pjava

Com esse código, dá esse erro:

Attempted to read or write protected memory. This is often an indication that other memory is corrupt.

Com o código abaixo eu consigo abrir e alterar, mas está muito lento e não consigo salvar em PDF que é o meu objetivo também

string nome = NOMEVAR;
int count = documento.Words.Count;
for (int i = 1; i <= count; i++)
{
if (nome == documento.Words[i].Text)
{
documento.Words[i].Text = Paulo;
}
documento.Save();
........
Responder
Gostei + 0

10/07/2012

Pjava

Esse é meu código:

Microsoft.Office.Interop.Word.Application word = new Microsoft.Office.Interop.Word.Application();
Microsoft.Office.Interop.Word.Document doc = new Microsoft.Office.Interop.Word.Document();

object missing = System.Type.Missing;

try
{
object fileName = @D:\CLS Documentos\NOTIFICAÇÃO_EXTRAJUDICIAL_MODELO_ITAU2.docx;
doc = word.Documents.Open(ref fileName,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing);

doc.Activate();

foreach (Microsoft.Office.Interop.Word.Range tmpRange in doc.StoryRanges)
{
tmpRange.Find.Text = NOMEVAR; ====>>>> Aqui dá o erro
tmpRange.Find.Replacement.Text = Paulo;
tmpRange.Find.Replacement.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;

tmpRange.Find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindContinue;
object replaceAll = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll;

tmpRange.Find.Execute(ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref replaceAll,
ref missing, ref missing, ref missing, ref missing);
}

doc.Save();

doc.Close(ref missing, ref missing, ref missing);
word.Application.Quit(ref missing, ref missing, ref missing);
}
catch (Exception ex)
{
doc.Close(ref missing, ref missing, ref missing);
word.Application.Quit(ref missing, ref missing, ref missing);
}
Responder
Gostei + 0

10/07/2012

Pjava

Com esse código, gera o PDF, mas não carrega o conteúdo do documento DOCX, apenas o título que vai no Chunck, pois ele grava apenas o título. Como eu gero o conteúdo do docx dentro do pdf? Pelo visto, eu preciso abrir o documento e gravar o conteúdo. Abaixo meu código:
string nome = NOMEVAR;
int count = doc.Words.Count;
for (int i = 1; i <= count; i++)
{
if (nome == doc.Words[i].Text)
{
doc.Words[i].Text = Paulo;
}
doc.Save();

iTextSharp.text.Document document = new iTextSharp.text.Document();
PdfWriter.GetInstance(document, new FileStream(@D:\CLS Documentos\TESTE.pdf, FileMode.Create));
document.Open();
//Insere conteúdo no arquivo
document.Add(new Chunk(D:\\CLS Documentos\\NOTIFICAÇÃO_EXTRAJUDICIAL_MODELO_ITAU1.docx));
document.Close();

}
Responder
Gostei + 0

10/07/2012

Pjava

Fiz isso dentro do for acima e vem vazio o pdf:

document.Add(new Chunk(doc.Words[i].Text.ToString()));
Responder
Gostei + 0

10/07/2012

Moisés Gonçalves

Você não vai usar uma biblioteca para o PDF.
Veja a lógica do meu segundo post.
Nela o próprio Word irá exportar o PDF.
Responder
Gostei + 0

10/07/2012

Pjava

Então Moisés, no se código, dá esse erro e não sei como resolver.

Attempted to read or write protected memory. This is often an indication that other memory is corrupt.

Aí tentei um segundo e que é esse postado(após o seu), eu abro o docx, mas ao gerar o PDF vem vazio.
Responder
Gostei + 0

10/07/2012

Pjava

se faço assim:

string texto = ;

for(....)

texto = doc.Words[i].Text.ToString();

document.Add(new Chunk(texto);

Não vem nada, mas se coloco assim:

for(...)

texto = Testando aplicação;

document.Add(new Chunk(texto);

Aí o pdf vem: Testando a aplicação;
Responder
Gostei + 0

10/07/2012

Pjava

Moisés, tentei mesclar o meu código para renomear com seu para gerar o PDF e deu esse erro:

ERRO: Comando Falhou(na linha abaixo)

doc.SaveAs(ref newFileName, ref formatoArquivo, ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);
Responder
Gostei + 0

10/07/2012

Pjava

Esse codigo dá erro no ApplicationClass()
Microsoft.Office.Interop.Word.ApplicationClass wordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            object filename = nomeDoArquivo.doc;
            object newFileName = nomeDoArquivo.pdf;

            object missing = System.Type.Missing;

            // Abrir documento
            Microsoft.Office.Interop.Word.Document doc = wordApp.Documents.Open(ref filename, ref missing, ref missing, ref missing, ref missing, ref missing,
                ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing,
                ref missing, ref missing, ref missing);

            // Formato para Salvar o Arquivo – Destino  - No caso, PDF
            object formatoArquivo = Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatPDF;

            // Alterações no tamanho do Papel – No caso, utilizando o formato A5
            doc.PageSetup.PaperSize = Microsoft.Office.Interop.Word.WdPaperSize.wdPaperA5;

            // Alterações na Orientação do Papel
            doc.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientLandscape;

            // Salvar Arquivo
            doc.SaveAs(ref newFileName, ref formatoArquivo, ref missing, ref missing, ref missing, ref missing, ref missing,
                ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);

            // Não salvar alterações no arquivo original
            object salvarAlteracoesArqOriginal = false;
            wordApp.Quit(ref salvarAlteracoesArqOriginal, ref missing, ref missing);
Responder
Gostei + 0

10/07/2012

Pjava

Nessa linha o erro é: Comando Falhou.

doc.SaveAs(ref newFileName, ref formatoArquivo, ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);
Responder Citação Marcar como Resposta Editar Excluir
Responder
Gostei + 0

10/07/2012

Pjava

O que está errado nesse código:
Microsoft.Office.Interop.Word.Application wordApplication = new Microsoft.Office.Interop.Word.Application();
            Microsoft.Office.Interop.Word.Document wordDocument = null;

            object paramSourceDocPath = @D:\CLS Documentos\NOTIFICAÇÃO_EXTRAJUDICIAL_MODELO_ITAU1.docx;
            //object newFileName = @D:\CLS Documentos\nomeDoArquivo.pdf;

            object paramMissing = System.Type.Missing;

            string paramExportFilePath = @D:\CLS Documentos\Test.pdf;

            WdExportFormat paramExportFormat = WdExportFormat.wdExportFormatPDF;
            bool paramOpenAfterExport = false;
            WdExportOptimizeFor paramExportOptimizeFor =
                WdExportOptimizeFor.wdExportOptimizeForPrint;
            WdExportRange paramExportRange = WdExportRange.wdExportAllDocument;
            int paramStartPage = 0;
            int paramEndPage = 0;
            WdExportItem paramExportItem = WdExportItem.wdExportDocumentContent;
            bool paramIncludeDocProps = true;
            bool paramKeepIRM = true;
            WdExportCreateBookmarks paramCreateBookmarks =
                WdExportCreateBookmarks.wdExportCreateWordBookmarks;
            bool paramDocStructureTags = true;
            bool paramBitmapMissingFonts = true;
            bool paramUseISO19005_1 = false;

            try
            {
                // Open the source document.
                wordDocument = wordApplication.Documents.Open(
                    ref paramSourceDocPath, ref paramMissing, ref paramMissing,
                    ref paramMissing, ref paramMissing, ref paramMissing,
                    ref paramMissing, ref paramMissing, ref paramMissing,
                    ref paramMissing, ref paramMissing, ref paramMissing,
                    ref paramMissing, ref paramMissing, ref paramMissing,
                    ref paramMissing);

                // Export it in the specified format.
                if (wordApplication != null)
                    wordDocument.ExportAsFixedFormat(paramExportFilePath,
                        paramExportFormat, paramOpenAfterExport,
                        paramExportOptimizeFor, paramExportRange, paramStartPage,
                        paramEndPage, paramExportItem, paramIncludeDocProps,
                        paramKeepIRM, paramCreateBookmarks, paramDocStructureTags,
                        paramBitmapMissingFonts, paramUseISO19005_1,
                        ref paramMissing);
            }
            catch (Exception ex)
            {
                Erro = ex.Message;
            }
            finally
            {
                // Close and release the Document object.
                if (wordDocument != null)
                {
                    wordDocument.Close(ref paramMissing, ref paramMissing,
                        ref paramMissing);
                    wordDocument = null;
                }

                // Quit Word and release the ApplicationClass object.
                if (wordApplication != null)
                {
                    wordApplication.Quit(ref paramMissing, ref paramMissing,
                        ref paramMissing);
                    wordApplication = null;
                }

                GC.Collect();
                GC.WaitForPendingFinalizers();
                GC.Collect();
                GC.WaitForPendingFinalizers();
            }
               
        }
Responder
Gostei + 0
Mais tópicos

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar