Tutorial: Enlace de datos simple en un proyecto en el nivel de la aplicación

Artículo
04/28/2010

Actualización: Julio de 2008

Se aplica a
La información de este tema sólo se aplica a los proyectos de Visual Studio Tools para Office y versiones de Microsoft Office especificados. Tipo de proyecto Proyectos de nivel de aplicación Versión de Microsoft Office Word 2007 Para obtener más información, vea Características disponibles por aplicación y tipo de proyecto.

La información de este tema sólo se aplica a los proyectos de Visual Studio Tools para Office y versiones de Microsoft Office especificados.

Tipo de proyecto

Proyectos de nivel de aplicación

Versión de Microsoft Office

Word 2007

Para obtener más información, vea Características disponibles por aplicación y tipo de proyecto.

A partir de Visual Studio 2008 Service Pack 1 (SP1), puede enlazar los datos a controles host y controles de formularios Windows Forms en proyectos en el nivel de la aplicación. En este tutorial se muestra cómo agregar controles a un documento de Microsoft Office Word y enlazarlos a datos en tiempo de ejecución.

Este tutorial ilustra las tareas siguientes:

Agregar un ContentControl a un documento en tiempo de ejecución.
Crear un BindingSource que conecta el control a una instancia de un conjunto de datos.
Permitir al usuario desplazarse por los registros y verlos en el control.

Nota:
Es posible que su equipo muestre nombres o ubicaciones diferentes para algunos de los elementos de la interfaz de usuario de Visual Studio incluidos en las instrucciones siguientes. La edición de Visual Studio que se tenga y la configuración que se utilice determinan estos elementos. Para obtener más información, vea Valores de configuración de Visual Studio.

Requisitos previos

Necesita los componentes siguientes para completar este tutorial:

Visual Studio Tools para Office (componente opcional de Visual Studio 2008 Professional y Visual Studio Team System).

Visual Studio Tools para Office se instala de forma predeterminada con las versiones mostradas de Visual Studio. Para comprobar si está instalado, consulte Instalar Visual Studio Tools para Office.
Word 2007.
Acceso a una instancia en ejecución de SQL Server 2005 o SQL Server 2005 Express que tenga asociada la base de datos de ejemplo AdventureWorksLT. La base de datos AdventureWorksLT se puede descargar del sitio web de CodePlex. Para obtener más información sobre cómo asociar una base de datos, vea los siguientes temas:
- Para adjuntar una base de datos mediante SQL Server Management Studio o SQL Server Management Studio Express, vea Cómo adjuntar una base de datos (SQL Server Management Studio).
- Para adjuntar una base de datos mediante la línea de comandos, vea Cómo adjuntar un archivo de base de datos a SQL Server Express.

Crear un proyecto nuevo

El primer paso consiste en crear un proyecto de complemento de Word.

Para crear un nuevo proyecto

Cree un proyecto de Complemento de Word 2007 con el nombre Rellenar documentos desde una base de datos, utilizando Visual Basic o C#.

Para obtener más información, vea Cómo: Crear proyectos de Visual Studio para Office.

Visual Studio abre el archivo ThisAddIn.vb o ThisAddIn.cs y agrega el proyecto Rellenar documentos de una base de datos al Explorador de soluciones.

Crear un origen de datos

Utilice la ventana Orígenes de datos para agregar un conjunto de datos con tipo al proyecto.

Para agregar un conjunto de datos con tipo al proyecto

En el menú Datos, haga clic en Agregar nuevo elemento.

Se abrirá el Asistente para la configuración de orígenes de datos.
Haga clic en Base de datos y, a continuación, haga clic en Siguiente.
Si ya existe una conexión con la base de datos AdventureWorksLT, elija esta conexión y, a continuación, haga clic en Siguiente.

De lo contrario, haga clic en Nueva conexión y utilice el cuadro de diálogo Agregar conexión para crear la nueva conexión. Para obtener más información, vea Cómo: Crear conexiones a bases de datos de SQL Server.
En la página Guardar la cadena de conexión en el archivo de configuración de la aplicación, haga clic en Siguiente.
En la página Elija los objetos de base de datos, expanda Tablas y, a continuación, seleccione Customer (SalesLT).
Haga clic en Finalizar.

