combox verinin kullanılıp kullanılmadığının kontrolü
Tarih
18/04/2013 15:04
Konu Sahibi
slayerrrrr
Yorumlar
2
Okunma
909
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....
90
14/01/2011
13
İzmir
Ofis 2007
18/11/2016,14:23
Çö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.041
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,07:45
Çözüldü 
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....
90
14/01/2011
13
İzmir
Ofis 2007
18/11/2016,14:23
Çö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
  Metin Kutusuna Yazarken Satır Kontrolü musteri53 7 116 Dün, 16:40 musteri53
  Alt formda boş alan kontrolü raburabu 5 114 28/10/2016, 23:37 raburabu
  yeni girilen verinin mevcut kayıtlar içinde kontrolü mehmetb84 7 409 20/06/2016, 00:34 mehmetb84
Exclamation Denetime yazdıkça alandaki verinin devamını otomatik yazdırmak metince54 sakarya 3 331 23/05/2016, 18:44 atoz112
Çözüldü Kaydetme öncesi boş denetim kontrolü uyarısı verdirme beyşehir2004 2 387 28/01/2016, 23:17 beyşehir2004


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya