Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Выдается ошибка в блоке if в Visual Basic (Access) / 4 сообщений из 4, страница 1 из 1
13.03.2004, 12:50
    #32440797
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выдается ошибка в блоке if в Visual Basic (Access)
Ошибка: End if without block if

If Not rst.EOF Then
With rst
.AddNew
.Fields("Дата") = Forms![ЖурналХозОп1]![Дата]
.Fields("Документ") = Forms![ЖурналХозОп1]![Документ]
.Fields("№ХозОперации") = Forms![ЖурналХозОп1]![№ХозОперации]
.Fields("Содержание") = Forms![ЖурналХозОп1]![Содержание]
.Fields("Дебет") = Forms![ЖурналХозОп1]![Дебет]
.Fields("Кредит") = Forms![ЖурналХозОп1]![Кредит]
.Fields("с") = Forms![ЖурналХозОп1]![с]
.Fields("по") = Forms![ЖурналХозОп1]![по]
.Fields("Табельный№") = rst2.Fields("Табельный № сотрудника")
.Fields("Сумма") = rst2.Fields("Summa")
.Update
End If
...
Рейтинг: 0 / 0
13.03.2004, 13:11
    #32440803
Finans
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выдается ошибка в блоке if в Visual Basic (Access)
Возможно нужно написать End With (?)
...
Рейтинг: 0 / 0
13.03.2004, 14:08
    #32440832
Темный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выдается ошибка в блоке if в Visual Basic (Access)
Ну вообще-то неплохо было бы
...
Рейтинг: 0 / 0
13.03.2004, 15:08
    #32440863
Deminik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выдается ошибка в блоке if в Visual Basic (Access)
А после End With еще и End If дописать - вообще класс !!!...
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Выдается ошибка в блоке if в Visual Basic (Access) / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]