جمع زدن چند فیلد

[akbarg64]

سلام.والا قبلا پستم پاک شد.من دو تا مشکل خیلی جزئی دارم اما خیلی هم مهمه.موقع فروش جدید میخوام توی تیبل مشتری ها فیلد جمع کل خرید ها و حساب های پرداختنی آپدیت بشه.فروش جدید توی یه تیبل جداگانه ثبت میشه.میخوام وقتی نام مشتری رو وارد میکنم اون فیلد مربوط به خودش آپدیت بشه.البته از فیلتر استفاده میکنم اما نمیشه. سوال دوم اینکه میخوام تو صفحه اصلی یه خلاصه ای از عملکرد ها رو نشون بدم مثلا جمع کل بدهی ها.از این دستور واسه جمع زدن فیلد ها استفاده میکنم. اما اون لیبل غیب میشه

Adodc1.RecordSource = " select sum (pardakht) as jam from (Daryaftani)"
Adodc1.Refresh
Label4.Caption =jam
اینم دستوری که واسه فیلتر استفاده میکنم.البته موقع ثبت هم اگه وجو نداشت میخوام اخطار بده.

Private Sub Filter()
Dim StrSQL As String
If Text1.Text = "" Then
StrSQL = "Select * from Customer"
Else
StrSQL = "select * from Customer where Name like ''" & Text1.Text & "'"


End If
Adodc4.RecordSource = StrSQL
Adodc4.Refresh
Adodc4.Recordset.Sort = "Name"
End Sub
توی تکس باکسم نوشتم call filter
دوستان ممنون میشم کمک کنید

[parisa.s]

سلام
اگر اشتباه ننم شما هم مشکل منو دارین
من با این for که بچه ها توی این سایت بهم گفتن به جواب رسیدم
امیدوارم به درد شما هم بخوره
For i = 1 to rst.recordcount
sum = sum + rst.field("gheymat")
rst.movenext
Next i

[mds_boy]

چقدر راحت تاپیک تکراری میزنید !!!
این سواله شما احتیاج به گشتن هم نداشت، پسته قبلی همین قسمته پایگاه داده همین بود !!!
http://barnamenevis.org/forum/showthread.php?t=244638
لطفا بعد از جست و جو تاپیک بزنید.

[akbarg64]

چقدر راحت تاپیک تکراری میزنید !!!
این سواله شما احتیاج به گشتن هم نداشت، پسته قبلی همین قسمته پایگاه داده همین بود !!!
http://barnamenevis.org/forum/showthread.php?t=244638
لطفا بعد از جست و جو تاپیک بزنید.
جالبه.داداش تو یه نیگاه به تاریخ این پست و پست من بنداز بعد تذکر بده

یک شنبه 14 شهریور 1389, 18:30 عصر http://barnamenevis.org/forum/showthread.php?t=244638 (http://barnamenevis.org/forum/showthread.php?t=244638)[/CODE
پست من
[CODE]شنبه 13 شهریور 1389 12:39 عصر
اونوقت تو اومدی به من میگی جستجو کن بهتر نیست خودت اول جستجو کنی بعد به من تذکر بدی.بعدش اینجا مدیر بخش داره.بذار هر کسی کار خودش رو خوب بلده.تو هم مثل من کاربر تازه وار دهستی.مگه نه.پس تذکر دادنت فک کنم جایی واسش نیست.البته اگه به جا باشه خوبه.در ضمن مشکل من با اون دوست ازز زمین تا آسمون فرق داشت.موفق باشید

[akbarg64]

سلام
اگر اشتباه ننم شما هم مشکل منو دارین
من با این for که بچه ها توی این سایت بهم گفتن به جواب رسیدم
امیدوارم به درد شما هم بخوره
For i = 1 to rst.recordcount
sum = sum + rst.field("gheymat")
rst.movenext
Next i
ممنون.برادر.مشکل این کد اینجا بودLabel4.Caption =jam که این قسمت رو پاک کردم و از propertise datafield اون لیبل رو jam قرار دادم نشون داد.بازم ممنون از توجهت.موفق باشید

[mds_boy]

دوسته عزیز akbarg64 متاسفم من توجه نکردم، قصد توهین نداشتم که :خجالت: ، من پسته شما رو چطور ندیده بودم، در صورتی که 1 روزه قبل ساخته شده بوده؛ بازم معذرت میخوام.
در این پست (http://barnamenevis.org/forum/showthread.php?t=244638) جوابه شما داده شده است.
با دستوره فور، راحت تر است.
موفق باشید.