Private Sub poMod_AfterUpdate()
Dim Uslov As String
Dim SQL As String
SQL = "SELECT qryStanje.MagacinID, qryStanje.[Naziv Artikla], qryStanje.Model, qryStanje.sifra, qryStanje.kolicina, " _
& "qryStanje.cijena, qryStanje.mpc, qryStanje.LastOfkalkbr FROM qryStanje "
Uslov = "WHERE (qryStanje.Model) Like " & "'*" & Me.poMod & "*' " _
& "ORDER BY qryStanje.Model;"
SQL = SQL & Uslov
Me.ListArt.RowSource = SQL
End Sub
i sve lijepo funkcioniše. Mene interesuje kako izmijeniti ovaj kod da pretraga ne uzima u obzir znakove kao što su -.,/razmak* itd. tj. ako postoji artikal 210 12, 21012, 210-12 da ih sve prikaže kad u pretragu ukucam 21012