BASE EN ACCESS

bengaba81
11 de Junio del 2004
Hola compañeros, tengo una base de datos en access y quiero hacer un formulario con un checkbox, en el cual al chequear o no me guarde un determinado valor, que he de hacer?
UN SALUDO Y GRACIAS

MicroElias Corporation
11 de Junio del 2004
Para quien lo quiera hacer en Visual Basic 6 es como sigue:

Primero Tienes que abrir la base de Datos. En estos tiempos modernos se utiliza el ADO (ActiveX Data Object)

Pon esto en un modulo
' para que la conexion este disponible en todos los formularios
'se recomienda tener una sola conexion y no multiples conexiones por aplicación

'Debes tener una base de datos con una tabla config que tenga dos 'campos, micheck de tipo "SI/NO" y un campo valor de tipo texto

Global conn as ADODB.Connection


pon esto en el form load

' Generamos la Conexion
Set conn = New ADODB.Connection
'abrimos la base de datos
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; dbq=" & App.Path & "tubase.mdb"


ahora pon esto en el evento click del check
conn.Execute "UPDATE config set micheck=" & Check1.Value & ", valor='" & text1.text & "'"


Y en el formulario donde vayas a utilizar este dato simplemente haz una consulta para saber si el valor de micheck es True

dim respuesta as ADODB.recordset
set respuesta=conn.Execute ("Select micheck, valor from config")
if respuesta("micheck")=True then
' uso el valor del campo de texto
msgbox respuesta("valor")
else
' no hago nada pues no esta marcado el checkbox
end if

Espero que te sirva, si no, entonces a alguien mas le puede ser de utilidad. Cualquier errorcillo puede ser porque estoy en horas de trabajo y no me pagan por contestar preguntas en los foros... ;-)

Elias Castañeda G.
Ingeniero en Sistemas Computacionales
[email protected]
http://www.microeliascorp.es.vg