DFisrt, DLast hakkında

[kuva_i_milliye23]

Merhabalar;


Tablodaki verilerden ilk veya son haricindeki ör. 3,4,8 ' inci vs. sıradaki veriye ulaşmak DFirst koduyla mümkün mü?. Mümkünse aşağıdaki kodda nasıl bir ilave yapılmalı. Teşekkürler
Ör.
Me.Metin1.value=DFirst ("adı","tblkayıtlar")

 

[Taruz]

Merhaba..

Bu isteğiniz için iki ayrı öneride bulunayım size..

Kodunuzdan hareketle:

Tablonuzda otomatik sayı alanı varsa ve veriler sıralıysa (zor bir ihtimal gerçi ) :

Me.Metin1.value=DFirst ("adı","tblkayıtlar", "[ID] = " & [ID] + 8) ' 8 inci kayıt

Dlookup olarakta kullanılabilir..

Bir diğer yol da bu..:

Dim rs As New ADODB.Recordset
rs.Open "tblkayıtlar", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.MoveFirst
rs.Move 8 - 1 ' Tablodaki 8 inci kayda gider
Me.Metin1.Value = rs("adı")
Set rs = Nothing

İyi akşamlar..

 

[kuva_i_milliye23]

Sayın Taruz çok teşekkür ederim. Elinize sağlık.