Demo kode/base

Hvad og hvordan Fileter ? SQL ? eller? =
Hvad og hvordan filter? SQL? eller?

Du kunne "smage" på hvad brugeren indtaster - tegn for tegn - noget i retning af:

Tekst1 er indtastningsfeltet
DinSubform er - tjah - subformen

Private Sub Tekst1_KeyUp(KeyCode As Integer, Shift As Integer)
  Me.Refresh
  If IsNull(Me.Tekst1) Then
    Me.DinSubform.Form.RecordSource = "SELECT * FROM DinTabel"
  Else
    Me.Tekst1.SelStart = Len(Me.Tekst1)    'Flyt markøren, så der ikke overskrives
    Me.Tekst1.SelLength = 0
    Me.DinSubform.Form.RecordSource = "SELECT * FROM DinTabel WHERE DitFelt Like '*" & Me.Tekst1 & "*'"
  End If
  Me.DinSubform.Requery
End Sub

Har prøvet. Kan ikke få det til at virke  :( Kan heller ikke få et breakpoint inde i koden til at blive trikket.
Har lige skiftet til Access 2007, så der er jo nok et eller andet der ikke er rigtigt i en eller anden indstilling.

Claus

Hm. Har ikke mulighed for at tjekke 2007 lige nu. Prøver at se på det i morgen, hvis der ikke er andre bud.

Har lige tjekket det i 2007 - og det fungerer på nøjagtig samme måde som i 2003.
Er du sikker på at du har lagt koden i KeyUp?

Kan / vil du sende det som du har testet til mig?
Så vil jeg se om det virker hos mig

claus at fam-lind.dk

Hilsen Claus

Har fundet fejlen. Det var en sikkerhedsindstilling. læg et svar så jeg kan give point

Claus

Tjah. Der er jo altid en forklaring  ;o)

Takker for point  ;o)