El archivo AdventureWorksLTDataSet.xsd se agrega al Explorador de soluciones. Este archivo define los siguientes elementos:
- Un conjunto de datos con tipo denominado AdventureWorksLTDataSet. Este conjunto de datos representa el contenido de la tabla Customer (SalesLT) de la base de datos AdventureWorksLT.
- Un objeto TableAdapter denominado CustomerTableAdapter. Este TableAdapter puede usarse para leer y escribir datos en AdventureWorksLTDataSet. Para obtener más información, vea Información general sobre TableAdapter.
Estos dos objetos se utilizarán más adelante en este tutorial.

Crear controles y enlazarlos a datos

La interfaz para ver los registros de la base de datos de este tutorial es muy básica y se crea dentro del documento. Un ContentControl muestra un registro de base de datos cada vez y dos controles Button le permiten desplazarse de un registro a otro. El control de contenido utiliza BindingSource para conectarse a la base de datos.

Para obtener más información sobre cómo enlazar controles a datos, vea Enlazar datos a controles.

Para crear la interfaz en el documento

En la clase ThisAddIn, declare los controles siguientes para mostrar y desplazarse por la tabla Customer de la base de datos AdventureWorksLTDataSet.

Private adventureWorksDataSet As AdventureWorksLTDataSet
Private customerTableAdapter As AdventureWorksLTDataSetTableAdapters.CustomerTableAdapter
Private customerBindingSource As System.Windows.Forms.BindingSource
Private customerContentControl As Microsoft.Office.Tools.Word.RichTextContentControl
Private WithEvents button1 As Microsoft.Office.Tools.Word.Controls.Button
Private WithEvents button2 As Microsoft.Office.Tools.Word.Controls.Button

private AdventureWorksLTDataSet adventureWorksDataSet;
private AdventureWorksLTDataSetTableAdapters.CustomerTableAdapter customerTableAdapter;
private System.Windows.Forms.BindingSource customerBindingSource;
private Microsoft.Office.Tools.Word.RichTextContentControl customerContentControl;
private Microsoft.Office.Tools.Word.Controls.Button button1;
private Microsoft.Office.Tools.Word.Controls.Button button2;

En el método ThisAddIn_Startup, agregue el código siguiente para inicializar el conjunto de datos y llenarlo con información de la base de datos AdventureWorksLTDataSet.

Me.adventureWorksDataSet = New AdventureWorksLTDataSet()
Me.customerTableAdapter = New AdventureWorksLTDataSetTableAdapters.CustomerTableAdapter()
Me.customerTableAdapter.Fill(Me.adventureWorksDataSet.Customer)
Me.customerBindingSource = New System.Windows.Forms.BindingSource()

this.adventureWorksDataSet = new AdventureWorksLTDataSet();
this.customerTableAdapter = new AdventureWorksLTDataSetTableAdapters.CustomerTableAdapter();
this.customerTableAdapter.Fill(this.adventureWorksDataSet.Customer);
this.customerBindingSource = new System.Windows.Forms.BindingSource();

Agregue el código siguiente al método ThisAddIn_Startup. Esto genera un elemento host que extiende el documento. Para obtener más información, vea Ampliar documentos de Word y libros de Excel en complementos en el nivel de la aplicación en tiempo de ejecución.
```
Dim currentDocument As Word.Document = Me.Application.ActiveDocument
Dim extendedDocument As Document = currentDocument.GetVstoObject()
```
```
Word.Document currentDocument = this.Application.ActiveDocument;
Document extendedDocument = currentDocument.GetVstoObject();
```

Defina varios intervalos al principio del documento. Estos intervalos identifican dónde insertar texto y colocar los controles.

extendedDocument.Paragraphs(1).Range.InsertParagraphBefore()
extendedDocument.Paragraphs(1).Range.InsertParagraphBefore()
extendedDocument.Paragraphs(1).Range.Text = "The companies listed in the AdventureWorksLT database:   "

extendedDocument.Paragraphs(2).Range.Text = "  "

