Skip to main content

AccessTr.neT


Formda Kayıt Varsa Göster Yoksa Kaydet

Formda Kayıt Varsa Göster Yoksa Kaydet

Çözüldü #2
Sayın Macalistan

Formunuzdaki MUSTERI_KODU alanınızın güncelleştirme öncesi yordamına şu kodları yapıştırın

Kod:
If MUSTERI_KODU = DLookup("[MUSTERI_KODU]", "[MUSTERI_KARTI_table]", "[MUSTERI_KODU]=forms![MUSTERI_KARTI_table]!MUSTERI_KODU") Then
MsgBox "BU MÜŞTERİ NUMARASI DAHA ÖNCE KULLANILMIŞTIR. LÜTFEN DEĞİŞTİRİNİZ."
Undo

Else
End If

sonra da bu metin kutusunun bir altındaki MUSTERI_ADI metin kutusunun girildiğinde olayına da

Kod:
If MUSTERI_KODU = DLookup("[MUSTERI_KODU]", "[MUSTERI_KARTI_table]", "[MUSTERI_KODU]=forms![MUSTERI_KARTI_table]!MUSTERI_KODU") Then
Me.MUSTERI_KODU.SetFocus
Else
End If

kodlarını yapıştırın.

Kolay gelsin..
İnadına, ille de Accesstr.net...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Formda Kayıt Varsa Göster Yoksa Kaydet - Yazar: mehmetdemiral - 06/02/2009, 02:08
Task