🚀 go-pugleaf

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.


HTH