Вставить данные из запроса в поля формы

[saf111]

Private Sub Form_Open(Cancel As Integer) ' form_test открывается
dim strSql as string
orderID = 20
strSQL = "SELECT zayvki.[ID_Excel] FROM zayvki wHERE ID=" & OrderID
Debug.Print strSQL ' запрос есть как положено


Me.RecordSource = strSQL ' ничего не делает ЗДЕСЬ КАСЯК
Me.поле0.value = strSQL ' ЗДЕСЬ КАСЯК пишет в самом поле SELECT zayvki.[ID_Excel] FROM zayvki wHERE ID="
' а не результат запроса , например 15000

end sub

[Myhaylo]

Используйте либо объект типа Recordset, либо функции типа DLookup.