Prezados, estou com uma dificuldade, estou tentando fazer uma verificação no banco passando uma String com texto longo antes de salvar o registro.
Se já existir uma descrição igual impedir que seja salvo. Veja o código:
Desde já agradeço!
Se já existir uma descrição igual impedir que seja salvo. Veja o código:
- Código:
Sql = "SELECT codMaterial, descricaoLonga FROM Material WHERE descricaoLonga = """ & Me.descricaoLonga & """"
Set RS = CurrentDb.OpenRecordset(Sql)
If Not RS.EOF Then
MsgBox "Atenção: Descrição já cadastrada para o material '" & RS!codMaterial & "', duplicidade não permitida!", vbCritical, "Aviso"
End If
Desde já agradeço!