formumun ilk açılışta kilitli yani pasif olarak görünmesi ve yeni kayıt ekle butununa tıkladığımda aktife geçerek sıra numarasının oto olarak atarak bir sonraki kayda gitmesi sıra no otomotik değilde bizim manuel olarak yazdığımız koda göre gitmesi
form kilitleme aktif pasif yapma sorunu
Eklediğiniz örnekte form olmaması?
gizli olabilir bana yolladığınız örnekte de rapor gizli idi buldum ve açtım
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Aşağıdaki linkte 2 adet nesne kilitleme örneği var
Form Üzerindeki Verileri Kilitle
Suc no alanı için
kodunu kullanabilirsin
Form Üzerindeki Verileri Kilitle
Suc no alanı için
dmax("SucNo","Tablo")+1
kodunu kullanabilirsin
bunu form üzerinde yapma imkanınız varsa yeni kayıt ekle dediğimde kilitin açılması ve kaydettikten sonter oto pasife geçmesi
Oktay hocanın İpucu : Kontrol kilitleme ( Tag ) linkindeki kontrol kilitleme örneği daha kullanışlı. Bence onu dene.
Tüm metin kutularını seçip özelliklerden "İm" özelliğine "A" yazacaksın, formun açıldığında olayına
Bahsettiğin butonun tıklandığında olayına da
Tüm metin kutularını seçip özelliklerden "İm" özelliğine "A" yazacaksın, formun açıldığında olayına
Private Sub Form_Open(Cancel As Integer)
Dim ctrl As Control
For Each ctrl In Me.Controls
If ctrl.Tag = "A" Then
ctrl.Enabled = False
End If
Next
End Sub
Bahsettiğin butonun tıklandığında olayına da
Private Sub Form_Open(Cancel As Integer)
Dim ctrl As Control
For Each ctrl In Me.Controls
If ctrl.Tag = "A" Then
ctrl.Enabled = True
End If
Next
SucNo = DMax("SucNo", "Tablo") + 1
End Sub
Konuyu Okuyanlar: 2 Ziyaretçi