Buscar una cadena
Tengo en un solo campo [especificacion] una serie de palabras como ca, cb, cd, ca1, cb1, etc y otro campo [diametro] y resulta que cuando intento filtrar con un combo los diámetros de una especificación "ca" me aparecen los de ca1. El código que escribí fue: Dim QDF As QueryDef, STR As String
Dim MBD As Database
Set MBD = DBEngine(0)(0)
Dim buscado As String
Dim criterio As String
buscado = Me!ESPEC
If Me!prote.Value = True Then
STR = "SELECT DISTINCT MATERIAL FROM CINPUTS "
STR = STR & "WHERE SPECIFIC like '*" & buscado & "*' and " '--- esto me busca todo pero funciona
STR = STR & "TIPO ='" & Me!TIPO & "' "
STR = STR & "ORDER BY MATERIAL;"
Set QDF = MBD.CreateQueryDef("MATERIAL", STR)
Me.Refresh
Form_lista.Refresh
Dim MBD As Database
Set MBD = DBEngine(0)(0)
Dim buscado As String
Dim criterio As String
buscado = Me!ESPEC
If Me!prote.Value = True Then
STR = "SELECT DISTINCT MATERIAL FROM CINPUTS "
STR = STR & "WHERE SPECIFIC like '*" & buscado & "*' and " '--- esto me busca todo pero funciona
STR = STR & "TIPO ='" & Me!TIPO & "' "
STR = STR & "ORDER BY MATERIAL;"
Set QDF = MBD.CreateQueryDef("MATERIAL", STR)
Me.Refresh
Form_lista.Refresh
1 respuesta
Respuesta de gajimenb
1