Article View: be.comp.programming
Article #12019DLookup
From: Christian
Date: Fri, 28 Dec 2001 21:30
Date: Fri, 28 Dec 2001 21:30
19 lines
1610 bytes
1610 bytes
Dag iedereen,
Ik probeer in Access 2000 dmv deze VBA code een controle uit te voeren op
het invoeren van dubbele gegevens. Jammer genoegd lukt dit niet, weet er
iemand wat ik verkeerd doe?
Private Sub Keuzelijst_met_invoervak30_Change()
If IsNull(DLookup([BANDNR], "VERHUUR", "[BANDNR]=" &
Me.Keuzelijst_met_invoervak30)) = False Then
MsgBox "Deze film komt al voor", , "Waarschuwing!"
End If
End Sub
De Keuzelijst_met_invoervak30 staat voor het besturingselement dat gebruikt
wordt op het Invoer formulier.
BANDNR is ��n van de sleutelvelden van de tabel VERHUUR.
Alvast bedankt.
Christian.
Technical Details
Message-ID:
<dw5X7.617$pE2.216543619@hebe.telenet-ops.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!hebe.telenet-ops.be.POSTED!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII X-Google-Thread: fcea4,b72819306ccf1925,start X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2001-12-28 13:30:55 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!hebe.telenet-ops.be.POSTED!not-for-mail From: "Christian" <Christian.Rosseel@pandora.be> Newsgroups: be.comp.programming Subject: DLookup Lines: 22 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 Message-ID: <dw5X7.617$pE2.216543619@hebe.telenet-ops.be> Date: Fri, 28 Dec 2001 21:30:49 GMT NNTP-Posting-Host: 213.119.94.199 X-Complaints-To: abuse@pandora.be X-Trace: hebe.telenet-ops.be 1009575049 213.119.94.199 (Fri, 28 Dec 2001 22:30:49 CET) NNTP-Posting-Date: Fri, 28 Dec 2001 22:30:49 CET Organization: Telenet Internet