PDA

Vollständige Version anzeigen : Buttons für letzten und ersten Datensatzes.


andreas_a
22.02.2002, 13:04
Hallo zusammen ;-)

kleine frage, ich habe eigene buttons für das navigieren der datensätze.

WIe kann ich das machen das wenn es der letzte bez. der erste Datensatz erreicht ist das der button auf cmdName.Visible = False ?

Rocco
22.02.2002, 13:41
Hmmh! Also nicht, dass ich das bez. kapieren würde, aber ich denke wenn Du die RecordCount Eigenschaft abfragst, dann kommst Du in die richtige Richtung. Erstamal die Anzahl der DS abfragen:

rs.movelast
anzahl = rs.recordcount

..dann brauchste nur noch:

IF rs.recordcount = <letzter>
.....
end if

Greedins und schönes Wochenende

Roccoco

TommyK
22.02.2002, 13:46
Hallo Andreas,

oder glade Dir mal die DB von Kurt Ifanger unter

<a href="http://mypage.bluewin.ch/ifanger/download/zip/navigation.zip" target="_blank">http://mypage.bluewin.ch/ifanger/download/zip/navigation.zip</a>

runter und schau Dir die an.

andreas_a
22.02.2002, 13:53
Hallo zusammen,

Ja genau das im Download hab ich gesucht,

Vielen Dank

Sascha Trowitzsch
22.02.2002, 14:33
Immer diese Links! ;)

im Form_Current:

cmdName.Visible = Not (CurrentRecord = RecordsetClone.RecordCount)
bzw.
cmdName.Visible = Not (CurrentRecord = 1)

Ciao, Sascha

carni
31.10.2002, 00:46
Hallo zusammen!

Hab das auch mal vesucht.
Ich habe ein Hauptformular mit Unterforlmular.Im OnCurrent Ereignis des Unterformulars steht folgender Code:


Private Sub Form_Current()
Me.Current = Me.CurrentRecord
If Me.Current = Me.Total Then
Command59.Enabled = False
Command60.Enabled = False
Else
Command59.Enabled = True
Command60.Enabled = True
End If
End Sub

Das Problem ist nun, dass das alles wunderbar funktioniert, ausser wenn ich nur einen Datensatz im Unterformular habe.
Weiss jemand ne Loesung fuer dieses Problem? Ich komm hier nicht weiter.

Schoenen Gruss,

Patrick

carni
31.10.2002, 16:58
Ok, danke mal an alle, die's gelesen haben. Hab das Problem geloest.