Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Veri varsa pasif yoksa aktif nasıl yaparım

Veri varsa pasif yoksa aktif nasıl yaparım
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#43
20-04-2011, 13:03
Form_Current olayındaki kodları aşağıdaki gibi değiştiriniz.


Visual Basic
  1. If Not Me.NewRecord Then
  2.  
  3.    If IsNull(Me.ÜRÜN_DURUMU) Or IsNull(Me.SONUÇ) Then
  4.       bb = False
  5.    Else
  6.       bb = True
  7.  
  8.    End If
  9.  
  10. Else
  11. bb = False
  12. End If
  13.  
  14.  
  15. beab ' Burayı atlamayın sakın


Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler:
MERAK
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 28.08.2009
Toplam 98 konu açtı.
Toplam 779 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2000,
Beğeniler: 0 / 0
#44
20-04-2011, 14:03 (En son düzenleme: 20-04-2011, 14:05 MERAK.)
Tamam Hocam, deneyeceğim. Bir şey sormak istiyorum, eğer yeni kutucuk ekleyip bunun bu eklediğim yeni kodlarda da olmasını istersem kodu aşağıdaki şekilde mi düzenlemem gerekiyor? Eklediğim yerleri kırmızı ile işaretledim. Bir yanlışlık, bir eksiklik var mı?[/code]
[code=vba]

Sub beab()
Me.ÜRÜN_DURUMU.Locked = bb
Me.SONUÇ.Locked = bb
Me.Kutucuk_1.Locked = bb
Me.Kutucuk_2.Locked = bb
Me.Kutucuk_3.Locked = bb
End Sub

If Not Me.NewRecord Then

If IsNull(Me.ÜRÜN_DURUMU) Or IsNull(Me.SONUÇ) or IsNull(Me.Kutucuk_1) or IsNull(Me.Kutucuk_2) or IsNull(Me.Kutucuk_3) Then
bb = False
Else
bb = True

End If

Else
bb = False
End If
beab ' Burayı atlamayın sakın



  Bul
  Alıntı
Bu mesajı beğenenler:
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#45
20-04-2011, 14:53
Ben 2 açılan kutunuz arasında ilişkili diye or ile birlikte kullandım. Kutucuklar için ayrı if then açmanız daha yerinde olabilir.
Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler:
MERAK
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 28.08.2009
Toplam 98 konu açtı.
Toplam 779 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2000,
Beğeniler: 0 / 0
#46
20-04-2011, 15:33
Hocam, rica etsem yukarıdaki kod içinde gösterebilir misiniz?



  Bul
  Alıntı
Bu mesajı beğenenler:
MERAK
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 28.08.2009
Toplam 98 konu açtı.
Toplam 779 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2000,
Beğeniler: 0 / 0
#47
21-04-2011, 13:35
Yardımınızı rica ediyorum.



  Bul
  Alıntı
Bu mesajı beğenenler:
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#48
21-04-2011, 14:16
Form_Current olayını alttaki gibi yapın ve "beab" prosedurunu kullanmıyoruz artık. Bu şekilde kod daha anlaşılır..

Visual Basic
  1. If Not Me.NewRecord Then
  2.  
  3.    If IsNull(Me.ÜRÜN_DURUMU) Or IsNull(Me.SONUÇ) Then
  4.      Me.ÜRÜN_DURUMU.Locked = False
  5.  
  6.      Me.SONUÇ.Locked = False
  7.    Else
  8.       Me.ÜRÜN_DURUMU.Locked = True
  9.  
  10.       Me.SONUÇ.Locked = True
  11.  
  12.    End If
  13.  
  14.    '---------------------
  15.  
  16.    If Not (Me.Kutucuk_1) Then
  17.   Me.Kutucuk_1.Locked = False
  18.    Else
  19.    Me.Kutucuk_1.Locked = True
  20.    End If
  21.  
  22.    If Not (Me.Kutucuk_2) Then
  23.   Me.Kutucuk_2.Locked = False
  24.    Else
  25.    Me.Kutucuk_2.Locked = True
  26.    End If
  27.  
  28.    '---------------------
  29.  
  30.  
  31. Else
  32. Me.ÜRÜN_DURUMU.Locked = False
  33.  
  34. Me.SONUÇ.Locked = False
  35. Me.Kutucuk_1.Locked = False
  36. Me.Kutucuk_2.Locked = False
  37. End If



Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Bir Formdan Başka Bir Formdaki Butonun Click Olayını Aktif Etmek M_Kemal_Askeri 1 35 Dün, 00:07
Son Mesaj: dsezgin
  Depo Takibinde Malzeme Yoksa Uyarı Vermesi hegu 2 363 22-04-2025, 21:56
Son Mesaj: hegu
  Sorgu Içerisinde Boş Alan Varsa 0 (sıfır) Ile Doldurmak denizfatihi 3 535 15-08-2024, 14:38
Son Mesaj: beab05
  Buzdolabı Stok Takip Programı Nasıl Yaparım. mertkevlar 3 712 13-04-2024, 01:35
Son Mesaj: dsezgin
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 583 14-03-2024, 11:07
Son Mesaj: yahyamacit
  Access Formu üzerinden Sql Server Tabloya Nasıl Veri Kaydı Yapılır karacahil 4 695 15-02-2024, 12:10
Son Mesaj: halily
  [FORM] Butonlara Yetkiye Göre Aktif Pasif Olsun Ahmet51 5 546 15-01-2024, 15:49
Son Mesaj: Ahmet51
  Aynı Tarihli Veri Varsa Işlem Yapmasın Ve Sql Col Sayısını Arttırma snapper 9 1.099 20-10-2023, 00:36
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 2 Ziyaretçi