Er zijn 3 reacties in dit onderwerp

[VB6Dummy]

heb je een autonummering toegepast ? Ik veronderstel dat je je klanID als tekst in je accessdatabase wegschrijft en dan is het natuurlijk moeilijker.

Pas je klantenid aan, wat wil zeggen dat je deze wegschrijft als zijnde een volgnummer (bv 5) en daarna een format doet om er K00005 van te maken. Op deze manier kun je via een sql dan makkelijk het laatste ID opvragen (select MAX(klantid) from klantenbestand.

success

[VB6Dummy]

De bedoeling is eigenlijk om ??n record (KlantID) uit tblKlanten te halen, en deze automatisch aan te passen bij het invoeren van een nieuwe klant ...

Voorbeeld: Bij het toevoegen van een nieuwe klant ... De laatst toegevoegde klant heeft als KlantID K00005 ... De volgende klant moet dus automatisch K00006 krijgen bij het starten van de procedure om een nieuwe klant toe te voegen

Wat lukt er niet ? Het vorige KlantID (K00005) uit de datatable halen en in een string zetten ...

[VB6Dummy]

Als je bedoeld om de laatste record van een database tabel weer te geven op een frm kan je dit misschien proberen.

Code:

'Zorgt ervoor dat de records worden geteld

Private Sub Count()

Dim Week, Current As Integer

Week = Me.BindingContext( _

DataSet1, "tbl.....").Count

Current = Me.BindingContext( _

DataSet1, "tbl.....").Position + 1

lblCount.Text = "Week " & Current.ToString & " van " & Week.ToString

End Sub




En vervolgens

Code:

Private Sub btnLaatste_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLaatste.Click

Me.BindingContext(DataSet1, "tbl.....").Position = _

Me.BindingContext(DataSet1, "tbl......").Count - 1

Count()

End Sub



CG

[VB6Dummy]

Hello,

Weet iemand hier wat de makkelijkste manier is om uit een datatable, de laatste rij te selecteren ?

Thx