Skip to main content

AccessTr.neT


Farklı tablolardan mükerrer giriş kontrolü

Farklı tablolardan mükerrer giriş kontrolü

Çözüldü #1
Merhabalar, forumda mükerrer kayıt ile ilgili örnekleri inceledim ama bir türlü yapamadım yardımınızı rica ediyorum.

1- Mamul giriş formunda iş emri (1) seçtiğimde listeye kullanıma hazır hammadde geliyor.
2- Listedeki bobini seçtiğimde ID si "ID" tEXBOx a geliyor

Çıkan bobin kutusundan çıkarken Bobin Numarası ve "100,200 gibi parça numaraları daha önce kayıt edilmiş ise aynı bobin nodan 2. kez üretilirse ( bobinno- 100 ) hata uyarasını vermesini sağlayabilirmiyim. Şimdideden Tşkler.
.rar MY2.rar (Dosya Boyutu: 316,25 KB | İndirme Sayısı: 8)
Cevapla
Çözüldü #2
Baktım fakat ne yapmak istediğinizi anlayamadım. Biraz daha detay verirmisinniz...
Please return your positive or negative ...
Cevapla
Çözüldü #3
Parça Numarasını bulamadım ayrıca Bobin no 100 veya Bobin no 200 sadece bir defaya mahsus mu üretilecek ?
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Çözüldü #4
Evet, bobin no ve parça numarası aynı olduğunda ikinci bir defa üretilmeyecek.

Örn:
bobin1-100
bobin1-200
bobin1-300


bobin1-100 iki kayıt olduğu zaman " Daha önce bundan ürettiniz" gibi hata uyarısıda verebilir.

Bobin numarasını ise : Query8 sorgusunda
Bobinin Parça numarası " Kayıt düzeltin içersinde " çıkan bobin " Kolonunda

Bobin numarası ve çıkan bobin ( Bu parça oluyor ) numarasından daha önce girişi yapılmışsa 2. bir girişte uyarı versin gibi. Tşkler,
Cevapla
Çözüldü #5
Şöyleki ; Bu üretilen bobinler başka bir tabloda (bobinno-100) şeklinde bir kolonda üretiliyor.

Bu formda ki kontrol şu şekilde
BobinNo & - & çıkan bobin seçildiğinde

Diğer tablodaki X kolonuna baksın

Aynı bobin nodan bulursa uyarıyı versin
Cevapla
Çözüldü #6
Sayın fatihmx bobin no yu hangi tablodan kontrol ettireceğimizi anlayamadım özür. Ancak Formunuza girdiğiniz bir değeri herhangi bir tablodan kontrol ettirmek istiyorsanız sizin isteğinize yakın olarak şu şekilde olabilir

Private Sub çıkan_bobin_AfterUpdate()
If Me.[çıkan_bobin] = Dlookup ("[Tablonuzdakontroledilecekalanadi]", "Kontroledilecektablonuzunadi", "[Tablonuzdakontroledilecekalanadi]='" & Me.çıkan_bobin & "'") Then
MsgBox Me.çıkan_bobin & " nolu bobin daha önce üretilmiş", vbCritical, "Dikkat"
Else
End If
End Sub

siz kendinize göre tablo ve alan adlarını uyarlaya bilirsiniz.
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task