[VB6] SQL function

[_Rest_]

Como é que atribuo o valor do recordset a variavel?

Quando uso functions como por exemplo MAX ou LAST da-me erro, sem function da-me bem.

    Set rs1 = New ADODB.Recordset
    rs1.CursorType = adOpenStatic
    rs1.CursorLocation = adUseClient
    rs1.LockType = adLockPessimistic
    rs1.Source = "SELECT LAST(Cod_Encomenda) FROM Lista_Encomendas"
    rs1.ActiveConnection = CONPizzaria
    rs1.Open
    
    Cod_Encomenda = rs1!Cod_Encomenda

[_Rest_]

Ninguém sabe? Nem mesmo de outra maneira mas que consiga o valor + alto da tabela de um determinado campo ou o ultimo registo introduzido na tabela?

É que só encontro o Count

Public Property Get RecordCount() As integer
   
   RecordCount = rs1.RecordCount
     
End Property