🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #15807

Re: Visual Basic en SQL

#15807
From: Luc Aerts
Date: Sun, 06 Aug 2000 00:00
81 lines
3165 bytes

Ludo Joris wrote:

> On Thu, 03 Aug 2000 19:01:14 GMT, Luc Aerts <luc.aerts@leuven.be>
> wrote:
>
> >Ik zou in Visual Basic een programma willen maken dat me toelaat
> >gemakkelijk de resultaten van een SQL te bekijken.
> >
> >Mijn database noemt db3.mdb en is gelokaliseerd onder d:\bestanden. Via
> >het toevoegen van een DataEnvironment wordt de db3.mdb met het project
> >verbonden. �produkten� is een table van de database.
> >Ik heb iets als volgt willen maken :
> >
> >Private Sub Form_Load()
> >
> > MyQuery=�SELECT * FROM produkten;�
> > Set Uitkomst = DataEnvironment1.Connection1.Execute(MyQuery)
> >
> >End Sub
> >
> >Wat moet ik nu doen om de gegevend van �Uitkomst� (wat eigenlijk het
> >resultaat is van de query die uitgevoerd werd op de tabel produkten van
> >de database db3) te voorschijn te toveren op de de form? Kan iemand mij
> >helpen?
> >Het zou er als volgt moeten uitzien :
> >
> >PROD_ID     BESCHRIJVING      PRIJS
> >--------------------------------------------------------------
> >
> >11235          abssdfshfsdhfdsq      149
> >222              gesqorteerddfsj          155
> >4557            aleesweter                  5
> >
> >De structuur van deze table is PROD_ID = text, BESCHRIJVING = text en
> >PRIJS = number
> >
>
> "Probleem" in VB is dat dit dus op elf en dertig verschillende
> manieren kan.
>
> Waarschijnlijk de meest eenvoudige manier (minst programmeer
> werk) om het resultaat van een SQL query in tabelvorm op een
> form te zetten in VB is door gebruik te maken van een dbGrid control.
>
> Zet eerst de dbGrid control in je toolbox: Project -> Components ->
> Microsoft Databound Grid Control.
>
> Plaats een data control Data1 op je form.
> Vul DatabaseName in (het pad naar en de naam van je .mdb bestand).
> De rest staat gewoonlijk juist.
>
> Plaats een dbGrid DBGrid1 control op je form.
> Vul voor de Datasource van DBGrid1 Data1 in.
>
> In het click event van een command button zet je iets als:
>   Data1.RecordSource = "SELECT ... FROM ... WHERE ... ORDER BY ..."
>   Data1.Refresh
>
> Run VB programma en klik op de command button.
>
> Ik denk dat je nu wel vertrokken bent.

Ludo,

Ik heb dit allemaal heel nauwkeurig gedaan, het programma loopt, maar ik zie
nergens iets tevoorschijn komen.
Wat zou er fout lopen?

>
>
> HTH

--


met vriendelijke groeten


Luc
Technical Details
Message-ID: <398D2B3A.A1C12F69@leuven.be>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <3989C1C6.6BF609A3@leuven.be> <398b4b68.59729483@news.ruca.ua.ac.be>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII
X-Google-Thread: fcea4,5f0d5ca4cf2668d1
X-Google-Attributes: gidfcea4,public
From: Luc Aerts <luc.aerts@leuven.be>
Subject: Re: Visual Basic en SQL
Date: 2000/08/06
Message-ID: <398D2B3A.A1C12F69@leuven.be>
X-Deja-AN: 655013191
Content-Transfer-Encoding: 8bit
References: <3989C1C6.6BF609A3@leuven.be> <398b4b68.59729483@news.ruca.ua.ac.be>
X-Accept-Language: nl-BE,en
Content-Type: text/plain; charset=iso-8859-1
X-Complaints-To: abuse@Belgium.EU.net
X-Trace: nreader1.kpnqwest.net 965552876 193.121.196.129 (Sun, 06 Aug 2000 11:07:56 MET DST)
Organization: KPNQwest customer news service
MIME-Version: 1.0
NNTP-Posting-Date: Sun, 06 Aug 2000 11:07:56 MET DST
Newsgroups: be.comp.programming