Søgning i Acces database

SQL'en er typisk:

Select * from DinTabel Where Titel Like '*Ron*'

Hmmmm... Hvor skal jeg smide den kode henne af? Er først lige begyndt at rode med det... :-)

Et eller andet sted i din kode, må du have en linie, som hedder noget lignende, blot med "=" i stedet for "Like". Her skal du så erstatte "=" med "Like og *'erne.

'Prøv denne måde og sæt den ind i en textbox change event

data1.recordsource = "Select * from tabel where feltnavn >= '" & søgevariabel & "'"
data1.refresh

'Så finder den alt det der starter med Ron

Hmmmm. Er jeg totalt skod eller hvad? Jeg kunne ikke få det til at virke...
Her er den kode jeg bruger, kan i se hvad der skal gøres?

Private Sub mobil_Click()
If mobil.Value = True Then
Me.Hide
soegenavn = InputBox("Hvad er mobilnummeret til personen du søger?", "Søg efter person")
Main.Data1.Recordset.MoveFirst
Do While Main.Data1.Recordset.EOF = False
    If Main.Data1.Recordset("mobil") Like soegenavn Then
    Exit Sub
    End If
Main.Data1.Recordset.MoveNext
Loop
MsgBox ("Beklager, personen kunne ikke findes. Prøv at søge på telefonnummer istedet."), vbInformation, "Søgning mislykkedes"
End If
End Sub

Hvad siger i?

Ups! Efter at have rodet lidt i koderne lykkedes det endelig!!!
Her er den der virker:

Private Sub Command1_Click()
soegenavn = Text15.Text
Main.Data1.Recordset.MoveFirst
Do While Main.Data1.Recordset.EOF = False
    If Main.Data1.Recordset("mobil") Like "*" & Text15.Text & "*" Then
    Exit Sub
    End If
Main.Data1.Recordset.MoveNext
Loop
MsgBox ("Beklager, personen kunne ikke findes. Prøv at søge på telefonnummer istedet."), vbInformation, "Søgning mislykkedes"
End Sub

Tak for hjælpen begge 2! :-)

selv tak! Det var godt, at du selv fandt ud af sidste del :o)