PDA

View Full Version : Dsum بر مبناي فيلتر Like



ARData
شنبه 26 شهریور 1390, 10:35 صبح
سلام دوستان
آيا براي فرمول Dsum اين امکان وجود دارد که بشه براساس فيلتر Like انجامش داد ؟ مثل مثال زير که منطقي نيست ولي مد نظر است :
Private Sub Command88_Click()
MsgBox DSum("[Quan]", "QryMainAsnad", "[AccountName]=" Like "*" & [Forms]![FrmMainAsnad]![TxtHazineSRCH] & "*")
End Sub

mazoolagh
شنبه 26 شهریور 1390, 13:28 عصر
چرا غیر منطقی باشه؟

dsum("quan","qrymainasnad","accountname like '*" & forms!frmmainasnad!txthazinesrch & "*'")

ARData
شنبه 26 شهریور 1390, 16:02 عصر
با سپاس از شما دوست عزيز ; در مورد 2 فيلتره کردنش چطور عمل کنيم : مثل اين مثال :
MsgBox DSum("quan", "qrymainasnad", "accountname like '*" & Forms!frmmainasnad!TxtHazineSRCH & "*'" And "[TransType]=0")

mazoolagh
یک شنبه 27 شهریور 1390, 12:23 عصر
در کل مشکلی نداره. اینجوری هم میتونین بنویسین:

MsgBox DSum("quan", "qrymainasnad", "accountname like '*" & Forms!frmmainasnad!TxtHazineSRCH & "*' And [TransType]=0")


حتی شرط دوم (و بقیه شروط) هم میتونن LIKE داشته باشن:

"accountname like '*" & Forms!frmmainasnad!TxtHazineSRCH & "*' And [TransType]=0 AND NAME LIKE '*بهرام*'"