OBJETIVO: El objetivo de este foro es el de divulgar MS Access y ayudar a los usuarios en la solución de dudas y consultas, siempre indicando el camino, para que el usuario aprenda, estudie y consiga caminar con las propias piernas. No espero nada a cambio (quizás tan sólo un gracias, ya que nadie me paga por hacer esto: gastar conexión, interpretar dudas, ubicar respuestas, en sintesis perder tiempo y/o dinero, sólo por la voluntad de ayudar) e intento siempre motivar al usuario a aprender, dando sólo guías o pistas y en algunos casos algún código completo. No soy de aquellos que gusta dar el código desarrollado y comentado, por el simple hecho de que eso lleva tiempo (no me sobra, ya que trabajo) y mi deseo es incentivarte a aprender. El hecho que exista este site gratuíto y que lo mantenga en forma diaria, no me obliga a contestar la dudas de los usuarios, y menos aún la de tener que dedicar mi tiempo a desarrollar códigos completos por la falta de delizadeza o exceso de abuso de algunos. Cómo mencioné anteriormente el objetivo es mostrarte el camino... "No soy favorable de dar pescado (leáse desarrollar código), sino de enseñar a pescar (leáse mostrar cómo desarrollar el código) , ya que así, sí tienes hambre sabrás pescar (leáse voluntad de aprender y crear tus propias aplicaciones) " Si no te gusta nuestra postura, eres libre de irte y no volver, ya que nada perderás (no has pagado nada). En cambio si lo que deseas es aprender y valorar el esfuerzo y tiempo de otros, estás convidado de por vida por acá!!!
 


  << Previous Topic | Next Topic >>Volver Indice  

comprobar duplicado

March 8 2004 at 9:47 AM		Alma  (no login)
de la dirección IP 80.58.4.174
 
Hola:
Desde un cuadro combinado quiero seleccionar un dato y que se añada al recordset si no está repetido.

He intentado con regla de validación y con lookup() pero no consigo evitar que se añada el registro si este está repetido.

Esto es lo que pongo:
varx = DLookup("[FamiliaID]", "T_Servicios", "[FamiliaID] = " & Me.FamiliaID)

Me.FamiliaID.ValidationRule = IsNull(varx)
Me.FamiliaID.ValidationText = "esta repetido. no se añade"

Hay alguna forma de que no se añada si este está ya incluido en los registros del subformulario?
gracias

 
 Respond to this message   
AutorReply
R.Roca
(no login)
201.2.231.201

Veamos

March 8 2004, 6:36 PM 

Alma:

Estás hablando de insertar itmes en un detalle y que no se ingrese dos o + veces un mismo item??? Por ejemplo en un Pedido debes ingresar el detalle cierto???

No utilices la regla de validación. Puedes utilizar el Dcount para contar cuantros registreos para el pedido actual tienes donde el id sea iguial al ingresado. Si es nulo o "" continuas, caso contrario >0 pones un undo (deshacer) con un mensaje

otra alternativa es crear un cloen del recordset y mednaite un FindFirst verificas si hay:

rst.FindFirst "[id] = " & Str(id)

Si no encuentra, mesnaje y Undo

If Not rst.NoMatch Then 'Si existe
frm.Undo


Espero que te sirva.



 
 Respond to this message   
Current Topic - comprobar duplicado
  << Previous Topic | Next Topic >>Volver Indice  
Find more forums on MS Access DatabasesCreate your own forum at Network54
 Copyright © 1999-2009 Network54. All rights reserved.   Terms of Use   Privacy Statement  
"Los mayores best sellers son los Manuales y Archivos de Ayuda, pero ellos son como los libros de Stephen Hawking: muchos compran, pocos leen y muchos menos entienden alguna cosa."