form var olan kaydı tekrar ekliyor
Tarih
15/01/2014 17:40
Konu Sahibi
miCRoBe`
Yorumlar
4
Okunma
1033
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.300
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Çö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.300
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Çö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
  Raporda boş ve veri olan alanları sayı olarak görme murat dikme 3 370 22/01/2017, 13:46 murat dikme
  arama yaparken tekrar parametre istenmesi hknct 6 197 20/01/2017, 11:40 hknct
Çözüldü Aynı Kimlik Numarasının Tekrar Girilmesini Engelleme soguk27 13 2.976 17/12/2016, 21:36 3535izmir3535
  Açılan Siparişi Tekrar formda görme raburabu 5 177 13/12/2016, 11:26 raburabu
  Form üzerinden hesaplanan alanın başka form üzerinden güncelleştirilmesi nightashes 16 350 08/12/2016, 21:40 alpeki99


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