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.

Visual Basic Code
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
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
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