If ok Then
If abierta.Value = True ThenEnd ifnum = numero.CaptionElse
sol = solicitud.Caption
log = articulo.Text
cie = ""
est = "Abierta"If cerrada.Value = True ThenEnd Ifnum = numero.CaptionElse
sol = solicitud.Caption
log = articulo.Text
cie = ""
est = "Abierta"If anulada.Value = True ThenEnd Ifcierre.Caption = DateEnd If
cierre.Refresh
num = numero.Caption
sol = solicitud.Caption
log = articulo.Text
cie = cierre.Caption
est = "Anulada"
sql = "insert into peticiones (numero, fechasolicitud, log, estado) values (" & num & ",'" & sol & "','" & log & "','" & est & "')"
l.Caption = sql
db.Execute (sql)
Pues bien, como podeis comprobar, los bloques de texto el verde son código coincidente. Pues bien, es que tengo un error extraño, porque cuando el programa llega a db.execute viniendo de abierta.value=true, funciona correctamente. Pero si viene de cerrada.value=true... ¡¡ma da un error 91 en dicha linea!! y no lo entiendo... porque sql lleva exactamente los mismo datos... :(
Alguien me puede ayudar? es que me estoy volviendo loca