Duplicidad de campo desde formulario independiente
Estimado experto, tengo un formulario que contiene controles independientes, estos agregan a una tabla después de hacer click a un botón, ninguno de los campos que agrego son llaves principales pero me interesa que uno de ellos no se duplique en la tabla, ¿qué código me sugiere utilizar? No puedo utilizar ni Dlookup y Dcount ya que no estoy trabajando con llaves principales y la instrucción sql select count me marca error, tal vez no se pueda aplicar como deseo, ¿me puede ayudar por favor?
Gracias!
Gracias!
1 Respuesta
Respuesta de selu123
1
Puedes poner lo siguiente:
Dim ref As Recordset
Dim i As Integer
Dim consulta As String
consulta = "select * from Tabla where campo='" & campoConElQueComparar.Value & "'"
Set ref = CurrentDb.OpenRecordset(consulta)
i = ref.RecordCount
Si i=0, entonces no existe ningún registro con ese valor en el campo "Campo".
Un saludo
Nota: fíjate en las comillas simples antes y después del campo del formulario. Es importante.
Dim ref As Recordset
Dim i As Integer
Dim consulta As String
consulta = "select * from Tabla where campo='" & campoConElQueComparar.Value & "'"
Set ref = CurrentDb.OpenRecordset(consulta)
i = ref.RecordCount
Si i=0, entonces no existe ningún registro con ese valor en el campo "Campo".
Un saludo
Nota: fíjate en las comillas simples antes y después del campo del formulario. Es importante.
