poner en variable el maximo de un campo (SQL)

Hola! Quiero que me guarde en una variable, el valor mas alto de un campo
autonumerico... a traves de la funcion MAX... porque me saca el siguiente
mensaje de error?

Tipo de error:
ADODB.Recordset (0x800A0CC1)
Item cannot be found in the collection corresponding to the requested name
or ordinal.
/now.asp, line 21


Const adOpenKeyset = 1
Const adLockOptimistic = 3
Dim connStr
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("\..\xxx\xxxx.sss")
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
dim valor
cadena="Select max(ID) from Files"
rs.Open cadena, connStr, 3, 4

Response.Write("El mas alto es" & rs("ID"))
rs.Close
Set rs = Nothing %>

El campo autonumerico se llama ID?

Valdov


"Jordi Maycas" wrote in message
news:
> Hola! Quiero que me guarde en una variable, el valor mas alto de un

> autonumerico... a traves de la funcion MAX... porque me saca el

> mensaje de error?
>
> Tipo de error:
> ADODB.Recordset (0x800A0CC1)
> Item cannot be found in the collection corresponding to the requested

> or ordinal.
> /now.asp, line 21
>
>
> Const adOpenKeyset = 1
> Const adLockOptimistic = 3
> Dim connStr
> connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
> Server.MapPath("\..\xxx\xxxx.sss")
> Dim rs
> Set rs = Server.CreateObject("ADODB.Recordset")
> dim valor
> cadena="Select max(ID) from Files"
> rs.Open cadena, connStr, 3, 4
>
> Response.Write("El mas alto es" & rs("ID"))
> rs.Close
> Set rs = Nothing %>
>
>

si

"Valdov" escribió en el mensaje
news:O%
> El campo autonumerico se llama ID?
>
> Valdov
>
>
> "Jordi Maycas" wrote in message
> news:
> > Hola! Quiero que me guarde en una variable, el valor mas alto de un
campo
> > autonumerico... a traves de la funcion MAX... porque me saca el
siguiente
> > mensaje de error?
> >
> > Tipo de error:
> > ADODB.Recordset (0x800A0CC1)
> > Item cannot be found in the collection corresponding to the requested
name
> > or ordinal.
> > /now.asp, line 21
> >
> >
> > Const adOpenKeyset = 1
> > Const adLockOptimistic = 3
> > Dim connStr
> > connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
> > Server.MapPath("\..\xxx\xxxx.sss")
> > Dim rs
> > Set rs = Server.CreateObject("ADODB.Recordset")
> > dim valor
> > cadena="Select max(ID) from Files"
> > rs.Open cadena, connStr, 3, 4
> >
> > Response.Write("El mas alto es" & rs("ID"))
> > rs.Close
> > Set rs = Nothing %>
> >
> >
>
>

si

"Valdov" escribió en el mensaje
news:O%
> El campo autonumerico se llama ID?
>
> Valdov
>
>
> "Jordi Maycas" wrote in message
> news:
> > Hola! Quiero que me guarde en una variable, el valor mas alto de un
campo
> > autonumerico... a traves de la funcion MAX... porque me saca el
siguiente
> > mensaje de error?
> >
> > Tipo de error:
> > ADODB.Recordset (0x800A0CC1)
> > Item cannot be found in the collection corresponding to the requested
name
> > or ordinal.
> > /now.asp, line 21
> >
> >
> > Const adOpenKeyset = 1
> > Const adLockOptimistic = 3
> > Dim connStr
> > connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
> > Server.MapPath("\..\xxx\xxxx.sss")
> > Dim rs
> > Set rs = Server.CreateObject("ADODB.Recordset")
> > dim valor
> > cadena="Select max(ID) from Files"
> > rs.Open cadena, connStr, 3, 4
> >
> > Response.Write("El mas alto es" & rs("ID"))
> > rs.Close
> > Set rs = Nothing %>
> >
> >
>
>