Dim dblZoeken As Double
Dim strZoeken As String
strZoeken = txtZoeken.Text
dblZoeken = Val(txtZoeken.Text)
DataRuiters.Recordset.Move (dblZoeken)
hierboven een primitieve code voor een eenvoudig zoekprogramma wat bij een id nr de bijbehorende gegevens zoekt er is alleen 1 probleem.
DataRuiters.Recordset.Move (dblZoeken) deze code klopt niet inplaats naar bijvoorbeeld record 2 tegaan gaat hij er 2 vooruit hoe los ik dit op
'************************zoekfunctie************************************************
'Vullen van de tekstvariabele strKlantnr met de inhoud van TextBox txtKlantnr.Text
strZoek = txtZoeken.Text
'Database verversen voor inlezen van de gegevens
DataPaarden.Refresh
DataPaarden.Recordset.MoveLast
DataPaarden.Recordset.MoveFirst
'Zoek nu in de tabel Ver_pol naar het polisnummer bij het opgeven klantnummer
While strZoek <> DataPaarden.Recordset.Fields(1)
DataPaarden.Recordset.MoveNext
Wend
voor moeilijk zoeken gebruik ik dit ik weet alleen niet hoe ik het resultaat in een textbox moet krijgen
quote:ja met acces werk ikOp donderdag 17 juni 2004 22:16 schreef devv05 het volgende:
Met een SQL Query?
welk command heb ik daar voor nodig om bovenstaand te doen
en textbox vullen
txtTextbox.text = dataPaarden.Recordset.Fields("veldnaam")
Heb je dit wel zelf gemaakt? Is wel vrij simpel allemaal...
DataPaarden.Refresh
DataPaarden.Recordset.MoveLast
DataPaarden.Recordset.MoveFirst
Visual Basic tutorial zou geen kwaad kunnen denk ik, de rest van de code klopt ook niet
Command Exces in 4 over tunen op de greep.
quote:ja eigen werkOp donderdag 17 juni 2004 22:19 schreef devv05 het volgende:
"SELECT * FROM tabelnaam WHERE nummer=" & strZoeken
en textbox vullen
txtTextbox.text = dataPaarden.Recordset.Fields("veldnaam")
Heb je dit wel zelf gemaakt? Is wel vrij simpel allemaal...
dit snapik invoegen
maar ik moet op naam zoeken en daar dan bijbehoorden id hebben en dan de record set daarheen laten gaan zodat hij automatisch de rest van de textboxjes in vult.
en ja ben echt een noob hierin das het fijna leraar geeft 4 lessen cursus visualbasic en komt daarna meteen aan maak maar een database programma voor een ruiter vereninging
en ja het is voor schoolexamen dus maak er iets va
quote:database verversenOp donderdag 17 juni 2004 22:21 schreef devv05 het volgende:
Trouwens wat doe je hier in godsnaam:
DataPaarden.Refresh
DataPaarden.Recordset.MoveLast
DataPaarden.Recordset.MoveFirst
Visual Basic tutorial zou geen kwaad kunnen denk ik, de rest van de code klopt ook niet
quote:war heb jij het overOp donderdag 17 juni 2004 22:22 schreef tong80 het volgende:
Storum = Equal Number load, zoeken op record.
Command Exces in 4 over tunen op de greep.
quote:Eigen werk zegt ie.Op donderdag 17 juni 2004 22:26 schreef icecreamfarmer_NL het volgende:
ja eigen werk
Het regeltje 'Zoek nu in de tabel Ver_pol naar het polisnummer bij het opgeven klantnummer in de code doet me anders vermoeden.
quote:Dan doe je een SQL query waarin je op naam zoekt.. Vervolgens loop je met een Loop alle records langs om de textboxjes te vullen..Op donderdag 17 juni 2004 22:26 schreef icecreamfarmer_NL het volgende:
[..]
ja eigen werk
dit snapik invoegen
maar ik moet op naam zoeken en daar dan bijbehoorden id hebben en dan de record set daarheen laten gaan zodat hij automatisch de rest van de textboxjes in vult.
en ja ben echt een noob hierin das het fijna leraar geeft 4 lessen cursus visualbasic en komt daarna meteen aan maak maar een database programma voor een ruiter vereninging
en ja het is voor schoolexamen dus maak er iets va
quote:Uhh ja en waarom?Op donderdag 17 juni 2004 22:27 schreef icecreamfarmer_NL het volgende:
[..]
database verversen
En daarna ga je eerst naar het eerste record om vervolgens op de volgende regel naar het laatste record te gaan
quote:het eerste stuk code welOp donderdag 17 juni 2004 22:31 schreef sol1tair het volgende:
[..]
Eigen werk zegt ie.
Het regeltje 'Zoek nu in de tabel Ver_pol naar het polisnummer bij het opgeven klantnummer in de code doet me anders vermoeden.
het 2de hebben we van de leraar gekregen en dat heb ik geprobeert maar dat laat mijn pc vastlopen
quote:dat snap ik maar hoe doe ik dat in code ben echt een noob op dit gebied ik kan een QI en een rekenmachine maar veel moeilijker moet het niet wordenOp donderdag 17 juni 2004 22:32 schreef devv05 het volgende:
[..]
Dan doe je een SQL query waarin je op naam zoekt.. Vervolgens loop je met een Loop alle records langs om de textboxjes te vullen..
quote:Sorry ik wil je best op weg helpen maar als je dit soort dingen al niet weet kan ik het hele programma wel voor je gaan schrijven..Op donderdag 17 juni 2004 22:35 schreef icecreamfarmer_NL het volgende:
[..]
dat snap ik maar hoe doe ik dat in code ben echt een noob op dit gebied ik kan een QI en een rekenmachine maar veel moeilijker moet het niet worden
Met gerichte vragen wil ik je best helpen, verder adviseer ik je om een beginners tutorial erbij te pakken..
quote:het is dus met geen mogelijkheid vooral elkaar te krijgen om de recordset te laten verspringen.Op donderdag 17 juni 2004 22:37 schreef devv05 het volgende:
[..]
Sorry ik wil je best op weg helpen maar als je dit soort dingen al niet weet kan ik het hele programma wel voor je gaan schrijven..
Met gerichte vragen wil ik je best helpen, verder adviseer ik je om een beginners tutorial erbij te pakken..
want dat heb ik ook nodig als ik ga loopen
anders vult hij de gegevens van de verkeerde ruiter in.
en ik had gvd wel gewillen dat die leraar wat meer uitleg gaf in plaats van te zeggen zoek dat zelf maar uit
quote:Mja dan moet je toch echt terug naar je leraar om duidelijkere uitleg te vragen..Op donderdag 17 juni 2004 22:40 schreef icecreamfarmer_NL het volgende:
[..]
het is dus met geen mogelijkheid vooral elkaar te krijgen om de recordset te laten verspringen.
want dat heb ik ook nodig als ik ga loopen
anders vult hij de gegevens van de verkeerde ruiter in.
en ik had gvd wel gewillen dat die leraar wat meer uitleg gaf in plaats van te zeggen zoek dat zelf maar uit
Maar je laadt gewoon een aantal records dmv een query (bijvoorbeeld SELECT * FROM tabel WHERE datanaam =" & naam) en vervolgens kan je met Recordset.movenext en moveprevious door de records heen bladeren die gevonden zijn.
Ik snap nog steeds niet goed wat je nu bedoelt.
quote:dat lukt mij ook voor dat bladeren heb je zelfs geen code nodig die zit al op de datacontrol.Op donderdag 17 juni 2004 22:43 schreef devv05 het volgende:
[..]
Mja dan moet je toch echt terug naar je leraar om duidelijkere uitleg te vragen..
Maar je laadt gewoon een aantal records dmv een query (bijvoorbeeld SELECT * FROM tabel WHERE datanaam =" & naam) en vervolgens kan je met Recordset.movenext en moveprevious door de records heen bladeren die gevonden zijn.
Ik snap nog steeds niet goed wat je nu bedoelt.
wat ik nodig heb is dat hij bv (het programma start op en begint bij record 1) dat als ik zoek op lidnummer (en dus op de primaire sleutel) bv lidnummer 25 dat hij in 1 keer van record 1 naar 25 springt
Zie hier voor voorbeeldje: http://www.juicystudio.com/tutorial/vb/database.asp