flere functioner i en søgning

Ja, det hedder "kunstig intelligens" så må du ligge 100.000.000... ord ind i dit program så den selv kan finde ud af det når du skriver "james"..

En udvidelsesmulighed til dit program er, at man ikke skal skrive "James", men kan nøjes med at TÆNKE på det, og så ved programmet, at det er James Bond ;o)

Måske skulle du være en anelse mere konkret?

Hvad er det du søger i - en textfil, på nettet, en database, hvad?
Og hvad mener du egenligt med hvad du spørger om?
Brug lige 2 min mere på at formulere dit spørgsmål :o)

Da er jo mange :D ..bill gate, bill clinton, kill bill...

ja ups... glemte vist lige at sige hvad jeg søgte i... jeg har en acces database...
jeg har så en text box hvor jeg skriver navnet på den titel jeg vil finde... det virker også som det skal så længe jeg skriver hele navnet... ville gerne kunne nøjes med at skrive noget af det i det tilfælde at man ikk lige kan huske hvad hele navnet er... mere du skal vide???

så brug instr()

fx..

Private Sub Form_Load()
Dim strText As String
Dim strFind As String

  strText = "kill.. james bond skal skal død"
  strFind = "james"

  If InStr(1, strText, strFind, vbTextCompare) Then
    MsgBox "Ja.."
  End If

End Sub

ha ha det var access.. brug LIKE
http://eksperten.dk/spm/279014

jaaa... det er meget godt... men nu er det jo sådan at der også findes andre film end lige james bond for hvis jeg bruger den der formel og jeg har en film der hedder harry potter kan jeg jo ikk nøjes med at søge på harry når det er james bond filmen den er sat op til...

nej.. den kode jeg har lavet skal du ikke bruge.. havede ikke lige fået set at det var access.. derfor skriver jeg også at du kan bruge LIKE i din SQL-String..

Se her : http://eksperten.dk/spm/279014

noget i den stil..

Dim strSQL As String
Dim strTitle As String

  strTitle = "harry" ' eller jemes eller ...
  strSQL = "SELECT * FROM table_film WHERE title LIKE '%" & strTitle & "%';"

okay... det liner da noget jeg kan bruge det der...
men titel skal jo være = noget som jeg skriver i et text felt hvad gøre jeg så lige i det tilfælde for at få det med???

strTitle = Text1.Text
  strSQL = "SELECT * FROM table_film WHERE title LIKE '%" & strTitle & "%';"

eller

  strSQL = "SELECT * FROM table_film WHERE title LIKE '%" & Text1.Text & "%';"

hmmm prøver lige at sende koden... ved ikk om det ser noget rodet ud men det er den her der virker så længe at man bare holder sig til at skrive hele ordet... ved ikk om det hjælper jer lidt at se den kode jeg bruger...

Dim db As Connection
    Set db = New Connection
    db.CursorLocation = adUseClient
    db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path & "\DB.mdb;"

Set adoPrimaryRS = New Recordset
    adoPrimaryRS.Open "select * from film where " & Text2.Text & " = '" & Text1.Text & " '", db, adOpenStatic, adLockOptimistic
    Set DataGrid1.DataSource = adoPrimaryRS
    Set grid.DataSource = adoPrimaryRS

noget i den stil..

Dim strSQL As String
  strSQL = "SELECT * FROM film WHERE " & Text2.Text & " LIKE '%" & Text1.Text & "%';"
  adoPrimaryRS.Open strSQL, db, adOpenStatic, adLockOptimistic

..

Dim strSQL As String
Dim db As Connection

  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path & "\DB.mdb;"

  Set adoPrimaryRS = New Recordset
  strSQL = "SELECT * FROM film WHERE " & Text2.Text & " LIKE '%" & Text1.Text & "%';"
  adoPrimaryRS.Open strSQL, db, adOpenStatic, adLockOptimistic

  Set DataGrid1.DataSource = adoPrimaryRS
  Set grid.DataSource = adoPrimaryRS

arrr det er du squ da lidt go til det der :D smider du et svar så smide jeg nogle point...

det virker squ lige som jeg ønsket... :P

Ja ja da...

tak for hjælpen...