Bses de datos

Bases de Datos usando DAO
y Visual Basic, ¡claro!
 

Para ver los temas relacionados con ADO (ActiveX Data Objects)

Contenido:
1. Copiar la estructura de una tabla con Access
2. Ordenes SQL para cambiar los datos de una tabla.
3. Caracteres no "standards" en los nombres de los campos
4. Procesar una consulta SQL (Execute)
5. Procesar una consulta SQL creando un Recordset
6.Evitar el error al asignar un Null
7. Comprobar si un registro se está editando
8. Asignar a un Recordset los registros deseados
9. Compactar una base de datos, usando código VB (27/Feb)
10. Crear una base de datos, usando código VB (18/Abr)
11. Como crear un Formulario de Datos con un Grupo de Registros Subyacente (18/Abr)
12. Cambiar los caracteres extraños por ? (para usar en lasconsultas a bases de datos con LIKE) (20/Abr)
13. Procesar el resultado de una consulta con varias tablas para evitar registros duplicados (13/Jul)
14. Programación sobre la seguridad de Access (31/Ago)
15. Un método rápido para efectuar búsquedas (8/Sep)
16. Enumerar las tablas de una base de datos (17/Sep)
17. Capturar errores de ODBC (9/Abr/98)
18. Acceso a bases de datos SQL Server...19. Cargar Imágenes de una base de datos sin usar el DataControl
20. Acceder a bases de Access 2000 (usando el datacontrol de ADO) (31/Ago/99)
21. Acceder a bases de datos usando ADO (sin el data control) (31/Ago/99)
22. Acceder a bases de datos de Access 2000 con el VB5 (05/Oct/99)
23. Un consejo si instalas VB6 SP4 para acceder a bases de datos de Access 2000 (10/Nov/00)
24. Manipularimágenes usando ADO (con datacontrol) (11/Jul/2001)
25. Acceder a una base de datos ADO con contraseña (05/Sep/2001)

 
 
1.- Copiar la estructura de una tabla con Access
Para copiar/duplicar la estructura de una tabla en una base de datos Access, sigue estos pasos:
1. Carga la base de datos en Access
2. Selecciona la tabla a copiar
3. En el menú de Edición, selecciona Copiar
4. Enel menú de Edición, selecciona Pegar
5. Escribe el nuevo nombre de la tabla
6. Selecciona "Estructura solamente"
Ya está la tabla "duplicada" en la misma base de datos, por si haces cambios de los que después te arrepientas.
Si la intención es copiarla en otra base de datos, antes de seguir con el paso 4, cargar o crear la nueva base de datos y ya está. En el paso 6 puedes seleccionar"Estructura y Datos" si quieres copiar también los datos.

 
 
2.- Ordenes SQL para cambiar los datos de una tabla.
UPDATE tabla
SET nombre_campo = 'nuevo_valor'
WHERE opciones_a_tener_en_cuenta
Ejemplo: Actualizar la tabla Clientes poniendo el campo Agente a LIBRE si la fecha de ÚltimaVisita es anterior al 1 de Enero de 1996 (este es un caso sobre una base de datos que uso en mi trabajo, perocomo ejemplo puede valer):
UPDATE Clientes SET Agente = 'LIBRE' WHERE [ÚltimaVisita] < DateValue('01/01/96')
Normalmente el campo de fechas será según tengáis configurado el sistema.

 
 
3.- Caracteres no "standard" en los nombres de los campos
Si al crear las tablas de la base de datos usas caracteres acentuados, eñes, espacios, etc. Cuando hagas una consulta o lo uses en un Recordset,etc, ponlos entre corchetes, fijates en cómo se usa ÚltimaVisita en el ejemplo anterior.

 
 
4.- Procesar una consulta SQL (Execute)
Para ejecutar una orden SQL en una base de datos, usar la orden Execute en la variable de una base de datos (Database)
'SQLTmp= orden SQL
'Db será una base de datos:
'Dim Db As Database 'Variable para las Bases de Datos
'Set Db =OpenDatabase("Nombre_Base_Datos")

On Error Resume Next
Db.Execute SQLTmp, dbFailOnError
If Err Then
MsgBox "Se ha producido un error al ejecutar la orden:" & vbCrLf & SQLTmp
End If

 
 
5.- Procesar una consulta SQL creando un Recordset
Se creará un Recordset con el resultado de una consulta SQL realizada a uan base de datos, posteriormente se procesarán los datos que ha producido dicha consulta.
Por ejemplo...