Visual Basic - problemas con select

Hola amigos del foro.. tengo un pequeño problemita.
estoy trabajando con un base en sql 7.0
desde mi aplicacion necesito obtener el ultimo pedido ingresado y guardarlo en una variable. yo hago lo siguiente:

defino el recordset y hago esto
recordset.open "select max(num_pedido) from pedido", connection

dim NumeroPedido as Long
NumeroPedido = recordset

no se como hacerlo, si alguien puede ayudarme se lo agradeceria muchisimo.
Saludos
Eduardo de Cordoba, Argentina

Fijate con:

recordset.open "select max(num_pedido) As UltimoPedido from pedido", connection

dim NumeroPedido as Long

NumeroPedido = recordset.Fields.Item("UltimoPedido").Value

o

NumeroPedido = recordset!UltimoPedido

lo k dises noo funcona, no se si mas entendido

NumeroPedido = recordset!num_pedido
proba con eso

no sirve

Dim Num_pedido as Long
recordset.open "Select num_pedido from pedido order by num_pedido asc", conexion
recordset.movelast
num_pedido=recordset!numpedido +1

*** con esto lo que haces es ordenar la consulta por num_pedido y te vas al último registro, `por lo que solo te hace falta ya sumarle uno a la variable num_pedido

lo k dises noo funcona, no se si mas entendido no quiero todos los registros

Pues explicate un poco mejor.