mERHABA Arkadaşlar; Katkılarınızla program test yayınlarına başladı.Sledgeab üstadın 2003'e çevirdiği programı, 2007 yaptım ve yüklenecek pc'ye 2007 kurdum..Ara kutusu öylece duruyor ve arama yapmıyor ! Biraz uğraştım, arama yapan kopyasından aktarma yaptım olmadı.
Bir diğer sorun, kimlik1.id saymaya 1 den değilde 50'li sayılardan başlıyor, 1 den başlasa ve girdikce otomatik atsa en azından kaç evrak girdiğimizi biliriz.
(02/02/2012, 19:04)yorum70 yazdı: [ -> ]Bir diğer sorun, kimlik1.id saymaya 1 den değilde 50'li sayılardan başlıyor, 1 den başlasa ve girdikce otomatik atsa en azından kaç evrak girdiğimizi biliriz.
Şu anda kullandığım bilgisayarda office olmaması nedeniyle ilk sorunuza yanıt veremeyeceğim, ancak bence kimlik1.id'nin (muhtemelen otomatik sayı) tuttuğu sayılara takılmadan kayıt sayısını saydırarak kaç evrak girdiğinizi izlemeniz daha doğru bir yaklaşım olacaktır.
ilk sorun için kimlikid otomatik sayı her kayıt yapmak için forma girip çıktığında otomatik olarak artar onun yerine kimlik id gizledim ve evrak sayısı kısmı tablodaki evrak kayıt sırasına göre artması için aşağıdaki gibi yaptım kaydet butonuna tıklandığında olayına gözat.
İkinci liste kutunun ismi Liste64
bu nedenle tıklandığında olayı aşağıdaki gibi olmalı kodlar hernekadar birbirine benzesede
denetimlerin isimlerine göre çalışır.
Private Sub Liste64_Click()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Kimlik1] = " & str(Nz(Me![Liste64], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
