🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #9110

Records aanmaken

#9110
From: Mannix
Date: Thu, 23 May 2002 07:50
31 lines
2453 bytes
Hoi Groep,

Ik zou graag in een form records willen aanmaken naargelang een aantal dat
ik ingeef.
In de koptekst van het form heb ik een onafhankelijk veld "aantal" waarin
een getal naar keuze kan ingevuld worden.
Wanneer ik nu op de knop "Ingeven" klik zou ik graag willen dat het
betreffende aantal records aangemaakt wordt in de detailsectie van het
formulier.
Het aantal records aanmaken is geen probleem met de onderstaande code.
Zoals jullie weten kan er in access pas een nieuwe record aangemaakt worden
als er een waarde is ingevuld in een veld van een record. Vandaar dat ik de
waarde 1 ingeef in het veld "Nr" van de nieuwe record.(zie code me.nr.value
= 1)
Ik krijg het niet klaar om die waarde telkens met 1 te verhogen als hij een
nieuwe record aanmaakt.
Is dit mogelijk? Zoja, wil iemand van julie zo vriendelijk zijn mij uit te
leggen hoe dat moet?
Autonummering is zeker niet aan de orde omdat ik achteraf de functie wil
inbouwen in een 1 op veel relatie.

Mijn Code:    Private Sub Ingeven_Click()
                        For x = 1 To Me.aantal
                        DoCmd.GoToRecord , , acNewRec
                        Me.nr.SetFocus
                        Me.nr.Value = 1
                        Next x
                      End Sub

Hopend dat mijn uitleg duidelijk is dank ik jullie voor het lezen van dit.
mvg, robidou
Technical Details
Message-ID: <Ra1H8.91869$Ze.14053@afrodite.telenet-ops.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!supernews.com!news-out.visi.com!hermes.visi.com!nnxp1.twtelecom.net!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!opentransit.net!proxad.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,f3f72ac23308f294,start
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-05-23 00:50:14 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!supernews.com!news-out.visi.com!hermes.visi.com!nnxp1.twtelecom.net!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!opentransit.net!proxad.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "Mannix" <robidou@pandora.be>
Newsgroups: be.comp.programming
Subject: Records aanmaken
Lines: 37
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <Ra1H8.91869$Ze.14053@afrodite.telenet-ops.be>
Date: Thu, 23 May 2002 07:50:09 GMT
NNTP-Posting-Host: 213.118.88.254
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1022140209 213.118.88.254 (Thu, 23 May 2002 09:50:09 MET DST)
NNTP-Posting-Date: Thu, 23 May 2002 09:50:09 MET DST
Organization: Telenet Internet