AccessTr.neT
forma düzenle,kaydet butonları ekleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: forma düzenle,kaydet butonları ekleme (/konu-forma-duzenle-kaydet-butonlari-ekleme.html)



forma düzenle,kaydet butonları ekleme - memox - 08/04/2015

merhaba arkadaşlar

ekteki veritabanında" frm_urunler" formu düzenlemeye hayır olarak ayarlandı.bu formu bir butonla duzenle komutu ile 
düzenleme izni verip,düzenledikten sonra tekrar butonla düzenleme iznini kapatmak istiyorum.
vba kodlarla bunu yapabilirmiyim.
teşekkürler


Cvp: forma düzenle,kaydet butonları ekleme - ozanakkaya - 08/04/2015

me.allowedits=true

kodu ile düzenlemeye açıp

me.allowedits=false

kodu ile tekrar kapatabilirsiniz.


Cvp: forma düzenle,kaydet butonları ekleme - memox - 08/04/2015

(08/04/2015, 15:44)ozanakkaya yazdı: me.allowedits=true

kodu ile düzenlemeye açıp

me.allowedits=false

kodu ile tekrar kapatabilirsiniz.

çok teşekkür ederim.
fakat butona atadığım  bu kod alt formun özelliğini değiştirmiyor.tek komutla her iki  formu da
düzenlemem mümkün mü?
teşekkür ederim


Cvp: forma düzenle,kaydet butonları ekleme - atoz112 - 08/04/2015

sayın memox,

bahsettiğiniz talebinize yönelik olarak,
hem ana forma hem de alt forma düzenleme izni vermek için,

Kod:
Private Sub btn_duzenle_Click()
Me.AllowEdits = True
Forms!frm_urunler.frm_maliyet_AltForm.Form.AllowEdits = True
End Sub

Private Sub btn_kaydet_Click()
Me.AllowEdits = False
Forms!frm_urunler.frm_maliyet_AltForm.Form.AllowEdits = False
End Sub

şeklinde kullanabilirsiniz.bilginize.

iyi çalışmalar,
saygılar.


Cvp: forma düzenle,kaydet butonları ekleme - memox - 08/04/2015

(08/04/2015, 17:14)atoz112 yazdı: sayın memox,

bahsettiğiniz talebinize yönelik olarak,
hem ana forma hem de alt forma düzenleme izni vermek için,


Kod:
Private Sub btn_duzenle_Click()
Me.AllowEdits = True
Forms!frm_urunler.frm_maliyet_AltForm.Form.AllowEdits = True
End Sub

Private Sub btn_kaydet_Click()
Me.AllowEdits = False
Forms!frm_urunler.frm_maliyet_AltForm.Form.AllowEdits = False
End Sub

şeklinde kullanabilirsiniz.bilginize.

iyi çalışmalar,
saygılar.

sayın atoz112 
çok teşekkür ediyorum.
problemim çözüldü.
sağlıcakla kalın.