Merhaba.
Stok Giriş-Çıkış Formunda yeni bilgi girirken örneğin giren hanesine sıfır harici sayı girdiğimde KİME,NE İÇİN ve NASIL hanelerinin kenarındaki açılan kutuya tıkladığımızda sadece giren hanesinin sıfır harici sayı girilmiş bilgileri gelmesi için çalışıyorum.bunu nasıl yapabilirim.
Teşekkür ederim.
Açılan Kutu64 veri kaynağına aşağıdaki kodu yazınız Diğerlerinide bu doğrultuda yeniden oluşturunuz.
SELECT [STOK GİRİŞ ÇIKIŞ].MAKAM FROM [STOK GİRİŞ ÇIKIŞ] WHERE ((([STOK GİRİŞ ÇIKIŞ].[GİREN MİKTAR])>0)) GROUP BY [STOK GİRİŞ ÇIKIŞ].MAKAM ORDER BY [STOK GİRİŞ ÇIKIŞ].MAKAM;
Sn.Puletin
ilginiz için çok teşekkür ederim.
sizin gösterdiğiniz gibi kodu yazdım fakat bu defa giren miktar hanesi sıfır da olsa her durumda sadece makam hanesinde sıfır harici işlem yapılmış kayıtları gösteriyor.
Doğru anladığımı umuyorum Kolay gelsin...
Sn.Puletin
zaman ayırdığınız için çok teşekkür ediyorum.
tam olarak ne yapmak için çabaladığımı aşağıda resimli olarak anlattım.
sn aguney
formun modülüne aşağıdaki kodu ekleyiniz. zaten after update olayı varsa birleştirmeniz gerekir. yoksa hata verecektir. doğru anlamışsam kod istediğiniz sonucu vermektedir
Private Sub GİREN_MİKTAR_AfterUpdate()
Dim miktar As Integer,
Sql As String, SQL1 As String
Sql = "SELECT [STOK GİRİŞ ÇIKIŞ].MAKAM FROM [STOK GİRİŞ ÇIKIŞ] WHERE ((([STOK GİRİŞ ÇIKIŞ].[GİREN MİKTAR]) > 0)) GROUP BY [STOK GİRİŞ ÇIKIŞ].MAKAM ORDER BY [STOK GİRİŞ ÇIKIŞ].MAKAM;"
SQL1 = "SELECT [STOK GİRİŞ ÇIKIŞ].MAKAM FROM [STOK GİRİŞ ÇIKIŞ] GROUP BY [STOK GİRİŞ ÇIKIŞ].MAKAM ORDER BY [STOK GİRİŞ ÇIKIŞ].MAKAM;"
miktar = Nz(GİREN_MİKTAR)
If miktar > 0 Then Me.Açılan_Kutu64.RowSource = SQL: Me.Açılan_Kutu64.Requery Else Me.Açılan_Kutu64.RowSource = SQL1: Me.Açılan_Kutu64.Requery
End Sub