return highest value in recordset

[shank]

How do you return the highest value in a recordset of maybe 100 records?
Is it necessary to run 2 recordsets?
I was hoping it was as simple as Max([Price]), but no luck.

thanks

[Maarten]

SELECT TOP 10 ....

[Evertjan.]

shank wrote on 25 jun 2004 in microsoft.publi c.inetserver.as p.general:

How do you return the highest value in a recordset of maybe 100 records?
Is it necessary to run 2 recordsets?
I was hoping it was as simple as Max([Price]), but no luck.

if you mean a database:

Select top 1 myField, myOtherField from myTable order by myField Desc

or

Select max(myField) as higest from myTable

(if you only want that value)
Not tested, so I could be completely wrong.

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

[Al Reid]

"shank" <sh***@tampabay .rr.com> wrote in message news:OZ******** ********@tk2msf tngp13.phx.gbl. ..

How do you return the highest value in a recordset of maybe 100 records?
Is it necessary to run 2 recordsets?
I was hoping it was as simple as Max([Price]), but no luck.

thanks

If you want the entire record try:

SELECT * FROM tbl WHERE fld = (SELECT MAX(fld) FROM tbl)

Better yet, only select the fields you really need.

[Dave Anderson]

shank wrote:

How do you return the highest value in a recordset of maybe 100
records? Is it necessary to run 2 recordsets?
I was hoping it was as simple as Max([Price]), but no luck.

Define "highest value" in something that is usually multi-dimensional, with
multiple data formats.

There are probably several solutions, and you don't really provide enough
detail for me to recommend one over another. Here's one:

While NOT RS.EOF
If RS.Fields("Pric e").Value > MaxValue Then
MaxValue = RS.Fields("Pric e").Value
End If

...other processing...

Call RS.MoveNext()
Wend

Even better, if you have used GetRows, you don't have to worry about cursor
types, and you can do all kinds of things to the data:

Rows = RS.GetRows(), priceColumn = [ integer: depends on your query ]
For i = 0 To UBound(Rows,2)
If Rows(priceColum n,i) > MaxValue Then
MaxValue = Rows(priceColum n,i)
End If
Next

Note that this can be done at any time, since it's in an array. No need to
worry about cursor types, and no need to leave connections or recordsets
open. On the other hand...

If your query is ordered on Price, just grab the first (DESC ordered query)
or last (ASC ordered one) value in the recordset.

If you don't mind a second recordset, you can use this approach:

SELECT TOP 1 Price
FROM MyTable
WHERE [ same conditions as earlier query ]
ORDER BY Price DESC

As I said, options abound.
--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms. Please do not contact
me directly or ask me to contact you directly for assistance. If your
question is worth asking, it's worth posting.

[Dave Anderson]

Al Reid wrote:

SELECT * FROM tbl WHERE fld = (SELECT MAX(fld) FROM tbl)

That reminds me -- one can always return it as a column in the recordset:

DECLARE @MaxPrice DECIMAL(9,2)
SELECT @MaxPrice = MAX(Price) FROM myTable

SELECT *, @MaxPrice AS MaxPrice
FROM myTable
WHERE [ your conditions ]
MaxPrice will be in every row. Not the most efficient way, but not
necessarily a bad one.

--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms. Please do not contact
me directly or ask me to contact you directly for assistance. If your
question is worth asking, it's worth posting.

[shank]

I wanted to try the GetRows() method and I'm not having much luck. Actually,
"the page cannot be displayed".
I assumed you wanted some integer like 100 for [ integer: depends on your
query ] ... correct?
Where am I going wrong?
thanks
<%
Rows = rsShowrecords.G etRows(), Price = 100
For i = 0 To UBound(Rows,2)
If Rows(Price,i) > MaxValue Then
MaxValue = Rows(Price,i)
End If
Next
%>

Highest Price: <%=MaxValue%>
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
= =

Even better, if you have used GetRows, you don't have to worry about cursor types, and you can do all kinds of things to the data:

Rows = RS.GetRows(), priceColumn = [ integer: depends on your query ]
For i = 0 To UBound(Rows,2)
If Rows(priceColum n,i) > MaxValue Then
MaxValue = Rows(priceColum n,i)
End If
Next

Note that this can be done at any time, since it's in an array. No need to
worry about cursor types, and no need to leave connections or recordsets
open. On the other hand...

[Aaron [SQL Server MVP]]

> I wanted to try the GetRows() method and I'm not having much luck.
Actually,

"the page cannot be displayed".

http://www.aspfaq.com/2109

--
http://www.aspfaq.com/
(Reverse address to reply.)

[shank]

I had Show friendly errors unchecked before. I'm on a shared server and I
contacted my host. They cannot change anything that would reflect a more
descriptive error. So I'm back to "what's wrong with this?"
My recordset is: rsShowrecords
The price column is: Price
I'm placing the below code after the recordset.
What am I missing?
thanks!

<%
Rows = rsShowrecords.G etRows(), Price = 100
For i = 0 To UBound(Rows,2)
If Rows(Price,i) > MaxValue Then
MaxValue = Rows(Price,i)
End If
Next
%>

Highest Price: <%=MaxValue%>
--------------------------------------------------------
--------------------------------------------------------

"Aaron [SQL Server MVP]" <te*****@dnartr eb.noraa> wrote in message
news:%2******** ********@TK2MSF TNGP12.phx.gbl. ..

I wanted to try the GetRows() method and I'm not having much luck.

Actually,

"the page cannot be displayed".

http://www.aspfaq.com/2109

--
http://www.aspfaq.com/
(Reverse address to reply.)

[Bob Barrows [MVP]]

shank wrote:

<%
Rows = rsShowrecords.G etRows(), Price = 100

This is a single line of code???

Why would you think this could work? You're trying to do two things in a
single statement??
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don't check it very often. If you must reply off-line, then remove the
"NO SPAM"