Relatorios Asp Net Word

Veja se isso resolve, trabalhei em um projeto que utilizamos o Delphi 2007 for Net, e tinha uns contratos em word, na pasta do WebServer, o o usuario escolhia o cliente e pimba, tudo era preenchido. Usamos a referencia using Microsoft.Office.Interop.Wordcom ela da fazer quase tudo com um documento word.
http://imasters.uol.com.br/artigo/8774/aspnet/asp_net__trabalhando_com_o_microsoft_word/

Vlw pela atenção. Ja tinha visto esse site tive que fazer da seguinte maneira   /*Chamada classe */   try
        {
            string codcurso = "49";             string caminho = @"C:\usr\" + codcurso + ".doc";
            WordFill lala = new WordFill();
            lala.PreencherPorReplace(caminho, "Teste de Contrato", "Belo Horizonte", "DYEGO SCOFIELD FERREIRA FURLETTI", "SISTEMAS DE INFORMAÇÃO", "NOTURNO", "7", "5043422", "BRASILEIRO");
            Label1.Visible = false;
                    }         catch (Exception ex)
        {             Label1.Visible = true;
            Label1.Text = "Ocorreu um erro ao abrir o arquivo.";         }   /****************************/   Classe   using System;
using System.Collections.Generic;
using System.Text;
using Word = Microsoft.Office.Interop.Word; namespace PreencherWord
{
    public class WordFill
    {
        public void PreencherPorReplace(string CaminhoDocMatriz, string Contrato2, string DadosPolo, string NomeAluno, string DescCurso, string DescTurno, string Etapa, string Matricula, string Nacionalidade)
        {             //Objeto a ser usado nos parâmetros opcionais
            object missing = System.Reflection.Missing.Value;             //Abre a aplicação Word e faz uma cópia do documento mapeado
            Word.Application oApp = new Word.Application();             object template = CaminhoDocMatriz; //@"C:\\Users\\Luiz\\Documents\\Visual Studio 2005\\Projects\\PreencherWord";             Word.Document oDoc = oApp.Documents.Add(ref template, ref missing, ref missing, ref missing);             //Troca o conteúdo de alguns tags
            Word.Range oRng = oDoc.Range(ref missing, ref missing);             object MatchWholeWord = true;
            object Forward = false;            
            object FindText = "@DadosPolo ";
            object ReplaceWith = DadosPolo;
            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 = "@Contrato2";
            ReplaceWith = Contrato2;
            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 = "@NOMEALUNO";
            ReplaceWith = NomeAluno;
            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 = "@DescCurso";
            ReplaceWith = DescCurso;
            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 = "@DescTurno";
            ReplaceWith = DescTurno;
            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 = "@Etapa";
            ReplaceWith = Etapa;
            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 = "@Matricula";
            ReplaceWith = Matricula;
            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 = "@Nacionalidade";
            ReplaceWith = Nacionalidade;
            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;
        }     } }