🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #12019

DLookup

#12019
From: Christian
Date: Fri, 28 Dec 2001 21:30
19 lines
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-mail

Show 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