[WZL] - Wijfzonderlijf.be

NAVIGATIE

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.

Overzicht » Computer » Programmeren » [VBA] Subformulier in Access

Je moet ingelogd zijn om te kunnen posten...

Nog geen lid van de WzL-groep? Lid worden!
Wachtwoord vergeten? Stuur mijn wachtwoord! | Info...

Origineel bericht
Menace Sinds 2/12/2004 T: 37 R: 140	29/8/2005 - 4:09u	Quote
	Weet er iemand hoe je gegevens van een subformulier afhankelijk kan maken?.. ik weet het, het is nogal vaag men vraag. De prt screen zal miss duidelijkheid brengen... Bron: © http://www.fileshare.be/img.php?yr=05&img=Klantgegevens.png ik wil dus, dat als je vanboven een naam selecteerd, dat enkel zijn aankopen in het subformulier worden getoond. tot nu toe geeft hij alle aankopen weer.. ik heb het al geprobeert op volgende manier: dim rstKlant as New ADODB.recordset dim strSQL as string strSQL = "SELECT tblVerkoopGeschiedenis.Product, tblVerkoopGeschiedenis.Aantal, " & _ "tblVerkoopGeschiedenis.Bedrag, tblVerkoopGeschiedenis.Datum FROM tblVerkoopGeschiedenis " & _ "WHERE tblVerkoopGeschiedenis.KlantID = '" & Me!cboNaam & "'" rstKlant.ActiveConnection = CurrentProject.Connection rstKlant.CursorType = adOpenKeyset rstKlant.Open strSQL If rstKlant.RecordCount <> 0 Then Do While Not rstKlant.EOF Me.Koopgeschiedenis.Form.txtProduct = rstKlant!Product Me.Koopgeschiedenis.Form.txtAantal = rstKlant!Aantal Me.Koopgeschiedenis.Form.txtBedrag = rstKlant!Bedrag Me.Koopgeschiedenis.Form.txtDatum = rstKlant!Datum rstKlant.MoveNext Loop Else Me.Koopgeschiedenis.Form.txtProduct = "" Me.Koopgeschiedenis.Form.txtAantal = "" Me.Koopgeschiedenis.Form.txtBedrag = "" Me.Koopgeschiedenis.Form.txtDatum = "" End If rstKlant.Close Maar vanaf dat er dan meer dan 1 aankoop was gaf hij enkel één aankoop weer.. maar dan meerdere malen. Ik hoop dat er iemand kan helpen want ik heb nog nooit geprogrammeerd met subformulieren Dank bij voorbaat