¿Podría describirme el proceso paso a paso para conectarse a una tabla SQL desde VB 6?

Yo leí la pregunta sobre conectarse a una tabla de SQL desde VB 6, ¿Podría describirme el proceso paso?

1 Respuesta

Respuesta
1
Esto lo escribí para un amigo que tenía dudas en La Universidad.
Paso 1 para enlazar a una Base de Datos a un proyecto VB 6, Asumo que la instalación está en Español
Hacer un nuevo Proyecto de tipo Proyecto de Datos, es el último de los tipos de Proyectos
Paso 2 Abrir el Explorador de Proyectos y Hacer doble clic sobre el control DataEnvironment 1, aparecerá una ventana en la cual se ve el control con una conexión debajo que representa la conexión que se hará, haz clic derecho sobre el dataenvironment y en elige en el menú que aparece "Opciones." y en la Asignación de Campos busca donde digan múltiples y debajo donde aparece TextBox, puedes cambiarlo a Microsoft DataGrid (a mi me gusta más) o al que quieras, esto es la asignación de los controles asociados. Aceptar y salir de Ahí
Paso 2 Párate ahora sobre el objeto Connection1 y da propiedades, es para elegir el motor de búsqueda, marca "Microsoft OLE DB provider for SQL SERVER" después oprime Next para elegir
Server Name: Aquí va el nombre del Servidor SQL o la IP de la máquina dónde está
Debajo: Autenticación, si eliges autenticación NT usarás la Trusted seguridadad, si no deseas esta, entonces da un user con derechos en la base de datos, preferiblemente usa al usuario sa (system admin) con su respectiva password, puedes después hacer un Test Connection para probar la conexión
3 Base de Datos: Nombre de la Base de Datos a la que te quieres conectar
Paso 3 Párate ahora sobre el objeto Connection1 y da clic derecho para elegir agregar comando (Command) y aparecerá un objeto debajo llamado Command1. Clic derecho sobre el para entrar a sus propiedades.
Nombre del Comando: Por defecto Command1, Conexión: Conection1, la que hicimos, Objeto de la Base Datos: Importantísimo, debes definir aquí si es una tabla, una view o un procedimiento, en tu caso, creo es una tabla y nombre del Objeto es el nombre de la Tabla que deseas cargar
Ultimo paso: Si en el explorador de Proyectos haces doble clic sobre Form1. Y arrastras command hacia el formulario, aparecerá un Gris sobre este con la tabla que deseas. Si dejaste las propiedades del Env con los controles text para los camps múltiples recuerdas, tendremos un problema con la navegación, solo verás el primero de la tabla
Solución: Inserta cuatro botones en tu formulario, llamalos Primero, atrás, siguiente, último
Este código ponlo en el evento clic respectivo para:
Botón Primero:
Private Sub primero_Click()
On local error resume next
DataEnvironment1.rsCommand1.MoveFirst
End Sub
Botón Atras:
Private Sub atras_Click()
On local error resume next
DataEnvironment1.rsCommand1.MovePrevious
End Sub
Boton siguente
Private Sub Siguente_Click()
On local error resume next
DataEnvironment1.rsCommand1.MoveNext
End Sub
Boton Ultimo
Private Sub ultimo_Click()
On local error resume next
DataEnvironment1.rsCommand1.MoveLast
End Sub
Puedes poner también un botón Insertar
Boton Insertar
Private Sub Insertar_Click()
On local error resume next
DataEnvironment1.rsCommand1.Addnew
End Sub
Te faltaría solamente salvar
Condiciones 1. Debes ir a las propiedades del comannd1 en el Dataenvironment1 y en avanzadas decir en tipo de bloque que por defecto es Read Only, poner Batch Optimistic.
Ahora insertar un boton que sea salvar y di
Boton Salvar
Private Sub Salvar_Click()
On local error resume next
DataEnvironment1.rsCommand1 .UpdateBatch
End Sub
Usa este conocimiento, verás que es muy útil

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas