выдаёт сообщение "Отсутствует значение для обного или нескольких требуемых параметров"
на какой строке, именно, не говорит. При запуске программы формируется только заголовки grid-а
Использую VB6. Подскажите пожалуйста.

    Dim SQL As String:  SQL = "SELECT p1, p2, p3 From " & table

    Me.Adodc1.CursorType = adOpenStatic
    Me.Adodc1.LockType = adLockReadOnly
    Me.Adodc1.CommandType = adCmdText
    Me.Adodc1.CursorLocation = adUseClient
    Me.Adodc1.RecordSource = SQL
    Me.Adodc1.Mode = adModeShareDenyRead
    Me.Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & mdb & ";Persist Security Info=False"
    Me.Adodc1.UserName = "Admin"
    
    Me.DataGrid1.AllowUpdate = False
    Me.DataGrid1.RowHeight = 300
    Me.DataGrid1.Caption = table
    Me.DataGrid1.HeadLines = 2
    
    Me.DataGrid1.Columns(0).WrapText = True
    Me.DataGrid1.Columns(0).Caption = "ИМЯ поля p1"
    Me.DataGrid1.Columns(0).NumberFormat = "000 00 0000000 00"
    
    Me.DataGrid1.Columns(1).WrapText = True
    Me.DataGrid1.Columns(1).Caption = "ИМЯ другого поля p2"
    Me.DataGrid1.Columns(1).NumberFormat = "####"
    
    Me.DataGrid1.Columns.Add(2).Caption = "ТРЕТЬЕ поле p3"
    Me.DataGrid1.Columns(2).WrapText = True
    Me.DataGrid1.Columns(2).NumberFormat = "####"
    Me.DataGrid1.Columns(2).DataField = "p3"
    
    Set DataGrid1.DataSource = Me.Adodc1