Хранимая процедура

Есть элементарная хранимая процедура:

CREATE PROCEDURE dbo.get_name
AS
select Тип, Номер_контейнера from baze..main
GO

в query analyser'e работает. Но из VB не вызывается:

Private Sub Form_Load()
Set cnn = New ADODB.Connection
cnn.Open ("DSN=baze")
Set rs = New ADODB.Recordset
rs.ActiveConnection = cnn
rs.CursorLocation = adUseClient
rs.Open "select * from main", cnn, adOpenDynamic, adLockOptimistic
Set Grid.DataSource = rs
End Sub

Private Sub Command1_Click()
Set cmd.ActiveConnection = cnn
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "sel"
Set rs = cmd.Execute
End Sub