form kilitleme veya imhası
Tarih
21/04/2012 13:11
Konu Sahibi
palmet
Yorumlar
12
Okunma
2790
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
palmet
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
42
02/02/2010
Denizli
Ofis 2003
17/11/2013,23:00
Çözüldü 
formun içine yerleştireceğim ( üzerine gizli yazacağım bir kod ile ) 01.01.2015 tarihinde form yada program açıldığında kilitlenecek ve çalışmayacak ve de uyarı dahi vermeyecek lütfen kod istiyorum. ayrıca tarihli bir makro ile zamanı gelince program açıldığında form veya tablo silmek için makro örneği ( örneğin şu 01.01.2015 tarihinde program açıldığında makro kendiğilnden devreye girecek ve formu silecek ) lütfen yapalım ustatlar
Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.901
29/10/2008
916
Ankara
Ofis 2010 32 Bit
Bugün,13:21
Çözüldü 
Sponsor Reklam
lisans veya demo olarak formumuzda ara..güzel örnekler mevcut
Cevapla

palmet
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
42
02/02/2010
Denizli
Ofis 2003
17/11/2013,23:00
Çözüldü 
(21/04/2012, 13:25)C*e*l*o*y*c*e Adlı Kullanıcıdan Alıntı: lisans veya demo olarak formumuzda ara..güzel örnekler mevcut


başka önerisi olan varmı
Cevapla

ercansahin
BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
20/05/2017,13:50
Çözüldü 
Sponsor Reklam
Bir komplo hazırlığı hissediyorum ama hadi hayırlısıImg-grin)
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.

Visual Basic Code
1
2
3
4
5
6
7
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


yalnız hatırlatmalıyım ki silmek istediğiniz form açıkken bu işlem gerçekleşmez. Bunun için docmd.DeleteObject acForm, "Form2" satırından önce DoCmd.Close acForm, "Form2" yazmalısınız.

Cevapla

palmet
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
42
02/02/2010
Denizli
Ofis 2003
17/11/2013,23:00
Çözüldü 
(21/04/2012, 23:28)ercansahin Adlı Kullanıcıdan Alıntı: Bir komplo hazırlığı hissediyorum ama hadi hayırlısıImg-grin)
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.

Visual Basic Code
1
2
3
4
5
6
7
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


yalnız hatırlatmalıyım ki silmek istediğiniz form açıkken bu işlem gerçekleşmez. Bunun için docmd.DeleteObject acForm, "Form2" satırından önce DoCmd.Close acForm, "Form2" yazmalısınız.



'güncel tarih belirlediğimiz tarihten büyük olduğunda olursa iyi olur ona göre tekrar düzenlerseniz
Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.901
29/10/2008
916
Ankara
Ofis 2010 32 Bit
Bugün,13:21
Çözüldü 
Sponsor Reklam
burayı If tarih = Date Then
aşağıdaki şekilde değiştirin
If tarih< = Date Then
'(belirlenen tarih bu günden küçük ve eşitse)
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  #boyut! Veya #tür Hatası balmy 8 237 16/03/2017, 12:01 balmy
  Formda İskonto Veya Kdvden biri Girildiğinde Geliş Fiyatı Değişsin haziran4 2 97 15/02/2017, 12:19 haziran4
  Form üzerinden hesaplanan alanın başka form üzerinden güncelleştirilmesi nightashes 16 493 08/12/2016, 21:40 alpeki99
Çözüldü seçime bağlı metin kutusunu tabloda aktif veya pasif yapma EROLAKSAKAL 13 4.376 12/11/2016, 11:48 atoz112
  Kayıt bul veya kimlik numarasına git butonu yapmak okumas 16 643 25/10/2016, 09:25 okumas


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status