Formda Ekleme Silme ve düzenleme izni

[uzmanbey]

Private Sub Form_Load()
AllowAdditions = False
AllowEdits = False
AllowDeletions = False

End Sub

Yukardaki kodlar saygıdeğer modalıya ait bu kodlar yüklenen form da Ekleme Silme ve düzenleme izni kaldırıyor

Diyelimki form yüklendiğin de başka bir formun ekleme silme ve düzeltme izinlerini vermek için nasıl bir kod yazmalıyım

 

[modalı]

Sevgili uzmanbey,

Biraz düşününmeniz için cevaplandırmadım bu soruyu. Şimdi sorunumuz yeni bir form açarken ndiğer form üstünden nasıl yetkilendirme verebiliriz.

Yazacağımız kodda ne olmalı?

1. Adı olmalı değilmi?
2. Bu form adını taşıyacak bir değişken olmalı.
3. Bu değişkene atanmış yetkiler olmalı öyle ise

Dim frm As Form
frm.Name = "Form1"
        With frm
            .AllowAdditions = False
            .AllowDeletions = False
            .AllowEdits = False
        End With

Çok basit değil mi? Nesneye yönelik programlama bu. Yani öncelikle nesneyi belirtmeniz gerekir. Forml içinde kullandığımız Me de ingilizcede ben demek.

İyi çalışmalar

 

[uzmanbey]

saygıdeğer modalı

Öncelikle cevabınız için teşekkürler

çok deneme yaptım başarılı olamadım

ben
form1.AllowAdditions = False

yazdım olmadı sebebini açıklarmısınız

 

[uzmanbey]

sekme denetiminde ve
alt formlarda kodları nasıl yazabilirim ilginize teşekkürler

 

[modalı]

saygıdeğer modalı

Öncelikle cevabınız için teşekkürler

çok deneme yaptım başarılı olamadım

ben
form1.AllowAdditions = False

yazdım olmadı sebebini açıklarmısınız

Olmamasının sebebi form1 i " " arasına almamanız program onu bir değişken olarak algıladı. Sıkılmadan değişken tanımlayıp gereken bilgileri onlara atamanız. İlerde daha değişik dillere (C, C++) geçişte size çok yardımı dokunacak.

Yani
Dim frm As Form
frm= "Form1"

iyi çalışmalar

 

[modalı]

sekme denetiminde ve
alt formlarda kodları nasıl yazabilirim ilginize teşekkürler

Bunun araştırmasını size bırakıyorum. Alt forma yeniden sorgula requery komutu nasıl verilir. Araştırın.

Bu da öyle olacak

 

[uzmanbey]

onu biliyorum

DoCmd.Requery "Form1"

ama neden yeniden sorgulamam gerektiğni anlamadım
yeniden sorguladığımda load olayı gerrçekleştiğinden dolayı mı

 

[modalı]

Sayın uzmanbey,

Beni yanlış anladınız. Ben size hazır kodu vermektense biraz düşündürmek istedim.

Her neyse, aynı form üstünde:

Me.altFormadı.Form.AllowAdditions = False


İyi çalışmalar