|
 |
asp_databases thread: How to retrieve the aggregate functions' value from StroredProcedure
Message #1 by jeyakumar@h... on Wed, 22 Nov 2000 09:45:55 -0000
|
|
Hi,
I am using pubs' storedprocedure.(REPTQ2)
------------------------------
The output comes:
business 0736BU20751Green
-----------------------------
But the origainal output should come like this.
type pub_id title_id au_ord Name ytd_sales
------------ ------ -------- ------ --------------- -----------
business 0736 BU2075 1 Green 18722
avg
==========
18722
Please help me.
Many thanks
Jeyakumar
Mycode is:
<%@ Language=VBScript %>
<%
DIM CONSTRING,CON
SET CON = Server.CreateObject("ADODB.CONNECTION")
CONSTRING="Driver={SQL server};"
CONSTRING=CONSTRING & "SERVER=192.168.156.1;DATABASE=PUBS;"
CONSTRING=CONSTRING & "UID=SA;PWD="
CON.Open CONSTRING
%>
<%
dim objrec,objrs
set objrec=Server.CreateObject("ADODB.Command")
objrec.ActiveConnection = con
objrec.CommandText ="REPTQ2"
set objrs=objrec.Execute
while not objrs.eof
Response.Write( objrs(0))
Response.Write( objrs(1))
Response.Write( objrs(2))
Response.Write( objrs(3))
Response.Write( objrs(4))
objrs.moveNext()
wend
%>
Message #2 by "StephenB" <stephenb@w...> on Wed, 22 Nov 2000 14:24:33 -0000
|
|
Don't you just want to Response.Write(" ") between data items and
Response.Write("<BR>") at the end of the loop?
To make it neat create a table.
Stephen
<jeyakumar@h...> wrote in message news:20832@a..._databases...
>
> Hi,
>
> I am using pubs' storedprocedure.(REPTQ2)
> ------------------------------
> The output comes:
> business 0736BU20751Green
> -----------------------------
> But the origainal output should come like this.
>
> type pub_id title_id au_ord Name ytd_sales
> ------------ ------ -------- ------ --------------- -----------
> business 0736 BU2075 1 Green 18722
>
> avg
> ==========
> 18722
>
> Please help me.
>
> Many thanks
> Jeyakumar
>
> Mycode is:
>
>
> <%@ Language=VBScript %>
> <%
> DIM CONSTRING,CON
> SET CON = Server.CreateObject("ADODB.CONNECTION")
> CONSTRING="Driver={SQL server};"
> CONSTRING=CONSTRING & "SERVER=192.168.156.1;DATABASE=PUBS;"
> CONSTRING=CONSTRING & "UID=SA;PWD="
> CON.Open CONSTRING
> %>
>
> <%
> dim objrec,objrs
> set objrec=Server.CreateObject("ADODB.Command")
> objrec.ActiveConnection = con
> objrec.CommandText ="REPTQ2"
> set objrs=objrec.Execute
> while not objrs.eof
> Response.Write( objrs(0))
> Response.Write( objrs(1))
> Response.Write( objrs(2))
> Response.Write( objrs(3))
> Response.Write( objrs(4))
> objrs.moveNext()
> wend
> %>
>
>
Message #3 by "Dallas Martin" <dmartin@z...> on Wed, 22 Nov 2000 20:39:34 -0500
|
|
I usually alias the aggregate functions such
"sum(sales) BSALES", then return use code
such as "bsales = rs("BSALES").
----- Original Message -----
From: <jeyakumar@h...>
To: "ASP Databases" <asp_databases@p...>
Sent: Wednesday, November 22, 2000 4:45 AM
Subject: [asp_databases] How to retrieve the aggregate functions' value from
StroredProcedure
> Hi,
>
> I am using pubs' storedprocedure.(REPTQ2)
> ------------------------------
> The output comes:
> business 0736BU20751Green
> -----------------------------
> But the origainal output should come like this.
>
> type pub_id title_id au_ord Name ytd_sales
> ------------ ------ -------- ------ --------------- -----------
> business 0736 BU2075 1 Green 18722
>
> avg
> ==========
> 18722
>
> Please help me.
>
> Many thanks
> Jeyakumar
>
> Mycode is:
>
>
> <%@ Language=VBScript %>
> <%
> DIM CONSTRING,CON
> SET CON = Server.CreateObject("ADODB.CONNECTION")
> CONSTRING="Driver={SQL server};"
> CONSTRING=CONSTRING & "SERVER=192.168.156.1;DATABASE=PUBS;"
> CONSTRING=CONSTRING & "UID=SA;PWD="
> CON.Open CONSTRING
> %>
>
> <%
> dim objrec,objrs
> set objrec=Server.CreateObject("ADODB.Command")
> objrec.ActiveConnection = con
> objrec.CommandText ="REPTQ2"
> set objrs=objrec.Execute
> while not objrs.eof
> Response.Write( objrs(0))
> Response.Write( objrs(1))
> Response.Write( objrs(2))
> Response.Write( objrs(3))
> Response.Write( objrs(4))
> objrs.moveNext()
> wend
> %>
>
Message #4 by "jigs gandhi" <newsgroup@h...> on Thu, 23 Nov 2000 10:49:12 +0530
|
|
This is a multi-part message in MIME format.
------=_NextPart_000_01DB_01C0553B.03BE2BC0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
hi
give this a try
conn.Open strConn
set rs =3D Server.CreateObject("adodb.recordset")
rs.ActiveConnection =3D conn
rs.Open ("exec reptq2")
Response.Write "<table border=3D1>"
Response.Write "<tr>"
for i=3D0 to rs.Fields.Count-1
Response.Write "<td>"
Response.Write rs(i).name
Response.Write "</td>"
next
Response.Write "</tr>"
do while not rs.EOF
Response.Write "<tr>"
for i=3D0 to rs.Fields.Count-1
Response.Write "<td>"
Response.Write rs(i)
Response.Write "</td>"
next
Response.Write "</tr>"
rs.MoveNext
loop
Response.Write "</table>"
Response.Write "<table border=3D1>"
set rs2 =3D rs.NextRecordset
Response.Write "<tr>"
for i=3D0 to rs2.Fields.Count-1
Response.Write "<td>"
Response.Write rs2(i).name
Response.Write "</td>"
next
Response.Write "</tr>"
do while not rs2.EOF
Response.Write "<tr>"
for i=3D0 to rs2.Fields.Count-1
Response.Write "<td>"
Response.Write rs2(i)
Response.Write "</td>"
next
Response.Write "</tr>"
rs2.MoveNext
loop
Response.Write "</table>"
set rs3 =3D rs2.NextRecordset
Response.Write "<table border=3D1>"
Response.Write "<tr>"
for i=3D0 to rs3.Fields.Count-1
Response.Write "<td>"
Response.Write rs3(i).name
Response.Write "</td>"
next
Response.Write "</tr>"
do while not rs3.EOF
Response.Write "<tr>"
for i=3D0 to rs3.Fields.Count-1
Response.Write "<td>"
Response.Write rs3(i)
Response.Write "</td>"
next
Response.Write "</tr>"
rs3.MoveNext
loop
Response.Write "</table>"
jigs
----- Original Message -----
From: jeyakumar@h...
To: ASP Databases
Sent: Wednesday, November 22, 2000 3:15 PM
Subject: [asp_databases] How to retrieve the aggregate functions'
value from StroredProcedure
Hi,
I am using pubs' storedprocedure.(REPTQ2)
------------------------------
The output comes:
business 0736BU20751Green
-----------------------------
But the origainal output should come like this.
type pub_id title_id au_ord Name ytd_sales
------------ ------ -------- ------ --------------- -----------
business 0736 BU2075 1 Green 18722
avg
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
18722
Please help me.
Many thanks
Jeyakumar
Mycode is:
<%@ Language=3DVBScript %>
<%
DIM CONSTRING,CON
SET CON =3D Server.CreateObject("ADODB.CONNECTION")
CONSTRING=3D"Driver=3D{SQL server};"
CONSTRING=3DCONSTRING & "SERVER=3D192.168.156.1;DATABASE=3DPUBS;"
CONSTRING=3DCONSTRING & "UID=3DSA;PWD=3D"
CON.Open CONSTRING
%>
<%
dim objrec,objrs
set objrec=3DServer.CreateObject("ADODB.Command")
objrec.ActiveConnection =3D con
objrec.CommandText =3D"REPTQ2"
set objrs=3Dobjrec.Execute
while not objrs.eof
Response.Write( objrs(0))
Response.Write( objrs(1))
Response.Write( objrs(2))
Response.Write( objrs(3))
Response.Write( objrs(4))
objrs.moveNext()
wend
%>
---
FREE SOFTWARE DEVELOPMENT CODE, CONTENT, AND
INSIGHTS IN YOUR INBOX!
Get the latest and best C++, Visual C++, Java, Visual Basic, and XML
tips, tools, and
developments from the experts. Sign up for one or more of EarthWeb?s
FREE IT newsletters at http://www.earthweb.com today!
$subst('Email.Unsub')
Message #5 by rrrabe@y... on Fri, 24 Nov 2000 14:27:34 -0000
|
|
include CommandType = adCmdStoredProc. make sure you have a SSI adovbs
file.
Message #6 by Robert Chartier <rchartierh@a...> on Fri, 24 Nov 2000 09:51:31 -0500
|
|
include adovbs.inc
http://www.aspfree.com/devlinks/search.asp?file404=;&catid=85#Includes
OR
use the meta data type library include
http://www.aspfree.com/devlinks/search.asp?file404=;&catid=125#Type_Libraries
At 09:27 AM 11/24/00, you wrote:
>include CommandType = adCmdStoredProc. make sure you have a SSI adovbs
>file.
>
Robert Chartier
Author, AspFree.com
xxx-xxx-xxxx
rchartierh@a...
http://www.aspfree.com/devlinks
http://www.aspfree.com/authors/robert
http://www.aspalliance.com/nothingmn
|
|
|
View Cart
