Botones de comando de la libreta de direcciones

La aplicación Libreta de direcciones incluye los siguientes botones de comando:

• Un botón Buscar para enviar una consulta a la base de datos.

• Un botón Borrar para borrar los cuadros de texto antes de iniciar una nueva búsqueda.

• Botón Actualizar perfil para guardar los cambios en un registro de empleado.

• Botón Cancelar cambios para descartar los cambios.

Importante

A partir de Windows 8 y Windows Server 2012, los componentes del servidor RDS ya no se incluyen en el sistema operativo Windows (para obtener más información, consulte Windows 8 y la Guía de compatibilidad de Windows Server 2012, edición Cookbook). Los componentes de cliente de RDS se eliminarán en una versión futura de Windows. Evite utilizar esta característica en nuevos trabajos de desarrollo y tenga previsto modificar las aplicaciones que actualmente la utilizan. Las aplicaciones que usan RDS deben migrar al servicio de datos WCF.

Botón Buscar

Al hacer clic en el botón Buscar, se activa el procedimiento VBScript Find_OnClick Sub, que compila y envía la consulta SQL. Al hacer clic en este botón, se rellena la cuadrícula de datos.

Creación de la consulta SQL

La primera parte del procedimiento Find_OnClick Sub compila la consulta SQL, una frase a la vez, anexando cadenas de texto a una instrucción SELECT global de SQL. Comienza estableciendo la variable myQuery en una instrucción SELECT de SQL que solicita todas las filas de datos de la tabla de origen de datos. A continuación, el procedimiento Sub examina cada uno de los cuatro cuadros de entrada de la página.

Dado que el programa usa la palabra like para compilar las instrucciones SQL, las consultas son búsquedas de subcadena en lugar de coincidencias exactas.

Por ejemplo, si el cuadro Apellidos contenía la entrada "Berge" y el cuadro Título contenía la entrada "Administrador de programas", la instrucción SQL (valor de myQuery) sería:

Select FirstName, LastName, Title, Email, Building, Room, Phone from Employee where lastname like 'Berge%' and title like 'Program Manager%'  

Si la consulta se realizó correctamente, todas las personas con un apellido que contiene el texto "Berge" (como Berge y Berger) y con un título que contiene las palabras "Administrador de programas" (por ejemplo, Administrador de programas, Tecnologías avanzadas) se muestran en la cuadrícula de datos HTML.

Preparar y enviar la consulta

La última parte del procedimiento Find_OnClick Sub consta de dos instrucciones. La primera instrucción asigna la propiedad SQL del objeto RDS.DataControl igual a la consulta SQL compilada dinámicamente. La segunda instrucción hace que el objeto RDS.DataControl (DC1) consulte la base de datos y, a continuación, muestre los nuevos resultados de la consulta en la cuadrícula.

Sub Find_OnClick  
   '...  
   DC1.SQL = myQuery  
   DC1.Refresh  
End Sub  

Botón Actualizar perfil

Hacer clic en el botón Actualizar perfil activa el procedimiento VBScript Update_OnClick Sub, que ejecuta los métodos SubmitChanges and Refresh del objeto RDS.DataControl (DC1).

Sub Update_OnClick  
   DC1.SubmitChanges  
   DC1.Refresh  
End Sub  

Cuando DC1.SubmitChanges se ejecuta, el servicio de datos remoto empaqueta toda la información de actualización y la envía al servidor a través de HTTP. La actualización es todo o nada; si una parte de la actualización no se realiza correctamente, no se realiza ninguno de los cambios y se devuelve un mensaje de estado. DC1.Refresh no es necesario después de SubmitChanges con el servicio de datos remoto, pero garantiza datos nuevos.

Botón Cancelar cambios

Hacer clic en Cancelar cambios activa el procedimiento VBScript Cancel_OnClick Sub, que ejecuta el método (DC1)CancelUpdate del objetoRDS.DataControl.

Sub Cancel_OnClick  
   DC1.CancelUpdate  
End Sub  

Cuando DC1.CancelUpdate se ejecuta, descarta las modificaciones realizadas por un usuario en un registro de empleado en la cuadrícula de datos desde la última consulta o actualización. Restaura los valores originales.

Consulte también

Botones de navegación de la libreta de direcciones
Objeto DataControl (RDS)