AccessTr.neT
Malzeme Stok Programı - Miktar Güncellendikten Sonra Hata Alıyorum. - 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ığı: Malzeme Stok Programı - Miktar Güncellendikten Sonra Hata Alıyorum. (/konu-malzeme-stok-programi-miktar-guncellendikten-sonra-hata-aliyorum.html)



Malzeme Stok Programı - Miktar Güncellendikten Sonra Hata Alıyorum. - Muzaffer Emre - 26/04/2021

Öncelikle merhabalar,

Ben daha önce de buna benzer bir proje yaptım, ancak aynı olayı bu stok programına uyguladığımda aşağıdaki hatayı alıyorum, diğerinde bu hata ile karşılaşmazken bunda karşılaşıyorum.



Private Sub txtMiktar_AfterUpdate()


    DoCmd.RunCommand acCmdSaveRecord
   
    If DCount("*", "Idari_Cay_StokDurum", "malzemeAdi=" & cboMalzemeAdi & " And cins=" & cboCins) = 0 Then
      CurrentDb.Execute "INSERT INTO Idari_Cay_StokDurum (malzemeAdi, cins, stokMiktari ) " & _
        "VALUES(" & cboMalzemeAdi & ", " & cboCins & ", " & txtMiktar & ")"
    Else
   
        Dim Hes(1) As Double
        On Error Resume Next
        Hes(0) = Dsum ("Nz(miktar,0)", "Idari_Cay_StokHareketleri", "malzemeAdi=" & cboMalzemeAdi & " And cins=" & cboCins & " And islemTuru='Giriş'")
        Hes(1) = Dsum ("Nz(miktar,0)", "Idari_Cay_StokHareketleri", "malzemeAdi=" & cboMalzemeAdi & " And cins=" & cboCins & " And islemTuru='Çıkış'")
        CurrentDb.Execute "UPDATE Idari_Cay_StokDurum SET stokMiktari=" & (Hes(0) - Hes(1)) & " WHERE (((malzemeAdi)=" & cboMalzemeAdi & ") AND ((cins)=" & cboCins & "))"
   
    End If

End Sub


[Resim: do.php?img=11010]






Bu konuda yardımcı olabilir misiniz acaba?


Re: Malzeme Stok Programı - Miktar Güncellendikten Sonra Hata Alıyorum. - C*e*l*o*y*c*e - 26/04/2021

Merhaba

If DCount("*", "Idari_Cay_StokDurum", "malzemeAdi='" & cboMalzemeAdi & "' And cins='" & cboCins & "'") = 0 Then


Metin alanları '" ve sayı alanları " şeklinde kullanarak deneyin


RE: Malzeme Stok Programı - Miktar Güncellendikten Sonra Hata Alıyorum. - atoykan - 06/05/2021

Sayın @Muzaffer Emre sorununuz çözümlendi mi geri bildirimde bulunun lütfen.