AccessTr.neT

(14/04/2012, 17:26)ercansahin yazdı: [ -> ]Kesinlikle yanılıyorsunuz. kazakayıt Sorgu isimli sorguyu açın oradaki Sıra isimli alanı inceleyin, ben denedim gayet doğru çalışıyor. Yalnız sizin önceki kayıtlarınızda tarih alanları örneğin; 14.4.2012 olarak girilmiş yeni kayıtlarda ise 14.04.2012 olarak gelmekte, bu nedenle de yeniden sıralama yapmaktadır. Başka bir arkadaş inceleyip bilgi verirse seviniriz.

sayın ercan hocam.. Office 2007 kullanıyorum.. tarih her ikiside 14.4.2012 olacak şekilde ayarladım. eski kayıtlarıda sildim. 3 kayıt yapıyorum . sistem tarih ayarını değiştirip 15.4.2012 yapıyorum. ama yeni kayıt dediğimde sırano 4 den devam ediyor maalesef..

(14/04/2012, 17:44)Kur@l yazdı: [ -> ]İncelermisiniz.

Kaza Takip.zip

sayın kural hocam sizin verdiğiniz örnekte de maalesef durum aynı..

Bende bu şekilde çalışıyor.

---

Pardon Kural hocam

hocam yardımlarınız için teşekkür ederim ama sanırım ben istediğimi tam anlatamadım..sizin düzenlemenizde sadece sorguda görünen verdiği sıra numarasını tabloya yazmayan sıra adında bir sütun oluşturuyor ve arada benim istediğimi yapıyor..sıra adında sütun oluşturmadan sırano sütununa bu işlemi yaptıramazmıyız.. çünkü daha sonra ekleyeceğim özelliklerde bu alan sık sık kullanılacak..sadece sorguda yapması olmuyor...tabloda sırano alanına kaydedecek şekilde bu işlemi yaptıramazmıyız

Ekteki örnek istediğiniz gibi düzenlenmiştir. Yeni kayıt eklendiğinde tarihi kontrol edip o güne ait yeni numarayı veriyor.
Kolay Gelsin.

Formdaki Kayıt Eklendiğinde olayına

if isnull(Dmax("SiraNo","KazaKayit","Tarih=cvdate('" & date & "')") ) then

 Me.SiraNo=1 ' İlk Kayıt İse 1 Yaz

else

 Me.SiraNo=Dmax("SiraNo","KazaKayit","Tarih=cvdate('" & date & "')") +1 ' Sonrakilerde 1 artır.

end if