Abrir documento Docx pelo Windows Application
06/07/2012
0
Pjava
Posts
07/07/2012
Pjava
class WordFill {
public void PreencherPorReplace(string CaminhoDocMatriz)
{
object missing = System.Reflection.Missing.Value;
Word.Application oApp = new Word.Application();
object template = CaminhoDocMatriz;
Word.Document oDoc = oApp.Documents.Add(ref template, ref missing, ref missing, ref missing);
Word.Range oRng = oDoc.Range(ref missing, ref missing);
object FindText = [@NOME];
object ReplaceWith = PAULO;
object MatchWholeWord = true;
object Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@CPF];
ReplaceWith = 000.000.000-00;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@ENDERECO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@CEP];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CIDADE];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@UF];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CONTRATO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@NOME_BANCO];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@END_BANCO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@BAI_BANCO];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CID_BANCO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@UF_BANCO];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CEP_BANCO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
FindText = [@VENCTO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@ASSESSORIA];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@END_ASSE];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@BAI_ASSE];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CID_ASSE];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@UF_ASSE];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@CEP_ASSE];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oRng = oDoc.Range(ref missing, ref missing);
FindText = [@FONE_ASSE];
ReplaceWith = Pajero;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
oApp.Visible = true;
FindText = [@VENCTO];
ReplaceWith = azul;
MatchWholeWord = true;
Forward = false;
oRng.Find.Execute(ref FindText, ref missing, ref MatchWholeWord, ref missing, ref missing, ref missing, ref Forward,
ref missing, ref missing, ref ReplaceWith, ref missing, ref missing, ref missing, ref missing, ref missing);
}
}
private void button3_Click(object sender, EventArgs e)
{
try
{
WordFill clsWord = new WordFill();
clsWord.PreencherPorReplace(Application.StartupPath + \\NOTIFICAÇÃO_EXTRAJUDICIAL_MODELO_ITAU1.docX);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
Esse é o erro:
Attempted to read or write protected memory. This is often an indication that other memory is corrupt.
07/07/2012
Pjava
using System;
using System.ComponentModel;
using System.Collections.Generic;
using System.Data;
using System.Text;
using System.Configuration;
using System.Windows.Forms;
using MySql.Data.MySqlClient;
using System.Data.OleDb;
using Microsoft.Office.Interop.Word;
Application application = new Application(); ==>> Erro no Application
Document document = application.Documents.Open(C:\\word.doc); ==>> Erro no Documents
// Loop through all words in the document.
int count = document.Words.Count;
for (int i = 1; i <= count; i++)
{
// Write the word.
string text = document.Words[i].Text;
Console.WriteLine(Word = , i, text);
}
// Close word.
application.Quit(); ==>> Erro no Quit
07/07/2012
Pjava
Microsoft.Office.Interop.Word.Application application = new Microsoft.Office.Interop.Word.Application();
07/07/2012
Pjava
1.Deseja abrir o arquivo emmodo leitura?
2. Deseja mesclar .....
Esse é o código escrito:
string nome = NOME;
// Loop through all words in the document.
int count = document.Words.Count;
for (int i = 1; i <= count; i++)
{
if (nome == document.Words[i].Text)
{
nome.Replace(NOME, Paulo);
}
// Write the word.
//string text = document.Words[i].Text;
//Console.WriteLine(Word = , i, text);
}
07/07/2012
Pjava
Código correto:
for (int i = 1; i <= count; i++)
{
if (nome == document.Words[i].Text)
{
document.Words[i].Text = Paulo;
}
}
Clique aqui para fazer login e interagir na Comunidade :)