Tarih yenilendikçe 00001'den başlayan sayı üretimi...

[Biltes]

Arkadaşlar merhaba;

Şöyle bir yere kadar geldim takıldım. Daha önceden aşağıdaki kod yöntemi ile birer birer sayı arttırıyodum.

Kod: Tümünü seç

var
  zno : integer;
begin
  Query1.Open;
  zno:=Query1maxzetno.AsInteger+1;
  dxEdit2.Text:= FormatCurr('00000',zno);
  Query1.Close;

veritabanındaki zetno alanını en son değere bakarak bir arttırıyor buraya kadar sorun yok. Ama benim buna ek olarak tarihi eklemem gerekiyor. Örnek olarak;
16.09.2007---------00001
16.09.2007---------00002
16.09.2007---------00003

şeklinde ama benim amacım tarih ayın 17'sine geçtiği zaman tekrar 00001'den başlaması,

17.09.2007---------00001
17.09.2007---------00002
17.09.2007---------00003
gibi. Bu şekilde bir olayı yukarıdaki kod yardımı ile yada yeni bir kodlama ile nasıl yapabilirm. Bu sayıyı arttırdığım veritabanında tarih diye bir alanımda var bu arada.

Yardımlarınız için şimdiden çok tşk ederim. Kolay gelsin...

[bobasturk]

merhaba,

mantık olarak önce tarih sorgusu (günün tarihi ile) max sayıyı bulduktan sonra bir arttırma ile olabilirmi?

kolay gelsin