Visual Basic&database, Getting SQL Sum() in VB 3.0

Getting SQL Sum() in VB 3.0

Author	Message
Ben P #1 / 3	Getting SQL Sum() in VB 3.0 Dear all, I am pretty new in VB and have just encountered a problem. I have the following code in my program module : sqlq1="SELECT Sum(Cost) FROM MONEY_ALLOCATION WHERE MONEY_ALLOCATION.Dept_Code='40'" set Qry1=createdynaset(sqlq1) Okay, my problem is how can I display the "Sum(Cost)" from Qry1? sqlq1=string, Qry1=dynaset Thank you all for the helping hand! Best regards, Ben
Sat, 06 Feb 1999 03:00:00 GMT

Ed Phillip #2 / 3	Getting SQL Sum() in VB 3.0 Quote: >Dear all, >I am pretty new in VB and have just encountered a problem. I have the >following code in my program module : >sqlq1="SELECT Sum(Cost) FROM MONEY_ALLOCATION WHERE MONEY_ALLOCATION.Dept_Code='40'" >set Qry1=createdynaset(sqlq1) >Okay, my problem is how can I display the "Sum(Cost)" from Qry1? Don't hold me to this, but I think you need to add this.... sqlq1="SELECT Sum(Cost) As BIGBUCKS FROM MONEY_ALLOCATION WHERE MONEY_ALLOCATION.Dept_Code='40'" set Qry1 = DB.CreateDynaset(sqlq1) Text1.Text = Qry1("BIGBUCKS") Ed Phillippe Quote: >Thank you all for the helping hand! >Best regards, >Ben ****************************************************** Southern Indiana Bass Fishing / Outdoor Software HTTP://www.evansville.net/~dlion/mypage.htm ******************************************************
Sat, 06 Feb 1999 03:00:00 GMT

Dave Verschleise #3 / 3	Getting SQL Sum() in VB 3.0 Quote: > Dear all, > I am pretty new in VB and have just encountered a problem. I have the > following code in my program module : > sqlq1="SELECT Sum(Cost) FROM MONEY_ALLOCATION WHERE MONEY_ALLOCATION.Dept_Code='40'" > set Qry1=createdynaset(sqlq1) > Okay, my problem is how can I display the "Sum(Cost)" from Qry1? > sqlq1=string, > Qry1=dynaset > Thank you all for the helping hand! > Best regards, > Ben Ben, Qry1.fields(0) will do it. You can use field position as well as fieldnames to describe fields. The positions are 0-based. -- Thanks, Dave Verschleiser Q&D Software Development - http://www.q-d.com Creators of WebForms and WebMania! ======================================================= For the best SHAREWARE on the Net, check out: The Shareware Central Interactive Catalog http://www.q-d.com/swc.htm Shareware authors -- find out how to obtain a listing! =======================================================
Sun, 07 Feb 1999 03:00:00 GMT

Page 1 of 1

[ 3 post ]