ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Один и тот же код по разному себя ведет в MDB и в ADP
19 сообщений из 19, страница 1 из 1
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560048
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
Private Sub CommandProvod_Click()
CurrentDb.Execute "INSERT INTO Results (id) VALUES (" & Me!ComboElev & ")", dbFailOnError
End Sub
Ругается

Object variable or With block.......... в ADP


То же самое в MDB все нормально инсертиться
Подскажите в чем может быть проблема
...
Рейтинг: 0 / 0
14.06.2004, 10:24:55
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560059
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Что такое CurrentDB в ADP?
...
Рейтинг: 0 / 0
14.06.2004, 10:40:31
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560065
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
Ок согласен может быть такой объект отсутсвует в ADP, тогда такой вопрос как в ADP вставить запись из комбо формы в таблицу посредством кнопки?
...
Рейтинг: 0 / 0
14.06.2004, 10:44:15
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560068
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Omar_KОк согласен может быть такой объект отсутсвует в ADP, тогда такой вопрос как в ADP вставить запись из комбо формы в таблицу посредством кнопки?
немодно и неспортивно - подключив через ссылки DAO
и написав
Код: plaintext
1.
2.
3.
Dim MyDb As DAO.Database
Set MyDb = CurrentDb
MyDb.Execute "INSERT INTO Results (id) VALUES (" & Me!ComboElev & ")", dbFailOnError
DAO писать не обязательно но красиво
...
Рейтинг: 0 / 0
14.06.2004, 10:48:17
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560069
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
Код: plaintext
curentproject.connection.execute "INSERT INTO Results (id) VALUES (" & Me!ComboElev & ")"
...
Рейтинг: 0 / 0
14.06.2004, 10:48:19
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560076
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
Shuhard Omar_KОк согласен может быть такой объект отсутсвует в ADP, тогда такой вопрос как в ADP вставить запись из комбо формы в таблицу посредством кнопки?
немодно и неспортивно - подключив через ссылки DAO
и написав
Код: plaintext
1.
2.
3.
Dim MyDb As DAO.Database
Set MyDb = CurrentDb
MyDb.Execute "INSERT INTO Results (id) VALUES (" & Me!ComboElev & ")", dbFailOnError
DAO писать не обязательно но красиво

Вариант Алексея К прокатил, а к вам вопрос что подключать в преференсах
...
Рейтинг: 0 / 0
14.06.2004, 10:53:56
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560085
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
И еще такой вопрос как проинсертить в ОДНУ запись таблицы сразу несколько значений контролов вкляючая такие там где есть дата
...
Рейтинг: 0 / 0
14.06.2004, 11:00:35
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560089
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Omar_K Shuhard Omar_KОк согласен может быть такой объект отсутсвует в ADP, тогда такой вопрос как в ADP вставить запись из комбо формы в таблицу посредством кнопки?
немодно и неспортивно - подключив через ссылки DAO
и написав
Код: plaintext
1.
2.
3.
Dim MyDb As DAO.Database
Set MyDb = CurrentDb
MyDb.Execute "INSERT INTO Results (id) VALUES (" & Me!ComboElev & ")", dbFailOnError
DAO писать не обязательно но красиво

Вариант Алексея К прокатил, а к вам вопрос что подключать в преференсах
DAO
...
Рейтинг: 0 / 0
14.06.2004, 11:02:18
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560095
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
Private Sub CommandProvod_Click()
CurrentProject.Connection.Execute "INSERT INTO Results (elev,date) VALUES (" & Me!ComboElev & ", " & Me!TextDate & " )"
End Sub
Или в варианте Shuharda все равно в принципе

пишет ошибку Inncorect syntax near .2004

вообщем TextDate должно инсертиться в поле date типа datetime
...
Рейтинг: 0 / 0
14.06.2004, 11:05:49
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560100
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
Private Sub CommandProvod_Click()
CurrentProject.Connection.Execute "INSERT INTO Results (elev,date) VALUES (" & Me!ComboElev & ", " & Me!TextDate & " )"
End Sub
Или в варианте Shuharda все равно в принципе

пишет ошибку Inncorect syntax near .2004

вообщем TextDate должно инсертиться в поле date типа datetime
...
Рейтинг: 0 / 0
14.06.2004, 11:07:16
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560103
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
собрав соответсвующую строку

Код: plaintext
"INSERT INTO Results (id,txt.dat) VALUES (" & Me!ComboElev & ",'" & Me.txt & "',#" MyFunConvertdatAmerican(me.dat) & "#  )"

MyFunConvertdatAmerican 31.12.2004 -> 12 / 31 /2004
...
Рейтинг: 0 / 0
14.06.2004, 11:08:18
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560115
Omar_K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Omar_K
Участник
АлексейКсобрав соответсвующую строку

Код: plaintext
"INSERT INTO Results (id,txt.dat) VALUES (" & Me!ComboElev & ",'" & Me.txt & "',#" MyFunConvertdatAmerican(me.dat) & "#  )"

MyFunConvertdatAmerican 31.12.2004 -> 12 / 31 /2004


она по умолчанию есть? просто компилятор ее не определяет
...
Рейтинг: 0 / 0
14.06.2004, 11:21:10
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560124
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
MyFun в переводе с англицкого "моя функция" - то есть "твоя" её надо написать
...
Рейтинг: 0 / 0
14.06.2004, 11:37:38
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560127
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
авторнемодно и неспортивно - подключив через ссылки DAO
и написав ...

И что, после подключения DAO в ADP появится CurrentDb?
?currentdb is nothing
True
...
Рейтинг: 0 / 0
14.06.2004, 11:42:54
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560128
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
вроде есть какая - то встроенная, уже не помню
...
Рейтинг: 0 / 0
14.06.2004, 11:43:40
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560156
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Serge Gavrilov авторнемодно и неспортивно - подключив через ссылки DAO
и написав ...

И что, после подключения DAO в ADP появится CurrentDb?
?currentdb is nothing
True
виноват слово ADP просмотрел - имел ввиду Access>97/mdb
...
Рейтинг: 0 / 0
14.06.2004, 12:03:48
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560230
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
я не один такой:
Код: plaintext
1.
2.
Remarks
Note   In Microsoft Access the CurrentDb method establishes a hidden reference to the Microsoft DAO  3 . 6  Object Library in a Microsoft Access database (.mdb). If you want to use the CurrentDb method in an Access project (.adp) you must set a permanent reference to the DAO  3 . 6  Object library in the Microsoft Visual Basic Editor.
аналогично и в MSDN
реально не работает
...
Рейтинг: 0 / 0
14.06.2004, 12:49:17
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560233
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
АлексейК
Участник
дык надо не только прореференсить но и назначить объекту Базаданных файл MDB
...
Рейтинг: 0 / 0
14.06.2004, 12:51:35
| Ответить | Цитировать | Написать  
Один и тот же код по разному себя ведет в MDB и в ADP
    #32560265
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
дык и работать он будет с таблицами лежащими в mdb
для данной задачи это не решение.
сломался - сел учить AccXp ADO + ADP.
стыдно сидеть в 97.
...
Рейтинг: 0 / 0
14.06.2004, 13:21:35
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Один и тот же код по разному себя ведет в MDB и в ADP
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32560065&tid=1673877]:
 0ms
get settings:
 11ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 210ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 65ms
get tp. blocked users:
 1ms
others: 235ms
total:  558ms
созд. / загр.: 558ms
x
x
Закрыть


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