
Помогите, скажите, что я здесь написал не так. Рекордсет заполняется, к базе подключается, ошибок не выдает, но DataGridView пустой

- Код: Выделить всё
Dim rst As ADODB.Recordset
rst = New ADODB.Recordset
strQuery = "SELECT * from contracts "
rst = Cnn.Execute(strQuery)
DataGridView1.AutoGenerateColumns = True
DataGridView1.DataSource = rst