NAVIGATIE
• Freetime overzicht
• Zoeken
RUBRIEKEN
• FAQ / Help
• Wat mag niet?
• WZL Wedstrijden
• WZL Chat
• WZL Toolbar
• WZL Statistieken
• WZL leden
• WZL shop
• E-cards
RSS 
• Fun-feed
• Babe-feed
• Stud-feed
Een groot aantal pokerrooms geven
de mogelijkheid om poker te spelen op internet en geld te storten via het veilige iDeal betaalsysteem. |
|
Origineel bericht
|
Menace
Sinds 2/12/2004
T: 37
R: 140
|
4/8/2005 -
3:35u
|
Quote
|
wat ik dus zou willen bereiken is da je in een formulier een reeks keuzelijsten krijgt. als je de eerste kiest (in dit geval Dames of Heren) dan krijg je enkel de merken tezien van ofwel Dames of Heren. kies je dan een merk dan krijg je enkel de omschrijvingen te zien van Dames of Heren en van dat merk enzovoort...
ik ben zo begonnen maar het lukt niet echt. Misschien ben ik gewoon verkeerd aan het redeneren... could someone help me 
Private Sub cboDamesHeren_AfterUpdate()
Dim rstVerkocht As New ADODB.Recordset
Dim txtDamesHeren As String
txtDamesHeren = cboDamesHeren.Value
rstVerkocht.Open "SELECT tblStok.Merk From tblStok Where tblStok.[D/M]='" & txtDamesHeren & "'", CurrentProject.Connection
rstVerkocht.MoveFirst
Do While Not rstVerkocht.EOF
cboMerk.RowSource = cboMerk.RowSource & ";" & rstVerkocht!Merk
rstVerkocht.MoveNext
Loop
rstVerkocht.Close
End Sub
ik krijg dus de error dat er één of meer parameters ontbreken
Dank bij voorbaat
|
|
|
