Peki bu imhayı kod sahibide mi geri alamıyor ? Diyelim ki belirtilen tarihte form kilitlendi, içinde ki bilgilere sadece program sahibi ulaşsa daha iyi olmaz mı ? Olmaz ise, çok acımasız bir kod ve acımasız bir program sahibi olur. Aynı, duvarı yıkıp, kiremitleri kırmak gibi (Vizonteleden araklanmıştır)
(22/04/2012, 20:04)yorum70 yazdı: [ -> ]Peki bu imhayı kod sahibide mi geri alamıyor ? Diyelim ki belirtilen tarihte form kilitlendi, içinde ki bilgilere sadece program sahibi ulaşsa daha iyi olmaz mı ? Olmaz ise, çok acımasız bir kod ve acımasız bir program sahibi olur. Aynı, duvarı yıkıp, kiremitleri kırmak gibi (Vizonteleden araklanmıştır)
Bu kodla zaten form silinmekte, dolayısı ile program sahibide aynı şekilde forma ulaşamayacaktır. Elbette size katılıyorum, insan kendi yaptığı uyulamada neden böyle bir şeye ihtiyaç duyar mı orası biraz göreceli bir durum.
Aşağıdaki kodu formun açılışına yazıyoruz. Form her açıldığında bu kod gerekli kontrolü yapıyor ve eğer şart oluşmuş ise Form2 isimli (yada sizin belirleyeceğiniz formu) formu siliyor.
Private Sub Form_Load()
Dim tarih As Date 'tarih değişkenini tanımlıyoruz
tarih = "21.04.2012" 'tarih değişkenini 21.04.2012 olarak belirliyoruz
If tarih = Date Then 'güncel tarih belirlediğimiz tarih ile eşit olduğunda
DoCmd.DeleteObject acForm, "Form2" 'Form2 isimli formu sil komutu veriyoruz
End If
End Sub
talebim şu üç form silmek istiyorum kod nasıl olmalı yani silinen form 2, form 3, form 4 üçünüde aynı anda silebilirmiyim
İlgili kodun son bölümündeki
DoCmd.DeleteObject acForm, "Form2" 'Form2 isimli formu sil komutu veriyoruz
kodunu aşağı doğru sıralamayı denedin mi?
DoCmd.DeleteObject acForm, "Form2" 'Form2 isimli formu sil komutu veriyoruz
DoCmd.DeleteObject acForm, "Form3"
DoCmd.DeleteObject acForm, "Form4"
(26/04/2012, 05:10)palmet yazdı: [ -> ]Aşağıdaki kodu formun açılışına yazıyoruz. Form her açıldığında bu kod gerekli kontrolü yapıyor ve eğer şart oluşmuş ise Form2 isimli (yada sizin belirleyeceğiniz formu) formu siliyor.
Private Sub Form_Load()
Dim tarih As Date 'tarih değişkenini tanımlıyoruz
tarih = "21.04.2012" 'tarih değişkenini 21.04.2012 olarak belirliyoruz
If tarih = Date Then 'güncel tarih belirlediğimiz tarih ile eşit olduğunda
DoCmd.DeleteObject acForm, "Form2" 'Form2 isimli formu sil komutu veriyoruz
End If
End Sub
sayın ustatlarım bu şekilde sorgu ve rapor sil talimatı verebilirmiyiz yanı form sil komutunu sorgu ve rapor sil olarak düzenleme imkanı varmı varsa düzenleyebilirmiyiz teşekkürler
Sn.palmet
Önceki sorunuza 11 gündür geri dönüş yapmamışsınız. (Halen yaptığınızda söylenemez)
Bakalım bu sorunuza geri bildirimde bulunacakmısınız
DoCmd.DeleteObject acQuery, "Sorgu adı" 'Sorgular için
DoCmd.DeleteObject acReport, "Rapor adı" 'Raporlar için