Ben teşekkür ederim. Lütfen forum kurallarına göre
Access 2003 dosya formatında ve sıkıştırarak gönderin dosyalarınızı böylelikle ilgilenecek kişi sayısıda artar.
sayın hocam,
ben oldu dedim ama ufak bir hata var..
sizin yazdığınız kodla, vt tabanı içindeki kayıt numarasına gidiyor. oysa ki ben, ID'de yazacak numaraya gitmesini istiyorum.
ikisi aynı şey değil çünkü access'te bazı kayıtlar oluşturulurken vazgeçilirse (örneğin 8 bolu kayda kayıt yaparken ESC basarsak), bilindiği gibi autonumber ile ilk atanan kayıt numarası tarih oluyor. yeni kayıt oluşturduğumuzda bu kez otomatik verilen kayıt nosu iptal olandan bir sonraki oluyor (örneğimiz için artık 8 tarih olduğundan 9 numarası veriliyor)
dolayısıyla accessteki kayıt sıralaması ile benim vt içindeki kayıt sıralaması aynı olmuyor. sizin yaptığınız kodlama
Access vt içindeki sıralamayı referans aldığından, benim istediğim kayda gitmemiş oluyor.
umarım anlatabilmişimdir.
Hımm teknik bir hata sonucu asıl yayınımıza dönüyoruz
Kod:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID] = " & onceki_id
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Aynı anda 5 işle uğraşınca olacağı budur. Bu kodu butonun tıklama olayına yazınız. Ayrıca ID yi yazdığınız metin kutusunun adını onceki_id olarak değiştiriniz.
alpeki 99 hocam teşekkürler, elinize sağlık.
herkese iyi haftalar diliyorum..