🚀 go-pugleaf

Ludo Joris wrote:

> On Sun, 06 Aug 2000 09:07:56 GMT, Luc Aerts <luc.aerts@leuven.be>
> wrote:
>
> >Ik heb dit allemaal heel nauwkeurig gedaan, het programma loopt, maar ik zie
> >nergens iets tevoorschijn komen.
> >Wat zou er fout lopen?
>
> Wel, misschien is er niks fout gelopen.
>
> Omdat je geen melding van een of ander foutbericht maakt, en
> ik jouw SQL query niet ken, is het mogelijk dat die query geen
> enkele rij retourneert. Dan krijg je uiteraard niks te zien.
> Het is niet omdat een query geen enkele resultaatrij oplevert
> dat die query fout is. Heb je geprobeerd met select * from ...?
>
> Stel dat je er zeker van bent dat je query minstens ��n rij
> moet retourneren en dat er toch iets fout is.
> Heb even zelf een database c:\bestanden\db3.mdb gecre�erd
> met daarin de tabel Produkten volgens jouw specificaties:
>
> >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
> >
>
> Een nieuw VB project begonnen met daarin een form Form1.
> Heb daarop linksboven een grote textbox Text1 gezet met property
> MultiLine = True en property Text leeggemaakt. Om daarin
> de tekst van de SQL queries te kunnen tikken.
>
> Heb rechtsboven een command button geplaatst cmdOK.
>
> Heb een data control Data1 op de form geplaatst.
> In de properties van Data1 heb ik DatabaseName = c:\bestanden\db3.mdb,
> RecordsetType = Snapshot, RecordSource = Produkten gezet.
>
> Heb op de onderste helft van de form een data bound grid control
> geplaatst DBGrid1 waarvan de property DataSource = Data1 is.

Ludo,

Als ik dit laatste wil doen ( dus naast de prperty DataSource met de cursor klik
om iets in te vullen), komt VB zeggen : No compatible data source was found for
this control. Please add an OLEDB data source such as the Data ENvironment or ADO
Data Control to the form or project.
Ik werk met VB6 en windows NT service pack 6.
Mag ik je eventueel, indien je er niets op tegen hebt,  mailen op je adres
lujo@ruca.ua.ac.be (Ludo Joris)?


>
>
> Het click event van de command button ziet er zo uit:
> Private Sub cmdOK_Click()
>   Data1.RecordSource = Text1.Text
>   Data1.Refresh
> End Sub
>
> Programma runnen. Als de form verschijnt zijn meteen alle rijen
> en alle komommen van de tabel Produkten te zien in DBGrid1.
>
> select * from produkten where PRIJS > 150 intikken in Text1,
> gevolgd door klikken op de command button levert 1 rij op
> in DBGrid1.
>
> select PROD_ID from produkten intikken in Text1, gevolgd door
> klikken op de command button levert de kolom met alle PROD_ID's op.
>
> Als ik nu in Text1 iets intik in de aard van:
> select *
> from produkten
> where PRIJS < 150
> and PRIJS > 150
> gevolgd door een klik op de command button, krijg ik uiteraard geen
> enkele rij terug. Enkel de de kolomnamen zijn te zien in DBGrid1.
>
> Voila, beschreven zoals ik het gedaan heb, niks speciaals gedaan.
>
> Ik gebruik VB 5 Enterprise, MS-Office 97, Windows98 SE.
>
> HTH

--


met vriendelijke groeten


Luc