Skip to main content

AccessTr.neT M.


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ı: 4)
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 Adlı Kullanıcıdan Alıntı: 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