PDA

View Full Version : حرفه ای: جمع کل ستون در دیتا یا اکسس و نمایش



www.pc3enter.tk
دوشنبه 08 مهر 1392, 12:45 عصر
سلام دوستان خسته نباشید

من یک جدول دیتا یا همان اکسس دارم که در ان در قسمت money تعدادی پول وارد شده است

می خواستم کل مقدار پول این جدول یا (ستون) را با هم جمع کنه و مثلا در تکس باکس نشون بده

باشکر ممنون می شوم از این که منو راهنمایی کنید

hamedspartacus
دوشنبه 08 مهر 1392, 12:56 عصر
سلام . شما واسه نمایش از datagrid استفاده کردید یا vsflexgrid ?

www.pc3enter.tk
دوشنبه 08 مهر 1392, 13:29 عصر
نه از datagrid و adodc

همان برنامه ای در دوران هنرستان بمان یاد می داند

hamedspartacus
دوشنبه 08 مهر 1392, 16:53 عصر
خوب راستش من کلا تو برنامه هایی که مینویسم از دیتاگرید استفاده نمیکنم چون نسبت vsflexgrid محدوده و کمی واسه جمع و تفریق سلولهاش به مشکل میخورم

شما از vsflex استفاده کن به راحتی میتونی این کاری رو که میخوای با 3 خط اسکریپت انجام بدی. اگه خواستی نمونت رو بذار تا واست ردیفش کنم.

SlowCode
دوشنبه 08 مهر 1392, 16:55 عصر
سلام
از دستور زیر استفاده کن:
SELECT SUM(field) FROM table1
ولی این دستور رو adodc پشتیبانی نمیکنه!
سعی کن از adodb استفاده کنی.
چون به راحتی میتونی از دستورات sum , ... استفاده کنی.

siyn71
دوشنبه 08 مهر 1392, 22:31 عصر
adodb چه کنترلیه؟ :متفکر::خجالت:

moghadam1372
سه شنبه 09 مهر 1392, 06:15 صبح
خسته نباشی

On Error Resume Next
sql = "SELECT * from amal WHERE Left(cod, " & Len(Text1) & ")='" & Trim(Text1) & "'"
Adodc5.RecordSource = sql
Adodc5.Refresh

Adodc5.Recordset.MoveFirst
vkol = 0
While Adodc5.Recordset.EOF <> True
mablagh = Adodc5.Recordset.Fields("mablagh")
vkol = vkol + mablagh
Adodc5.Recordset.MoveNext
Wend
Text16 = vkol