| |
|
|
| | Помогите, если не сложно!
Имеем следующее
Private Sub Form_Load()
Dim strNewRecord As String
strNewRecord = "SELECT * FROM Расписание; " & " WHERE кодгруппы = '19'"
Forms!Table1.RecordSource = strNewRecord
End Sub
|
Но когда запускаю форму, то он пишет, что предыдущая операция прервана пользователем и вырает Run Time 2001 | |
| |
| |
| |
автор: Аноним (03.11.2006 в 08:28) |
|
| |
strNewRecord = "SELECT * FROM Расписание; " & " WHERE кодгруппы = '19'"
|
замените на
strNewRecord = "SELECT * FROM Расписание WHERE кодгруппы = '19'"
|
а поле кодгруппы числовое или текст?
если числовое то нужно так:
strNewRecord = "SELECT * FROM Расписание WHERE кодгруппы = 19"
|
| |
| |
| |
| |
|
|
| | Отлично! Получилось! Спасибо большое. | |
| |
| |
| |
|
|
| | Дак вот теперь еще одна проблема вырисовывается:
Эта форма встроена в другую и когда я ее открываю самостоятельно, то все работает, а когда из другой формы, то она пишет, что не может найти форму, указанную в операции или макросе! | |
| |
| |
| |
|
|
| |
Forms!Table1.RecordSource = strNewRecord
|
заменить на
Me.RecordSource = strNewRecord
|
| |
| |
| |
|
|