Dim range1 As Word.Range = extendedDocument.Paragraphs(2).Range.Characters.First
Dim range2 As Word.Range = extendedDocument.Paragraphs(2).Range.Characters.Last
Dim range3 As Word.Range = extendedDocument.Paragraphs(1).Range.Characters.Last

extendedDocument.Paragraphs[1].Range.InsertParagraphBefore();
extendedDocument.Paragraphs[1].Range.InsertParagraphBefore();
extendedDocument.Paragraphs[1].Range.Text = 
    "The companies listed in the AdventureWorksLT database:   \n";
extendedDocument.Paragraphs[2].Range.Text = "  "; 

Word.Range range1 = extendedDocument.Paragraphs[2].Range.Characters.First;
Word.Range range2 = extendedDocument.Paragraphs[2].Range.Characters.Last;
Word.Range range3 = extendedDocument.Paragraphs[1].Range.Characters.Last;

Agregue los controles de la interfaz a los intervalos previamente definidos.

Me.button1 = extendedDocument.Controls.AddButton(range1, 60, 15, "1")
Me.button1.Text = "Previous"
Me.button2 = extendedDocument.Controls.AddButton(range2, 60, 15, "2")
Me.button2.Text = "Next"

Me.customerContentControl = extendedDocument.Controls.AddRichTextContentControl( _
    range3, _
    "richTextContentControl1")

this.button1 = extendedDocument.Controls.AddButton(range1, 60, 15, "1");
this.button1.Text = "Previous";
this.button2 = extendedDocument.Controls.AddButton(range2, 60, 15, "2");
this.button2.Text = "Next";

this.customerContentControl = extendedDocument.Controls.AddRichTextContentControl(
    range3,
    "richTextContentControl1");

Enlace el control de contenido a AdventureWorksLTDataSet utilizando BindingSource. Para los programadores de C#, agregue dos controladores de eventos para los controles Button.

Me.customerBindingSource.DataSource = Me.adventureWorksDataSet.Customer
Me.customerContentControl.DataBindings.Add( _
    "Text", _
    Me.customerBindingSource, _
    "CompanyName", _
    True, _
    Me.customerContentControl.DataBindings.DefaultDataSourceUpdateMode)

this.customerBindingSource.DataSource = this.adventureWorksDataSet.Customer;
this.customerContentControl.DataBindings.Add(
    "Text", 
    this.customerBindingSource, 
    "CompanyName", 
    true,
    this.customerContentControl.DataBindings.DefaultDataSourceUpdateMode);

this.button1.Click += new EventHandler(button1_Click);
this.button2.Click += new EventHandler(button2_Click);

Agregue el código siguiente para navegar por los registros de la base de datos.

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
    Handles button1.Click
    Me.customerBindingSource.MovePrevious()
End Sub

Private Sub button2_Click(ByVal sender As Object, ByVal e As EventArgs) _
    Handles button2.Click
    Me.customerBindingSource.MoveNext()
End Sub

void button1_Click(object sender, EventArgs e)
{
    this.customerBindingSource.MovePrevious();
}

void button2_Click(object sender, EventArgs e)
{
    this.customerBindingSource.MoveNext();
}

Probar el complemento

Al abrir Word, el control de contenido muestra los datos del conjunto de datos AdventureWorksLTDataSet. Desplácese por los registros de la base de datos haciendo clic en los botones Siguiente y Anterior.

Para probar el complemento

Presione F5.

Se crea y se rellena con datos un control de contenido denominado customerContentControl. Al mismo tiempo, se agregan al proyecto un objeto de conjunto de datos denominado adventureWorksLTDataSet y una clase BindingSource denominada customerBindingSource. El control ContentControl se enlaza al componente BindingSource, que a su vez se enlaza al objeto de base de datos.
Haga clic en los botones Siguiente y Anterior para desplazarse por los registros de la base de datos.

Vea también

Historial de cambios

Fecha	Historial	Motivo
Julio de 2008	Se ha agregado un tema.	Cambio de características de SP1.

Julio de 2008

Se ha agregado un tema.

Cambio de características de SP1.

Compartir a través de