Ayuda con CheckBox y su valor en la Base de Datos
Publicado por Marco (11 intervenciones) el 24/04/2012 05:14:59
Tengo este codigo, como le hago para que el valor de los checkbox me salga en la base de datos: Me aparce un error: "No coinciden los datos en la expresion de criterios". en acces los tipos de datos para estos son numero.
Set cn = New ADODB.Connection
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = E:\VB\BD\BDVinc.mdb; "
' MsgBox "Ya me conecte", vbOKOnly, "Conexion"
q = "Insert into Docencia" & _
"(NoPersonal, NoAplica, FechaReg, DocR1, DocNO)" & _
"Values" & _
"('" & UserForm2.Label33 & "','" & CheckBox1.Caption & "','" & fecha & "','" & UserForm2.CheckBox2.Value & "','" & UserForm2.CheckBox3.Value & "')"
Set rs = New ADODB.Recordset
rs.Open q, cn, adOpenStatic
Ojala alguien tenga la respuesta. Gracias.
Set cn = New ADODB.Connection
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = E:\VB\BD\BDVinc.mdb; "
' MsgBox "Ya me conecte", vbOKOnly, "Conexion"
q = "Insert into Docencia" & _
"(NoPersonal, NoAplica, FechaReg, DocR1, DocNO)" & _
"Values" & _
"('" & UserForm2.Label33 & "','" & CheckBox1.Caption & "','" & fecha & "','" & UserForm2.CheckBox2.Value & "','" & UserForm2.CheckBox3.Value & "')"
Set rs = New ADODB.Recordset
rs.Open q, cn, adOpenStatic
Ojala alguien tenga la respuesta. Gracias.
Valora esta pregunta
0