Visual Basic - IF

Life is soft - evento anual de software empresarial
   
Vista:

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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:IF

Publicado por jaime guerrero (361 intervenciones) el 15/09/2009 00:34:20
algo asi

if rec.eof=false then
MsgBox "nombre ya dado de alta"
Else
SQL = "dat"
Set rec = db.OpenRecordset(SQL)

rec.MoveFirst
rec.AddNe

esta demas esta comparacion
If nombrex = rec("nombre") Then

ya que si existe siempre va a ser el mismo valor
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:IF

Publicado por maye (1 intervención) el 15/09/2009 01:31:05
funciono correstamente te lo agradezco mucho jaime
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar