Skip to main content

AccessTr.neT


Run-Time error "2450" uyarısı

Run-Time error "2450" uyarısı

#1
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
.rar FİYAT TESPİT7.rar (Dosya Boyutu: 52,61 KB | İndirme Sayısı: 8)
Cevapla
#2
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.
Cevapla
#3
denedim çalışıyor tşk ederim.
Cevapla
#4
(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.
SÖZ VERİYORUM... USLU DURUCAM...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task