form var olan kaydı tekrar ekliyor
Tarih
15/01/2014 17:40
Konu Sahibi
miCRoBe`
Yorumlar
4
Okunma
1021
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



miCRoBe`
Aktif Üye
Kullanici Avatari
Aktif Üye
88
08/10/2011
0
Belirtilmemiş
Ofis 2010
15/04/2015,03:20
Çözüldü 
Sponsor Reklam
merhaba.

alışlar formu aracılığı ile bir telefon tekrar tekrar alınabilmeli. alışlar formunda bu konuda bir sorun yok. fakat telefon satışı yapılmadığı takdirde de tekrar alınabiliyor.

telefon stokta var ise satılmamış ise tekrar alışı gerçekleşmemesi için formda bunu engellemek için ne yapabilirim? (telefon tekrar tekrar alınabilmeli fakat, satılmamış ise alınamamalı, stokta uyarısı vermeli gibi)

teşekkürler.


Ek Dosyalar
.rar   telefonson.rar (Dosya Boyutu: 59,29 KB / İndirme Sayısı: 7)
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.189
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,14:26
Çözüldü 
imeino açılan kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu yazarak deneyebilir misin?

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub imeino_AfterUpdate()
Dim VarMi, StoktaMi As Integer
Metin34 = Me.imeino.Column(1)
VarMi = DLookup([imeino], "imeiler")
StoktaMi = Nz(DLookup("[imeiid]", "Stok", "[imeiid]=" & [imeino]), 0)

    If StoktaMi <> 0 Then
       MsgBox "" & Me.imeino.Column(1) & " imei numaralı " & DLookup("[markaadi]", "markalar", "[markaid]=" & DLookup("[telefonid]", "imeiler", "[imeino]='" & Metin34 & "'")) & " marka telefon stokta olduğundan tekrar satın alınamaz", vbCritical, "Satın Alma Uyarısı"
        Exit Sub
    End If
    If VarMi <> 0 And DLookup("[telefonid]", "imeiler", "[imeino]='" & Metin34 & "'") <> 0 Then
        MsgBox ("Bu imei numarası daha önce kaydedilmiş, veriler aktarılacak")
        Me.markaadi = Me.imeino.Column(3)
        Me.modeladi = Me.imeino.Column(4)
    Else
        Me.markaadi.Value = ""
        Me.modeladi.Value = ""
    End If
End Sub


Cevapla

miCRoBe`
Aktif Üye
Kullanici Avatari
Aktif Üye
88
08/10/2011
0
Belirtilmemiş
Ofis 2010
15/04/2015,03:20
Çözüldü 
Sponsor Reklam
denedim ozan bey, şöyle uyarı verdi..

resim

ve ardından sekme marka adına geçti ve diğer alanları da doldurunca aynı imei noyu kayıt etti.
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.189
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,14:26
Çözüldü 
o zaman

Visual Basic Code
exit sub

kodunun hemen üstüne

Visual Basic Code
imeino=""

kodu ekle.


Visual Basic Code
  MsgBox "" & Me.imeino.Column(1) & " imei numaralı " & DLookup("[markaadi]", "markalar", "[markaid]=" & DLookup("[telefonid]", "imeiler", "[imeino]='" & Metin34 & "'")) & " marka telefon stokta olduğundan tekrar satın alınamaz", vbCritical, "Satın Alma Uyarısı"
        imeino = ""
        Exit Sub


Cevapla

miCRoBe`
Aktif Üye
Kullanici Avatari
Aktif Üye
88
08/10/2011
0
Belirtilmemiş
Ofis 2010
15/04/2015,03:20
Çözüldü 
Sponsor Reklam
teşekkür ederim.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  arama yaparken tekrar parametre istenmesi hknct 6 75 Dün, 11:40 hknct
Çözüldü Aynı Kimlik Numarasının Tekrar Girilmesini Engelleme soguk27 13 2.925 17/12/2016, 21:36 3535izmir3535
  Açılan Siparişi Tekrar formda görme raburabu 5 161 13/12/2016, 11:26 raburabu
  Form üzerinden hesaplanan alanın başka form üzerinden güncelleştirilmesi nightashes 16 302 08/12/2016, 21:40 alpeki99
Rainbow accdb formatda olan veri tabanının parolasini bulmak Ramin Vaqif Humbatov 3 278 04/12/2016, 04:22 ozanakkaya


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