Hola a todos, espero que me ayuden ya que no entiendo que pasa con este codigo hace rato, bueno primero que todo les digo que el problema es que no me inserta un dato en el tercer campo Caso_prueba de la tabla especificar, ya que existen 3 campos , el primero es el código, el segundo nombre_prueba y el tercero caso de prueba , eso si para insertar el caso de prueba previamente tengo que comparar y buscar el codigo de usuario y la prueba seleccionada del combobox (obviamente esas pruebas las saque de la base de dato) para poder insertar la informacion del caso de prueba en el lugar correcto.
Y todo lo que les he contado no lo hace este codigo, este código me inserta como otro registro el codigo y la info del caso de prueba y en el campo nombre_prueba me lo deja vacio.
Todo eso esta malisimo, lo que quiero por ejemplo:
tengo el campo codigo 1234567 y el campo nombre_prueba : ejemplos, y yo al seleccionar del combobox la prueba ejemplos, poder buscar en la tabla especificar el codigo 1234567 y la prueba ejemplos para poder insertar en el tercer campo caso de prueba la informacion que yo quiera.
A todo esto en la tabla especificar pueden haber varios codigos 1234567 pero con distintas pruebas o las mismas pruebas.
Lo importante de esto es poder encontrar la considencia entre el codigo y la prueba para ingresarle la informacion del caso de prueba.
Bueno eso es todo espero que me entiendan mi problemita....
Este es el codigo de seleccion de la prueba en el combobox y la correspondiente busqueda del codigo y prueba en la tabla especificar para que posteriormente insertar el caso de prueba.
Sql = "Select Código_especificación,nombre_prueba From Especificar_calendario_plazos "
Sql = Sql & " Where Código_especificación = " & Cod
rs.Open Sql, cnn1, adOpenStatic
If rs!Código_especificación = Cod Then
MsgBox " coinciden las codigos", vbInformation
MsgBox Combo1.List(Combo1.ListIndex)
If rs!nombre_prueba = Combo1.Text Then
MsgBox " coinciden las pruebas", vbInformation
cnn1.Execute " insert into Especificar_calendario_plazos (nombre_caso_prueba) values ('" & in_caso_prueba & "' )"
Else
MsgBox " No coinciden las pruebas", vbInformation
End If
End If
Insertar dato en un tercer campo de una tabla..
Moderador: Moderadores
prueba quitando los acentos
pos eso, que a lo mejor si tienes los acentos puestos puede que no funcione
El problema no es de acentos
El acento en el nombre de los campos no influye en nada en mi problema.
entiendan el problema porfavor y ayudenme.
entiendan el problema porfavor y ayudenme.