🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #15816

Re: VB6 database probleem

#15816
From: mp
Date: Tue, 08 Aug 2000 00:00
67 lines
2796 bytes
Heb je al geprobeerd om enkel de regel 'Set dgrdFiles.DataSource = Nothing'
te gebruiken ?
Kijk ook eens naar de eigenschap 'ActiveConnection' (zet deze op "").

Marc


"emulov" <emulov@sin.khk.beNOSPAM> wrote in message
news:3965bd00$0$12152@bru5-newsr2.be.uu.net...
> Hoi.
>
> In een VB programma maak ik gebruikt van een adodc control 'adoFiles' en
een
> datagrid control 'dgrdFiles'.
>
> Ik maak tijdens runtime als volgt een verbinding met de database:
>
> adoFiles.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source="
> & "mijndb.mdb" & ";Persist Security Info=False"
>
> De datagrid wordt daarna aan de adodc verbonden:
>
> Set dgrdFiles.DataSource = adoFiles
>
> Op die manier worden alle resultaten van de queries die uitgevoerd worden
op
> de adodc
> getoond in de datagrid. Tot hiertoe geen probleem. Ik wil echter de
> gebruiker de keuze geven de database te comprimeren. Dit gebeurt in het
> programma in een functie als volgt (in strDBFilename zit de databasenaam):
>
> ' comprimeren
> DBEngine.CompactDatabase strDBFilename, strDBFilename & "COMPACT"
> ' oude database vervangen door de gecomprimeerde
> Kill strDBFilename
> Name strDBFilename & "COMPACT" As strDBFilename
>
> Het probleem is dat het comprimeren niet lukt. VB geeft een foutmelding
> omdat de adodc en datagrid verbonden zijn met de database, en daarom
krijgt
> de toepassing niet de toestemming om de database te comprimeren. Het komt
er
> dus op aan om voor het comprimeren de adodc en datagrid terug van de
> database los te koppelen (de connectie dus te verbreken). Hoe doe je dit?
Ik
> heb het volgende geprobeerd:
>
> adoFiles.ConnectionString = ""
> adoFiles.Refresh
> Set dgrdFiles.DataSource = Nothing
>
> Maar dan klaagt VB, want een verbinding met "" gaat eigenlijk niet. Het
> positieve is dat het comprimeren nadien wel werkt.
>
> Mijn vraag is dus: hoe kan ik de connectie tussen de adodc en datagrid en
de
> database verbreken (dus de database terug vrij maken), ZONDER
foutmeldingen.
>
> Dank bij voorbaat!
>
> Emulov.
>
>
>
>
Technical Details
Message-ID: <8mnc5h$hbp$1@news0.skynet.be>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <3965bd00$0$12152@bru5-newsr2.be.uu.net>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,6c4fb112d9c85f49
X-Google-Attributes: gidfcea4,public
From: "mp" <mpatteet@yucom.be>
Subject: Re: VB6 database probleem
Date: 2000/08/08
Message-ID: <8mnc5h$hbp$1@news0.skynet.be>
X-Deja-AN: 655597837
References: <3965bd00$0$12152@bru5-newsr2.be.uu.net>
X-Priority: 3
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6600
X-Complaints-To: abuse@skynet.be
X-Trace: news0.skynet.be 965686257 17785 62.4.133.182 (7 Aug 2000 22:10:57 GMT)
Organization: Belgacom Skynet SA/NV
X-MSMail-Priority: Normal
Reply-To: "mp" <mpatteet@yucom.be>
NNTP-Posting-Date: 7 Aug 2000 22:10:57 GMT
Newsgroups: be.comp.programming