Skip to main content

AccessTr.neT M.

Bazı Verileri Kayıt Ederken Uyarı Almak

Konu

Çözüldü #1
Herkese uzun zaman sonra merhabalar,

Çok şey öğrenmiş olduğum sitenizde yeni bir soru sormak istiyorum.

Önce Veritabanımın mantığını açıklayayım ;

main1 formumdan main1 , main11 , main111 , main1111 tablolarına kayıt yapıyorum.

benim sorum şu ;

bu tablolarımın MATERIAL_CODES sütunlarına YASAK adlı tablomdaki verilerden herhangibirini giridiğimde kayıt ederken uyarı vermesini istiyorum.

Nasıl yapabilirim?

Sitede arattım ancak tam olarak bu soruyu nasıl aratacağımıda bilemedeğim için daha önce sorulmuş bir şey ise kusura bakmayın.En azından Daha önce sorulduysa o konuya yönlendirebilirseniz sevinirim.

teşekkürler iyi çalışmalar

.rar SORU20052014.rar (Dosya Boyutu: 735,39 KB | İndirme Sayısı: 16)
Cevapla
Çözüldü #2
main formundaki MATERIAL_CODES metin kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu ekleyiniz.

Visual Basic Code
If DCount("*", "YASAK", "[MATERIAL_CODES]=" & Me.MATERIAL_CODES) <> 0 Then
MsgBox (Me.MATERIAL_CODES & " kodu yasak tablosunda bulunmaktadır.")
End If
End Sub

"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
...........
Çözüldü #3
Son Düzenleme: 20/05/2014, 18:59, Düzenleyen: yorum70.
Bende benzer soruyu sormuştum, bir bakın beğenirseniz !

Sn.Ozanakkaya, son anda gördüm mesajınızı, ama göndermeden de edemedim Img-grin

Ben olsam, Sn.Ozanakkaya'nın kodunu kullanırdım.

.rar testyorum70.rar (Dosya Boyutu: 736,75 KB | İndirme Sayısı: 6)
"Her tercih, bir vazgeçiştir"

Cevapla
Çözüldü #4
Son Düzenleme: 21/05/2014, 09:11, Düzenleyen: siyahca.
kodu aşağıdaki gibi ekledim ancak hata alıyorum

Option Compare Database

Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord , , acNewRec
End Sub

Private Sub MATERIAL_CODES_AfterUpdate()
If DCount("*", "YASAK", "[MATERIAL_CODES]=" & Me.MATERIAL_CODES) <> 0 Then
MsgBox (Me.MATERIAL_CODES & " kodu yasak tablosunda bulunmaktadır.")
End If
End Sub
End Sub

Private Sub MATERIAL_CODES_Click()

End Sub


hata pencereside ;

compile error:
Only comment map appear after End Sub,End function,or End Property

Cevapla
...........
Çözüldü #5
Hata penceresinde zaten belirtilmiş, üst üste iki tane end sub kodu var. birisini sil.

"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
Çözüldü #6
Ozan bey bu seferde herhangibir veri kayıt etmeye çalıştığımda aşağıdaki hatayı veriyor ;

Run-time Error '3464'
Ölçüt ifadesinde veri türü uyuşmazlığı

Cevapla
...........

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task