Guardar campos nulos a una bd
Publicado por Cesar (20 intervenciones) el 05/08/2004 22:27:27
Hola colegas, en una aplicacion de VB guardo datos a una BD de Access pero no me permite guardar campos sin datos el codigo para guardar es el siguiente:
sql es una variable de tipo string en donde se guarda la instruccion sql.
Sql = "Insert Into cg_parentesco (expediente, nombre, parentesco, domicilio, colonia, ciudad, tel_casa, tel_movil)" & _
" Values(" & CInt(Trim(TxtExp.Text)) & ", '" & Trim(TxtNombre.Text) & "', '" &
Trim(TxtParentesco.Text) & "', '" & Trim(TxtDomicilio.Text) & "', '" & Trim(TxtColonia.Text) & "', '" & Trim(TxtCiudad.Text) & "', '" & Trim(TxtTelCasa.Text) & "', '" & Trim(TxtTelMovil.Text) & "')"
With CmdChange
.CommandText = Sql
.Execute
End With
CmdChange es un objeto de tipo ADODB
espero me puedan ayudar con mi problema
sql es una variable de tipo string en donde se guarda la instruccion sql.
Sql = "Insert Into cg_parentesco (expediente, nombre, parentesco, domicilio, colonia, ciudad, tel_casa, tel_movil)" & _
" Values(" & CInt(Trim(TxtExp.Text)) & ", '" & Trim(TxtNombre.Text) & "', '" &
Trim(TxtParentesco.Text) & "', '" & Trim(TxtDomicilio.Text) & "', '" & Trim(TxtColonia.Text) & "', '" & Trim(TxtCiudad.Text) & "', '" & Trim(TxtTelCasa.Text) & "', '" & Trim(TxtTelMovil.Text) & "')"
With CmdChange
.CommandText = Sql
.Execute
End With
CmdChange es un objeto de tipo ADODB
espero me puedan ayudar con mi problema
Valora esta pregunta


0