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
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Treeview y ADO
- Base de datos en texto
- Matlab

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