[vb - acces] listbox

[icecreamfarmer]

ik moet met VB 6 2 acces tabellen benaderen 1 met paarden en een met ruiters
ik heb in acces een relatie gemaakt tussen lidnr en paardnr#
nu wil ik dmv van een listbox
bij de ruiter de bijbehorende paarden laten zien. maar in plaats van alleen de paarden van de ruiter laat hij alle paarden zien.

cod listbox:

Private Sub LstPaarden_Click()

End Sub

Private Sub Form_Load()
'Declareren van de variabelen
Dim i As Integer
'Database verversen voor inlezen van de gegevens
DataPaarden.Refresh
DataPaarden.Recordset.MoveLast
DataPaarden.Recordset.MoveFirst
'Gegevens uit de database toekennen aan de ComboBox
For i = 1 To DataPaarden.Recordset.RecordCount
CboPaarden.AddItem DataPaarden.Recordset.Fields(2) '0 is het eerste veld, 1 het twee, enz.
DataPaarden.Recordset.MoveNext
Next i
End Sub

[icecreamfarmer]

verder heb ik in acces een plaatje van het paard dmv een ole object
in vb voeg ik een ole object toe met data source naar dat plaatje.
maar het enige wat ik te zien krijg is de naam van de foto en niet de foto zelf

[icecreamfarmer]

Private Sub LstPaarden_Click()

End Sub

Private Sub Form_Load()
'Declareren van de variabelen
Dim i As Integer
'Database verversen voor inlezen van de gegevens
DataPaarden.Refresh
DataPaarden.Recordset.MoveLast
DataPaarden.Recordset.MoveFirst
'Gegevens uit de database toekennen aan de ComboBox
If DataRuiters.Recordset.Fields(0) = DataPaarden.Recordset.Fields(2) Then
For i = 1 To DataPaarden.Recordset.RecordCount
CboPaarden.AddItem DataPaarden.Recordset.Fields(2) '0 is het eerste veld, 1 het twee, enz.
DataPaarden.Recordset.MoveNext
Next i
End Sub


nu dacht ik het te kunnen doen met deze code maar hij zegt dat de variabelen niet kloppen

[gorgi_19]

Ik heb je al eerder op de P&W FAQ - De "quickstart" gewezen. Helaas hou je je hier niet aan, waardoor je topic erg onoverzichtelijk is. Zo gebruik je geen code tags of geef je nog steeds niet in de titel aan wat je precies bedoeld: VBA of VB6. Wil je nu vanuit VB6 een MS Access database benaderen of niet, of met behulp van VBA in MS Access?

Daarnaast kennen we de edit-knop, , voor als je je post achteraf wilt aanpassen. Wat je nu doet is kicken, je topic opnieuw bovenaan de lijst brengen. Na 24 uur mag dit, niet binnen 10 minuten.

Oftewel: dit topic is nu een bende geworden. Open maar een nieuw duidelijk topic volgens de quickstart.

[ Voor 95% gewijzigd door gorgi_19 op 12-06-2004 16:43 ]