Programación General > Visual Basic 6.0 e inferiores
Error en SELECT cuando el dato buscado no existe.
Zavash:
Despues de tener bien escrita la sentencia UPDATE gracias a la ayuda del foro, descubri que la sentencia SELECT ejecuta un error cuando no existe el dato que uno busca, borra lo que escribes en el textbox cuando quieres agregrar o consultar datos, no deja escribir.
--- Código: Text ---Private Sub Command6_Click() sql = "select * from producto where Codigo= '" & Text1.Text & "'"Set rs = cn.Execute(sql) Text1.DataField = "Codigo" Set Text1.DataSource = rs Text2.DataField = "Nombre" Set Text2.DataSource = rs Text3.DataField = "Direccion" Set Text3.DataSource = rs Text4.DataField = "Telefono" Set Text4.DataSource = rs End Sub Que linea de codigo se necesita para mandar un aviso de la no existencia de un dato y romper el error que ejecuta?
Saludos :good:
F_Tanori:
--- Código: Visual Basic ---rs.RecordCount
;)
Zavash:
Perdona,en que parte pongo esa linea?. :wacko:
m0skit0:
--- Cita de: "Zavash" ---Perdona,en que parte pongo esa linea?. :wacko:
--- Fin de la cita ---
Dale un poco al coco... :ph34r:
Zavash:
--- Cita de: "m0skit0" ---
--- Cita de: "Zavash" ---Perdona,en que parte pongo esa linea?. :wacko:
--- Fin de la cita ---
Dale un poco al coco... :ph34r:
--- Fin de la cita ---
y crees que no trate de modificarlo? no lo supe hacer :oops:
Navegación
[#] Página Siguiente
Ir a la versión completa