Ajuda com FILTRO
1 - Tenho 3 colunas no BD para cada item=> Nome/ R.E/ C.C, onde por sua vez, poderá entrar os mesmos dados em qualquer uma dessas 3 colunas. Preciso acertar o código para que eu consiga filtrar R.E e C.C, mas que busque o valor da txtbox nas 3 colunas respectivas.
Segue exemplo do banco de dados:
[DATA] | [NOME1] | [RE1] | [C.C1] | [NOME2] | [RE.2] | [C.C2] | [NOME3] | [RE3] | [C.C3]
20/06 | BRUNO__|146__|78113__|________|______|_______|________|______|______
23/06 |________|______|_______|________|______|_______|BRUNO__|146___|78113
23/06 |________|______|_______|BRUNO__|146___|78113__|________|______|______
Os dados imputados no formulário de cadastro pode ser armazenado em uma das 3 colunas para cada item, e na hora da pesquisa eu terei uma textbox para procurar por RE e outra por CC, dai o valor digitado na textbox ao filtrar, ele busque nas 3 colunas e me retorne as linhas onde apareça os valores solicitados.
Precisava mudar a ClausulaWhere para que ela consiga pesquisar em mais de uma coluna ao mesmo tempo.
Código: Selecionar todos
'CLAUSULA PARA PESQUISAR AS COLUNAS DE C.C E R.E
Private Sub MontaClausulaWhere1(ByVal NomeControle As String, ByVal A As String, ByVal B As String, ByVal C As String, ByRef sqlWhere As String)
If Trim(Me.Controls(NomeControle).Text) <> vbNullString Then
If sqlWhere <> vbNullString Then
sqlWhere = sqlWhere & " AND"
End If
Else
sqlWhere = sqlWhere & " UCASE(" & CC1 Or CC2 Or CC3 & ") LIKE UCASE('%" & Trim(Me.Controls(NomeControle).Text) & "%')"
End If
End Sub