Здравствуйте! Подскажите как подсоединить правильно VSFlexGrid.
Вот код. Когда использую грид MSHFlexGrid то все ок. Но в этом гриде нельзя редактировать. Если использовать для вывода результата ХП VSFlexGrid то ошибка - Не тот объект или метод.
Чего бы зделать?

Dim rst As ADODB.Recordset
Set rst = New Recordset
Dim cnn As ADODB.Connection
Dim cmd As ADODB.Command
Dim prm As ADODB.Parameter
Set cnn = New ADODB.Connection
cnn.ConnectionString = "Provider=SQLOLEDB.1;Password=" & pasword & ";Persist Security Info=True;User ID=" & login & ";Initial Catalog=AiS_2;Data Source=" & server

Set cmd = New ADODB.Command
cnn.Open
Set cmd.ActiveConnection = cnn
cmd.CommandText = "Spisok_Zakaz_po_Nomeru_Zakaza_Join"
cmd.CommandType = adCmdStoredProc

NomZakaz = Text2.Text

Set rst.ActiveConnection = cnn
Set prm = cmd.CreateParameter("@Zakaz", adInteger, adParamInput, , NomZakaz)
cmd.Parameters.Append prm

Set rst = cmd.Execute()
'Set MSHFlexGrid1.Recordset = rst
Set VSFlexGrid1.Recordset = rst
rst.Close
End Sub