Bookmark Ve Openargs Hakkında.

1 2 3 4 5
31/03/2020, 21:15

accessman

Dim varBookMark As Variant
set rst = Me.RecordsetClone
If rst.Bookmarkable then
rst.FindFirst "[ID] = " & [TempVars]![TempID]

If Not rst.NoMatch Then
varBookmark = rst.Bookmark
Me.BookMark = varBookmark
End If
End If
31/03/2020, 21:19

feraz

Sayın accessman hocam bir dosya ekleyeyebilirmisiniz.Önceki mesajınıza göre dosya ekledim koduekledim çalıştırdım bişeyy anlamdım ne yaptı kod.
31/03/2020, 21:34

feraz

(31/03/2020, 21:15)accessman yazdı:
Dim varBookMark As Variant
set rst = Me.RecordsetClone
If rst.Bookmarkable then
   rst.FindFirst "[ID] = " & [TempVars]![TempID]

   If Not rst.NoMatch Then
      varBookmark = rst.Bookmark
      Me.BookMark = varBookmark
   End If
End If

Bu örneğe göre dosyya oluşturdum test ettim ve anladım olayı.Kısaca aranın veri varsa orası seçiliyor aynı exceldeki select gibi.Vakit bulunca birde bulunanın satır numarası nasıl oluyormuş onu deneyeceğim bookmark ile.

Herkese teşekkürler.


1 2 3 4 5