Skip to main content

AccessTr.neT


combox verinin kullanılıp kullanılmadığının kontrolü

combox verinin kullanılıp kullanılmadığının kontrolü

Çözüldü #1
Merhaba
form1 de EKIPMAN(örnek canavar(1) satırında seçilen ekipmanın DURUM u teslim edildi ise yeni satırda bu ekipmanın seçilmemesi için veya seçildiği zaman bu ekipman şu kişidedir(örnek x kişidedir) diye bir hata mesajı verdirmek istiyorum DURUM satırı teslim alındı yazıldığı zaman yeni satırda yeniden ekipmanın seçilebilmesini istiyorum bu konuda yardımlarınızı bekliyorum....Teşekkürler
.rar Database3.rar (Dosya Boyutu: 24,66 KB | İndirme Sayısı: 5)
Son Düzenleme: 19/04/2013, 12:03, Düzenleyen: slayerrrrr.
Cevapla
Çözüldü #2
Kodları aşağıdakilerle değiştirip deneyiniz.

Dim VarMi As Integer
Dim Kimde As String

VarMi = Nz(DLookup("[Kimlik]", "Bakim_el_aletleri_tablo", "[DURUM]='TESLİM EDİLDİ' And [CİHAZ TİPİ1] = " & "'" & Me![EKIPMAN] & "'"), 0)
Kimde = Nz(DLookup("[TESLİM ALAN]", "Bakim_el_aletleri_tablo", "[Kimlik]=" & VarMi), "")

If VarMi > 0 Then
MsgBox ("Bu Ekipman " & Kimde & " isimli kişidedir")
Me.EKIPMAN = ""
Else
K1 = Me.EKIPMAN.Column(1)
K2 = Me.EKIPMAN.Column(2)
K3 = Me.EKIPMAN.Column(3)
K4 = Me.EKIPMAN.Column(4)
K5 = Me.EKIPMAN.Column(5)
K6 = Me.EKIPMAN.Column(6)
K7 = Me.EKIPMAN.Column(7)
End If
Cevapla
Çözüldü #3
Çok teşekkür ederim...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da