tarihe göre sıra no 1 den başlatma

1 2 3 4 5
14/04/2012, 22:18

perisanoglu

(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ı..
14/04/2012, 22:36

Kur@l

Bende bu şekilde çalışıyor.

14/04/2012, 22:39

ercansahin



Pardon Kural hocam
14/04/2012, 23:36

perisanoglu

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
14/04/2012, 23:54

Kur@l

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.
Kaza Takip.zip
14/04/2012, 23:59

Yandemir

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
1 2 3 4 5