Flere resultater

Kan du ikke bare lave en liste du smider dem i?

Du laver bare en Exit Sub når du finder første match.

Så kunne du i stedet gøre følgende:

If InStr(1, Data1.Recordset("titel"), soegetitel, vbTextCompare) Then
List1.AddItem(Data1.Recordset("titel"))
End If

Nu viser den det i list1

Men nu vil jeg have sådan når man trykker på en af linierne i list1 så skal den vise detaljer om posten.... how gør man det... smidre flere points i

Jeg ved ikke hvordan den database-connection du benytter, fungerer mht. udvælgelse af data, men en løsning ville være:

Private Sub List1_Click()
'Udvælg titel i tabel, hvor titel = List1.Text
'Smid evt info i en tekstboks eller lignende..
End Sub

Det jeg mener ses her:
http://www.kajkage.dk/screen.jpg

Altså når jeg har søgt får jeg resultatet til højre (list1) og så vil jeg have sådan at når man har markeret en post og trykker vis resultat så viser den det

Du skal bare fjerne Exit Sub, så koden ser sådan ud:

Private Sub cmdsog_Click()

Dim soegetitel As String

soegetitel = InputBox("Søg efter titel")

Data1.Recordset.MoveFirst
Do While Data1.Recordset.EOF = False
    If InStr(1, Data1.Recordset("titel"), soegetitel, vbTextCompare) Then

    End If
    Data1.Recordset.MoveNext
Loop

MsgBox ("Titel findes ikke i databasen")

End Sub

Nu ved jeg ikke hvad din knap hedder, men så skal det jo bare flyttes over i den, i stedet for.

Så skal du bruge titlen fra List1.Text til at finde den aktuelle film i din database. Derudfra kan du så smide informationen i de forskellige felter.

Private Sub DinKnap_Click()
'Udvælg record i tabellen fra din database, hvor titlen = List1.Text
'titel_tekstfelt = Data1.Recordset("titel") osv. med de andre felter.
End Sub

dennis: Hvad? Så langt er vi vist nået :)

Private Sub DinKnap_Click()
'Udvælg record i tabellen fra din database, hvor titlen = List1.Text
'titel_tekstfelt = Data1.Recordset("titel") osv. med de andre felter.
End Sub

Jeg forstår det ikke helt... evt. eks?

listen hedder = lstresultater
vis resultater = cmdresultater
database = cdbase
datafield = data1

Problemet er det, at jeg ikke ved hvordan du udvælger data fra din database. Jeg arbejder normalt med SQL, og ikke den form for databaseforbindelse du benytter.

Men altså:

Private Sub cmdresultater_Click()
'Herinde udvælger du så den titel i din tabel med film i databasen, hvor titlen svarer til den titel du har markeret i din liste. Alstå skal titel være lig med lstresultater.Text.
'Herefter putter du indholdet af de forskellige feltnavne fra databasen i de felter, du har i programmet (format, instruktør osv.)
End Sub

Det er nok det nærmeste jeg kan forklare det, når jeg ikke ved hvordan du udvælger data.

kan du give et lyn kursus i sql sætninger med VB

Sql sætninger kender jeg fra php de er nice :-)

evt. nogle links om det?