2 Tane Otomatik Sayı

[baqbaq]

merhaba, bir projem var tabloda iki tane otomatik sayının olması gerekiyor.
Biri ID'leri tutuyor, diğeri ise belirlediğim rakamlar arasında sırayla artmasını istiyorum. Mesela 0 ile 100000 arasında sırayla artmasını istiyorum.
Forumda açılan diğer konulara göz attım ama çözümü bulamadım. Yardımcı Olur musunuz ?

 

[Mahir64]

Merhaba,

Hangi kriterlere göre sıraile atacak?
Sırasıyla artma hangi koşula göre olacak?

--

 

[Murat OSMA]

Mahir Bey, müsadenizle ben şöyle bir yanıt vereyim. Olmazsa yarın gelecek yanıta göre tekrar bakarız.

Bu kodları bir deneyiniz;

[FONT="Trebuchet MS"]Sub Emre()
    Dim ilk&, son&
    ilk = InputBox("İlk Sayı")
    son = InputBox("Son Sayı")
    If ilk > son Then MsgBox "İlk sayı son sayıdan büyük olamaz.": Exit Sub
    [a1] = ilk
    [a1].AutoFill Destination:=Range("A1:A" & son - ilk + 1), Type:=2
    ilk = Empty: son = Empty
End Sub[/FONT]

 

[baqbaq]

Murat bey verdiğiniz kodlar Basic kodları ben C# ile çalışıyorum.
Tekrar açıklayayım. Projede iki tane otomatik sayı olmak zorunda. İlki ID'yi tutuyor, her kayıta otomatik olarak primary key olarak bir sayı veriliyor onda bir sıkıntım yok. Fakat Access'te bi tane daha alanım var onda ise belirlediğim iki sayı arasında her kayıta sırayla sayı vermesini istiyorum. Access'in böyle bir özelliği varmı bilmiyorum. Yoksa,sırayla kaydettiğim sayıyı her seferinde sorguyla çekip bir artırıp tekrar veri tabanına mı kaydettireceğim.

 

[Murat OSMA]

C# bilgim yok.

İyi akşamlar.

 

[baqbaq]

Teşekkürler, Eğer sorundan muzdarip olan varsa ben çözümü kod'la hallettim.
Her kayıtta Access'ten en büyük sayıyı çekip + 1 ekleyip kaydettiriyorum.