¿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 de caraccalla
1
1
caraccalla, Experiencia de más de cinco años programando bases de datos
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