🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #14694

Re: Welke codes in VB6 om te voorkomen dat het programma tegelijkertijd uitgevoerd wordt?

#14694
From: // Matthijs
Date: Mon, 15 Jan 2001 10:30
18 lines
2202 bytes
According to Frans Bouma,
>     bv: (krijgt sName mee en haalt ID op uit database)
> 
>     Dim csoSecurity as new DBSec.clsSecurity
>     Dim arMyRecordset as new ADODB.recordset
>     Dim sSQL as string, sConn as string, sIDValue as string
> 
>     sConn = csoSecurity.GetConnectionString()
>     sSQL="SELECT ID FROM TABLE WHERE Name='" & sName & "'"
>     arMyRecordset.open sSQL, sConn
>     sIDValue = arMyRecordset("ID").value
>     arMyRecordset.close

On Error Resume Next ;-)

// Matthijs;
-- 
WinAmp playing Megadeath - Mechanix
Technical Details
Message-ID: <MPG.14ccef83f18a70699896b2@newszilla.xs4all.nl>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-03!supernews.com!logbridge.uoregon.edu!newsfeed.direct.ca!look.ca!newsfeed.icl.net!diablo.netcom.net.uk!netcom.net.uk!newsfeeds.belnet.be!news.belnet.be!transit.news.xs4all.nl!newszilla.xs4all.nl!not-for-mail
References: <9351an$f7n$1@news1.skynet.be> <Pine.LNX.4.21.0101051949531.9940-100000@backslash.moeha.net> <9377d7$jbe$1@news1.skynet.be> <3A572F38.50D749B0@xs4all.nl> <93f8m5$5tf$1@porthos.nl.uu.net> <3A5B58F4.A2EC26E9@xs4all.nl> <93h90p$acu$1@porthos.nl.uu.net> <3A5CB023.748599E@xs4all.nl> <93jtut$npo$1@porthos.nl.uu.net> <3A5E0CDB.799DE750@xs4all.nl> <3A5E18D3.FEA73C86@chello.be> <961o39.s58.ln@jafshome.gtk.fr> <93pc5c$lhm$1@news1.xs4all.nl> <sqcs39.6ms.ln@jafshome.gtk.fr> <93ugd4$hfu$1@news1.xs4all.nl>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 107324,d0015270be29ee92
X-Google-Attributes: gid107324,public
X-Google-Thread: fcea4,d0015270be29ee92
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2001-01-15 02:34:07 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-03!supernews.com!logbridge.uoregon.edu!newsfeed.direct.ca!look.ca!newsfeed.icl.net!diablo.netcom.net.uk!netcom.net.uk!newsfeeds.belnet.be!news.belnet.be!transit.news.xs4all.nl!newszilla.xs4all.nl!not-for-mail
From: // Matthijs <matthijslaan@cia-agent.nospam-remove.com>
Newsgroups: be.comp.programming,nl.comp.programmeren
Subject: Re: Welke codes in VB6 om te voorkomen dat het programma tegelijkertijd uitgevoerd wordt?
Date: Mon, 15 Jan 2001 11:30:17 +0100
Message-ID: <MPG.14ccef83f18a70699896b2@newszilla.xs4all.nl>
References: <9351an$f7n$1@news1.skynet.be> <Pine.LNX.4.21.0101051949531.9940-100000@backslash.moeha.net> <9377d7$jbe$1@news1.skynet.be> <3A572F38.50D749B0@xs4all.nl> <93f8m5$5tf$1@porthos.nl.uu.net> <3A5B58F4.A2EC26E9@xs4all.nl> <93h90p$acu$1@porthos.nl.uu.net> <3A5CB023.748599E@xs4all.nl> <93jtut$npo$1@porthos.nl.uu.net> <3A5E0CDB.799DE750@xs4all.nl> <3A5E18D3.FEA73C86@chello.be> <961o39.s58.ln@jafshome.gtk.fr> <93pc5c$lhm$1@news1.xs4all.nl> <sqcs39.6ms.ln@jafshome.gtk.fr> <93ugd4$hfu$1@news1.xs4all.nl>
X-Newsreader: MicroPlanet Gravity v2.30
X-Face: c"kR4jyeH#ybTcZgH{W"[->t(g]##rZFXYNH\&5:^\Ur73N{MZU$!$_.w409gu,}mUQWI(z!X['Pf4Qs*GI9w[?Q./mZ{h<wC"u~Ei\O*eEPQVC5S4R@jyXc]d:&!C^RRemg)SS@w-?[fXmna^-w@:D*zn`aSwY
Lines: 18
NNTP-Posting-Host: 194.109.185.169
X-Trace: 979554630 dreader2.news.xs4all.nl 37082 194.109.185.169