Article View: be.comp.programming
Article #13740Re: Visual basic & access
From: Goofy
Date: Mon, 04 Jun 2001 18:10
Date: Mon, 04 Jun 2001 18:10
43 lines
2317 bytes
2317 bytes
"Ronnie" <wuyts.steven@pandora.be> schreef in bericht
news:XxOS6.3001$mR5.270305@afrodite.telenet-ops.be...
> Hello,
>
> een visual basic (& access) vraagje:
>
> Ik heb een accessbestand waarin een aantal rapporten staan, en deze wens
ik
> aan te roepen via een visual basic programmaatje (dus ook beperkende
> criteria)... iemand nog een idee hoe het weer ging (ik heb het ooit nog
eens
> gedaan, dus dat moet geen probleem zijn, 't is alleen te lang geleden)
>
> thx & grz,
>
> Ronnie
>
Hiervoor moet je enkele stappen ondernemen.
Stap 1 - maak een link naar het object van Access via Project -> References
Stap 2 - definieer een object variabele voor access
Stap 3
kopieer deze code op de gewenste plaats
Dim accObj as Access.Application
Set accObj = Access.Application
accObj.OpenCurrentDatabase App.Path & "\databasenaam.mdb"
accObj.DoCmd.OpenReport RAPPORTNAAM, acViewPreview
Ben mommenteel bezig met dit volledig uit te schrijven, om zowel de
rapporten als de forms van access te kunnen gebruiken.
Maar dit ligt nu wat stil moet VB eindwerken verbeteren en examen opstellen
;-(
Heb je nog problemen laat mij maar iets horen.
Groetjes
Goofy from the Gooftroop
Technical Details
Message-ID:
<laQS6.3621$mR5.318143@afrodite.telenet-ops.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!newsfeed.google.com!sn-xit-02!supernews.com!isdnet!wanadoo.fr!opentransit.net!newsfeeds.belnet.be!news.belnet.be!afrodite.telenet-ops.be!not-for-mailReferences:
<XxOS6.3001$mR5.270305@afrodite.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: fcea4,237be13d8039cc0a X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2001-06-04 11:10:26 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!newsfeed.google.com!sn-xit-02!supernews.com!isdnet!wanadoo.fr!opentransit.net!newsfeeds.belnet.be!news.belnet.be!afrodite.telenet-ops.be!not-for-mail Reply-To: "Goofy" <goofy-EetMyOp-@gooftroop.be> From: "Goofy" <goofy-EetMyOp-@gooftroop.be> Newsgroups: be.comp.programming References: <XxOS6.3001$mR5.270305@afrodite.telenet-ops.be> Subject: Re: Visual basic & access Lines: 46 Organization: Gooftroop X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.50.4133.2400 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Message-ID: <laQS6.3621$mR5.318143@afrodite.telenet-ops.be> Date: Mon, 04 Jun 2001 18:10:25 GMT NNTP-Posting-Host: 213.224.12.127 X-Complaints-To: abuse@pandora.be X-Trace: afrodite.telenet-ops.be 991678225 213.224.12.127 (Mon, 04 Jun 2001 20:10:25 MET DST) NNTP-Posting-Date: Mon, 04 Jun 2001 20:10:25 MET DST