31-05-2012, 13:50 (En son düzenleme: 31-05-2012, 15:03 akd27.)
Merhabalar,
DoCmd.GoToRecord , , acLast
liste cok uzun olunca, aşağıya inmek uzun sürüyor,
son kayıt yapınca kayıtların hepsini yukarıya gizliyor,
1 kayıt görünüyor,
benim istedigim, son kayıttan 10 kayıt öncesine setfoks yapması,
tabi bu müşteriyi seçince olacak,
her müşteri için yapacak bunu.
Aslında Asp.net teki sayfalama özelliği olsa daha güzel olurdu,
grit kayıt sayısına bakıp ona göre sayfaları 10 arlı guruplara çeviriyor, sayfa numaraları oluşturuyor, hangi numaraya tıklarsan o sayfa geliyor.
İyi çalaışmalar...
sayın jon206, ben tam anlatamamış herhalde,
müşterini bütün kayıtları gelecek yalnız son kayda git deyince,
bütün kayıtları yukarıya saklıyor tek son kaydı gösteriyor,
benim istedigim, son kayıttan geriye 10 uncu kayda setfoks yapması
dolayısıyla ekranda 10 kayıt görünür , diğer kayıtlar üst taraftadır,
bir resim ekleyim en iyisi anlamanız için;
mrb.akd27
dediğin gibi oldu ama
sizin verilerde problem var
liste kutusunda 2 adet ASIM İMAM var diğeri alt ta
oyüzden gitmekte problem yaşıyor..
veriler düzgün işlenmediğinden kaynaklanıyor zannedersem..
ama yinede çoğu da dediğin gibi oldu
bir inceleyiniz..
Sayın jon206, ilginiz için teşekkürler,
bende şöyle bir yöntem buldum,
Private Sub Açılan_Kutu33_Click()
DoCmd.ApplyFilter , "[SiraNo]=[Forms]![cari]![Açılan Kutu33]"
DoCmd.GoToRecord , , acLast
On error resume next
Dim i As Byte
For i = 1 To 10
DoCmd.GoToRecord , , acPrevious
Next i
End Sub