AccessTr.neT
Run-Time error "2450" uyarısı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Run-Time error "2450" uyarısı (/konu-run-time-error-2450-uyarisi.html)



Run-Time error "2450" uyarısı - mmert06 - 30/10/2016

arkadaşlar ekteki proforma formundaki mükerrer kayıtları önlemek için uyarı mesajı verilmesini istiyorum kendim kodu yazmaya çalıştım ve stok numarası alanına aynı stok numarasını yazıp enter tuşuna bastığımda run time error 2450 hatası alıyorum. bunu nasıl düzeltebilirim saygılar


Cvp: Run-Time error "2450" uyarısı - ozanakkaya - 30/10/2016

Merhaba,

Kodun aşağıdaki gibi olması gerekiyor.

Dim VarMi As Integer

VarMi = Nz(DLookup("[malzeme_id]", "Malzemeler", "[stok_no]='" & Me.stok_no & "'"), 0)

If VarMi <> 0 Then

   Me.malzeme_adi = Dlookup ("[malzeme_adi]", "Malzemeler", "[stok_no]='" & Me.stok_no & "'")
   
   If Dlookup ("[stok_no]", "Proforma", "[stok_no]='" & Me.stok_no & "'") <> 0 Then
       MsgBox "BU MALZEME SEÇİLMİŞ", vbOKOnly, "HATA"
       Me.malzeme_adi = ""
       Exit Sub
   End If
   
   Me.Birimi = Dlookup ("[Birimi]", "Malzemeler", "[stok_no]='" & Me.stok_no & "'")

End If

Sizin yaptığınız gibi forms![persorma] şeklinde ölçüt belirtecek olursanız form içerisinde altform olduğu için [subform] mevzusuna girmek zorunda kalırsınız.


Cvp: Run-Time error "2450" uyarısı - mmert06 - 30/10/2016

denedim çalışıyor tşk ederim.


Cvp: Run-Time error "2450" uyarısı - access_delisi - 01/12/2016

(30/10/2016, 18:21)ozanakkaya yazdı: Sizin yaptığınız gibi forms![persorma] şeklinde ölçüt belirtecek olursanız form içerisinde altform olduğu için [subform] mevzusuna girmek zorunda kalırsınız.


Forumumuzda arama yaparak bu konuyu buldum ve çözüme ulaştım. Konuyu acana ve admine tesekkurler.