Ошибка определения типа в коде
|
|
Четверг, 30 Октября 2014 г. 15:31
+ в цитатник
Люди добрые, помогите кто знает.
MS Access 2010. При запуске процедуры дает ошибку: Определяемый пользователем тип не определен. Закрашивает строку: Dim conn As ADODB.Connection. Не пойму, что не так? Не судите строго если что, я начинающий.
Private Sub Кнопка_Click()
Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset
Set conn = CurrentProject.Connection
Set rst = New ADODB.Recordset
With rst
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "SELECT * FROM tnZaprav WHERE [НЗПЛ]='" & Me![ПЛКод] & "'", conn
End With
Do Until rst.EOF
MsgBox rst![НЗПотребитель] & " " & rst![НЗКоэффициент]
rst.MoveNext
Loop
rst.Close
Set rst = Nothing
Set conn = Nothing
End sub
http://www.sql.ru/forum/1123831/oshibka-opredeleniya-tipa-v-kode
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-