Skip to main content

AccessTr.neT


Otomatik Numara Verme

Otomatik Numara Verme

#1
selamınaleyküm,

vb6 da add tuşuna bastığımda otomatik numara vermesi yani eğer kayıt yoksa 0001 varsa önceki kayıt kaçsa ona göre 1 arttıracak örnek:0001 ise 0002 olacak bunu accesste yapmıştık ama vb ye uyarlayamadım 

accesste
 If MsgBox("Otomatik Kayıt Numarası Verilsin mi?", vbYesNo, "NUR YAZILIM") = 6 Then
DoCmd.GoToRecord , , acNewRec
    stok_no = Format(Nz(DMax("stok_no", "tbl_stok_giris_karti"), 0) + 1, "0##")
stok_adi.SetFocus
mus_no_ver.Enabled = False

Else
Undo
stok_no.SetFocus
End If


ama vb6 da nasıl bulamadım yardım lütfen
Dünya hayatı bir oyun ve eğlenceden başka bir şey değildir. Allah'tan korkanlar için elbette ahiret yurdu daha hayırlıdır. Hâlâ akıl erdiremiyor musunuz? 
(En'am: 32)
Cevapla
#2
A.S.  kardeşim
Ben vb net ile program yazarken bu kodu kullanırım sizde bunu kendinize çevirebilirsiniz.

 sqL = "SELECT ID FROM TBL_KISILER ORDER BY ID DESC;"

            ConnDB()
            cmd = New OleDbCommand(sqL, conn)
            dr = cmd.ExecuteReader(CommandBehavior.CloseConnection)
            If dr.Read = True Then
                txtID.Text = dr(0) + 1
            Else
                txtID.Text = 1
            End If
Cevapla
#3
Yardımın için teşekkürler fakat bu kodları kabul etmiyor
Dünya hayatı bir oyun ve eğlenceden başka bir şey değildir. Allah'tan korkanlar için elbette ahiret yurdu daha hayırlıdır. Hâlâ akıl erdiremiyor musunuz? 
(En'am: 32)
Cevapla
#4
tabiki bu kodlar birebir olmaz,ya örneğinizi ekleyeceksiniz,vb6 dan anlayan bakacak yada siz bu kodları kendinize uyarlayacak,başka yolu yok.
Cevapla
#5
selamın aleyküm arkadaşlar,
yapmak isteyipte yapamadığım olay için örnek yolluyorum inşallah yapılabilir.
 yardımlarınız şimdiden teşekkürler.
.rar deneme2.rar (Dosya Boyutu: 10,87 KB | İndirme Sayısı: 8)
Dünya hayatı bir oyun ve eğlenceden başka bir şey değildir. Allah'tan korkanlar için elbette ahiret yurdu daha hayırlıdır. Hâlâ akıl erdiremiyor musunuz? 
(En'am: 32)
Cevapla
#6
(26/06/2018, 05:49)C*e*l*o*y*c*e yazdı: tabiki bu kodlar birebir olmaz,ya örneğinizi ekleyeceksiniz,vb6 dan anlayan bakacak yada siz bu kodları kendinize uyarlayacak,başka yolu yok.

dosyayı ekte yolladım
Dünya hayatı bir oyun ve eğlenceden başka bir şey değildir. Allah'tan korkanlar için elbette ahiret yurdu daha hayırlıdır. Hâlâ akıl erdiremiyor musunuz? 
(En'am: 32)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da