IF
Publicado por mayela (1 intervención) el 14/09/2009 22:13:20
hola amigos del foro, soy algo novata en la programacion solo tengo una duda
tengo un formulario de altas donde pongo folio y nombre
si el folio ya existe entonces tendre ke poner otro, pero como le hago para que cuando el nombre tambien exista, me mande mensaje? saludos, tengo este codigo fuente
Set db = OpenDatabase("base.mdb")
SQL = "SELECT * FROM datos where nombre = '" & nombrex & "'"
Set rec = db.OpenRecordset(SQL)
If nombrex = rec("nombre") Then
MsgBox "nombre ya dado de alta"
Else
SQL = "dat"
Set rec = db.OpenRecordset(SQL)
rec.MoveFirst
rec.AddNew
si ya existe el folio me hace bien el mensaje, pero cuando no existe el nombre me marca error en la linea del if ke dice no hay ningun registro activo. como le podria hacer? gracias por su ayuda
tengo un formulario de altas donde pongo folio y nombre
si el folio ya existe entonces tendre ke poner otro, pero como le hago para que cuando el nombre tambien exista, me mande mensaje? saludos, tengo este codigo fuente
Set db = OpenDatabase("base.mdb")
SQL = "SELECT * FROM datos where nombre = '" & nombrex & "'"
Set rec = db.OpenRecordset(SQL)
If nombrex = rec("nombre") Then
MsgBox "nombre ya dado de alta"
Else
SQL = "dat"
Set rec = db.OpenRecordset(SQL)
rec.MoveFirst
rec.AddNew
si ya existe el folio me hace bien el mensaje, pero cuando no existe el nombre me marca error en la linea del if ke dice no hay ningun registro activo. como le podria hacer? gracias por su ayuda
Valora esta pregunta


0