combox verinin kullanılıp kullanılmadığının kontrolü
Tarih
18/04/2013 15:04
Konu Sahibi
slayerrrrr
Yorumlar
2
Okunma
940
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy
slayerrrrr
Aktif Üye
Kullanici Avatari
Aktif Üye
E.... T....
93
14/01/2011
13
İzmir
satın alma
Ofis 2007
28/03/2017,10:35
Çözüldü 
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


Ek Dosyalar
.rar   Database3.rar (Dosya Boyutu: 24,66 KB / İndirme Sayısı: 5)
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.556
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Çözüldü 
Sponsor Reklam
Kodları aşağıdakilerle değiştirip deneyiniz.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
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

slayerrrrr
Aktif Üye
Kullanici Avatari
Aktif Üye
E.... T....
93
14/01/2011
13
İzmir
satın alma
Ofis 2007
28/03/2017,10:35
Çözüldü 
Çok teşekkür ederim...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Combox Sorgu Etkileşimi blue_wall 4 88 14/05/2017, 12:30 blue_wall
  Dosya Kontrolü turalsitkituralvolkan 2 103 19/04/2017, 09:30 turalsitkituralvolkan
  Pc Açılış Kullanıcı İle Veritabanı Kull Kontrolu burhanb 3 69 12/04/2017, 09:36 burhanb
  Vb tarafında textbox içerik kontrolü yapamıyorum pelitt 3 83 08/04/2017, 11:57 atoz112
  giriş maskeli kayıt edilen verinin listekutusunda farklı gözükmesi hknct 10 500 21/01/2017, 21:37 hknct


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