BASE DE DATOS
Como configurar el ODBC para conectar una base de datos de SQL
1.- En Panel de Control, luego en herramientas
administrativas seleccionas
2.- En DSN de Sistema (Para que todos los usuarios lo puedan ver)
Luego das clic en Agregar
NOTA: Para crear el ODBC de SQL debes de tener funcionando tu servidor de SQL
3.- Dar un doble clic en SQL Server
Luego das clic en el botón Finalizar
4.- Aparecerá la ventana que se muestra en la siguiente página.
En Nombre le das el nombre a tu origen de datos.
Ejemplo: Abigail
En Descripción si quieres agregarla alguna descripción.
Ejemplo: Este ODBC conecta la base de datos de SQL llamada Biblioteca
En donde dice Servidor seleccionas el servidor de SQL al cual deseas conectarte.
Automáticamente aparecerán los servidores disponibles. En caso de tener el servidor de SQL en
otra computadora, las computadoras deberán estar conectadas en red y el servidor de SQL de la
máquina Servidor deberá estar funcionando.
Ejemplo: El nombre de mi servidor de SQL es PC0
Luego das clic en siguiente.
5.- Aparecerá la ventana que se muestra en la siguiente página. A continuación se muestra una
descripción detallada de la ventana.
Con la autenticación de Windows NT… En caso de tener Windows NT puedes seleccionar esta
opción si quieres acceder mediante la contraseña de Windows NT
Con la autenticación de SQL Server … Si quieres acceder a tu base de datos mediante los
usuarios que tengas registrados en SQL Server. En caso de no tener Windows NT seleccionar
esta opción.
En configuración del cliente le das la configuración de tu red.
Luego conectar con SQL Server para obtener la configuración… Para que te reconozca un
usuario de SQL y los permisos que tenga ese usuario. En caso de escribir un usuario que no este
registrado en SQL al final marcara un error de conexión de SQL. Deberás teclear un usuario
válido para hacer la conexión.
En Id. de inicio de sesión: ponerle sa (que es la cuenta administradora por default que se crea al
instalar SQL) o cualquier usuario que ya tengas creado en SQL
Ejemplo: Yo tengo creado un usuario en SQL llamado alumno con permisos de solo lectura
sobre las tablas de SQL.
Al final después de haber llenado todos los datos, dar clic en el botón siguiente.
6.- Aparecerá la ventana que se muestra en la siguiente página.
Luego Seleccionas la Base de Datos a la que quieras acceder.
En caso de tener alguna Base de Datos creada seleccionar la Base de Datos que creaste. Sino
puedes usar la Base de Datos de ejemplo de SQL que es la de Master.
Ejemplo: Yo tengo creada una Base de Datos en SQL llamada Biblioteca
Se recomienda dejar las demás opciones activadas:
Usar Identificadores entrecomillados ANSI
Usar Nulos, rellenos y advertencias ANSI
Luego dar clic en Siguiente
7.- Aparecerá una ventana con más opciones como: el idioma para los mensajes de error,
cuestiones de seguridad, usar la configuración de números, fechas, etc, registros de estadísticas y
consultas. Recomiendo usar estas opciones: Luego dar clic en el botón Finalizar.
8.- Por último aparecerá la siguiente ventana con un resumen de todas las opciones escogidas.
Por último para probar si la conexión funcionará dar clic en el botón: Probar origen de datos. Por
último dar clic en Aceptar
Si la conexión resulta con éxito aparecerá el En caso de tener algún error en la conexión
siguiente mensaje: indicará el error:
PARA VER LAS TABLAS EN VISUAL BASIC
Nota: Puedes ver como quedaría la forma de visual Basic al final.
1.- Abrir el programa de Visual Basic.
2.- Abrir un nuevo proyecto de Visual Basic
3.- Agregar el componente Adodc:
Si no esta instalado instalarlo.
En Proyecto
Componentes
Microsoft ADO DataControl
Buscas el componente Adodc
4.- Luego ya instalado lo insertas en la ficha. Das un clic derecho (En
Propiedades)
Usar un nombre de origen de datos ODBC Le das el nombre del archivo que
creaste, en este ejemplo sería Biblioteca.
Luego en la pestaña de Autenticación le das un usuario válido de SQL en este
caso sería alumno, en caso de no tener un usuario de SQL puedes ponerle sa
que es el usuario por default y en contraseña no va nada.
Luego en Origen de Registros
Tipo de comando
2- adCmdTable
Tabla o nombre de procedimiento almacenado: La tabla de SQL que desees
ver, en este ejemplo sería Libro
Luego ya le das clic en aceptar
5.-Para ver los campos de las tablas, puedes usar el componente TextBox o
el DataGrid.
En un TextBox en su propiedad
Data Source: Adodc1
DataField: El nombre del campo que quieres ver.
En un DataGrid, sino esta instalado instalarlo. En su propiedad
DataSource: Adodc1
Para agregar registros:
Colocas un botón y das un dobleclick
En la parte del código escribes:
[Link]
Para Borrar el registro actual sin preguntar:
Colocas otro botón, das dobleclick y escribes:
[Link]
Para Cancelar:
Colocas otro botón, das dobleclick y escribes:
[Link]
[Link]
Para deshabilitar los textbox:
1. Doble clic en la forma
Vas a crear una función deshabilitar para deshabilitar los TetBox
Private sub deshabilita ()
{
[Link]=False
[Link]=False
……. //Según los Text que hayas puesto.
}
with Forma1
.Text1.
End With
Haces una función igual para habilitar:
Private sub deshabilita ()
{
[Link]=True
[Link]=True
……. //Según los Text que hayas puesto.
}
Pones un botón para Cancelar
Deshabilita
Pones un botón para Modificar
Habilita
En:
Sub Form
{
Deshabilita
}
Para Eliminar el registro actual preguntando:
Pones un nuevo botón
Eliminar_click()
DIM intRespuesta as Integer
intRespuesta=msgbox (“Desea eliminar el registro”, vbYesno+vQuestion,
“Eliminar Registro”)
if intRespuesta=6 then
[Link]
[Link] 0
end if
Para buscar un registro:
Pones un nuevo botón
Buscar_click
DIM strRespuesta as String
strRespuesta = InputBox("Dame el titulo del libro que quieres Buscar", "Buscar")
[Link]
[Link] “nombre=’”strRespuesta &” ’ ”
If Adodc1.Recordset_EOF then
MsgBox "No se encontro el registro", vbOKOnly, "Búsqueda"
[Link]
[Link]
El ejemplo quedaría asi: