ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос на добавление (3 варианта) и все не работают
19 сообщений из 19, страница 1 из 1
Запрос на добавление (3 варианта) и все не работают
    #39537189
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
Пиветствую!

Подскажите по ошибке в написании запроса на добавление:

Код: vbnet
1.
2.
3.
4.
5.
6.
    Dim r As String
    r = "insert into Таблица (Дата,Фрукт,Овощ,Огурец,Банан) values (#" & Format(Me.Дата.Value, "mm\/dd\/yy") & "#, '" & Me.Фрукт.Value & "',  '" & Peremennay1 & "', '" & Peremennay2 & "', '" & Peremennay3 & "')"
    Debug.Print r
    CurrentDb.Execute r, dbFailOnError

r= insert into Таблица (Дата,Фрукт,Овощ,Огурец,Банан) values (#10/17/17#, 'Яблоко',  'Помидор', 'БАрабашка', 'Домовой')




Ошибка 3001 - Ошибочный аргумент

Пробовал и так:

Код: vbnet
1.
2.
'DoCmd.RunSQL "INSERT INTO Таблица (Дата,Фрукт,Овощ,Огурец,Банан)" & _
 "VALUES (#" & Format(Me.Дата.Value, "mm\/dd\/yy") & "#, '" & Me.Фрукт.Value & "',  '" & Peremennay1 & "', '" & Peremennay2 & "', '" & Peremennay3 & "');"



Ошибка 3001 - Ошибочный аргумент

Пробовал и так:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Dim rst As Recordset

        Set rst = CurrentDb.OpenRecordset("Таблица", dbOpenDynaset)
            With rst
                .AddNew
                ![Дата] = Me.Дата
                ![Фрукт] = Me.Фрукт
                ![Овощ] = Peremennay1 
                ![Огурец] = Peremennay2
                ![Банан] = Peremennay3
                .Update
            End With
        rst.Close
        Set rst = Nothing



Ошибка 3001 - Ошибочный аргумент

Переменные Public глобальные.

Что не так прописываю, ен понимаю(((
...
Рейтинг: 0 / 0
17.10.2017, 08:18
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537202
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
Запрос на добавление,
Попробуйте скопировать из первого варианта , то что вам выдал Debug
Код: sql
1.
insert into Таблица (Дата,Фрукт,Овощ,Огурец,Банан) values (#10/17/17#, 'Яблоко',  'Помидор', 'БАрабашка', 'Домовой')


в окно запроса в режиме SQL и выполнить этот запрос. Посмотрите, будут ли ошибки?
...
Рейтинг: 0 / 0
17.10.2017, 08:51
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537207
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Запрос на добавление,

База, скорее всего повреждена. Попробуйте выполнить сжатие/восстановление, если не поможет, то создайте новую базу и скопируте туда все объекты.
...
Рейтинг: 0 / 0
17.10.2017, 09:03
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537225
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
guest_rusimport,

Вставил из Debug.Print в SQL запроса: сам запрос отобразился в виде таблицы,

но при выполнении его - таже ошибка - Ошибочный аргумент
...
Рейтинг: 0 / 0
17.10.2017, 09:25
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537230
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
Запрос на добавление,

сделайте маленький тестовый примерчик, проверьте на нем, если не заработает выкладывайте его сюда, если заработает - выполните рекомендации MrShin
...
Рейтинг: 0 / 0
17.10.2017, 09:30
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537231
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
MrShin,

Создал новую БД и скопировал все со старой.

Запускаю событие - таже ошибка - Ошибка 3001 - Ошибочный аргумент

Куда копать?
...
Рейтинг: 0 / 0
17.10.2017, 09:31
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537239
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
компиляция проходит успешно?
или файл /decompile ?
...
Рейтинг: 0 / 0
17.10.2017, 09:36
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537241
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
guest_rusimport,

сделал маленький тестовый примерчик - в нем работает все - может таблицу заново созлать?..
...
Рейтинг: 0 / 0
17.10.2017, 09:39
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537242
Анатолий ( Киев )
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий ( Киев )
Гость
Запрос типа insert ... values ... - реальные грабли. Не используйте его.
Добавление через Recordset - правильное решение. Если выполнять код пошагово, то на какой строке ошибка?
И еще, вместо Dim rst As Recordset лучше Dim rst As DAO. Recordset
А также Recordset для добавления логичнее открывать без записей. Это или соотв. 3-й аргумент в OpenRecordset или вместо "Таблица" написать "SELECT * FROM Таблица WHERE 1=0".
...
Рейтинг: 0 / 0
17.10.2017, 09:39
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537251
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
bubucha,

компиляция проходит без ошибок, ровно как и декомпиляция

"C:\Program Files (x86)\Microsoft Office\root\Office16\MSACCESS.EXE" "D:\Users\nffanya\Desktop\Программа.accdb" /decompile
...
Рейтинг: 0 / 0
17.10.2017, 09:45
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537262
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
Запрос на добавлениеguest_rusimport,

сделал маленький тестовый примерчик - в нем работает все - может таблицу заново созлать?..
попробуйте
...
Рейтинг: 0 / 0
17.10.2017, 09:52
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537267
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
Анатолий ( Киев ),

написал как вы сказали Dim rst As DAO.Recordset и "SELECT * FROM Таблица WHERE 1=0"

таже ошибка - Ошибка 3001 - Ошибочный аргумент

Ошибка наступает на строке .AddNew - появляется сообщение об ошибке - закрываю его и далее продолжаю нажимаьб F8 - данные записались в таблицу
...
Рейтинг: 0 / 0
17.10.2017, 09:56
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537271
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Попробуйте просто в редакторе таблиц добавить руками строку. Если ошибка возникнет, повреждена таблица и это повреждение копируется в новую таблицу, судя по всему.
...
Рейтинг: 0 / 0
17.10.2017, 10:03
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537273
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
Запрос на добавлениекомпиляция проходит без ошибок, ровно как и декомпиляция

Если при чудесах не помогают и эти меры, то делаю очистку модулей - выгрузка всего вба в текстовый файл, удаление всего вба из проекта.
Далее сжатие.
Если и это не помогает, то делаю новый файл ,а в нем импортирую все объекты из проблемного файла.
Если и это не помогает, переписываю "чудастый" проблемный кусок - меняю технологию.
...
Рейтинг: 0 / 0
17.10.2017, 10:04
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537284
Запрос на добавление
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запрос на добавление
Гость
MrShin,

гениально - удалил таблицу - сжал БД - создал новую - ЗАРАБОТАЛО,

СПАСИБО!
...
Рейтинг: 0 / 0
17.10.2017, 10:15
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537307
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Joss
Участник
Проблема глюкавости таблиц.

Есть таблица. В ней есть поле Дата соответствующего формата. По умолчанию значение равно функции Now() - не работает. В других таблицах работает, а в этой - нет. Создавал копию таблицы, копировал в другую базу - не помогало. Всё время ошибка.

К сожалению удалить и создать заново таблицу не могу из-за поля счётчика.
...
Рейтинг: 0 / 0
17.10.2017, 10:33
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537313
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
JossК сожалению удалить и создать заново таблицу не могу из-за поля счётчика
А чем он мешает? Прямые INSERT-ы и рекордсеты запросто вставляют все что угодно в счетчики. Потом только сжать-восстановить базу надо, чтобы счетчики сбросились на максимальное значение.
...
Рейтинг: 0 / 0
17.10.2017, 10:38
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537381
guest_rusimport
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest_rusimport
Гость
JossПроблема глюкавости таблиц.

Есть таблица. В ней есть поле Дата соответствующего формата. По умолчанию значение равно функции Now() - не работает. В других таблицах работает, а в этой - нет. Создавал копию таблицы, копировал в другую базу - не помогало. Всё время ошибка.

К сожалению удалить и создать заново таблицу не могу из-за поля счётчика.
Попробуй создать в этой таблице другое поле Дата (с другим именем), установи значение по умолчанию, апдейтом перенеси туда значения из старого поля, удали старое поле, сожми восстанови базу, переименуй новое поле Дата старым именем.
...
Рейтинг: 0 / 0
17.10.2017, 11:39
| Ответить | Цитировать | Написать  
Запрос на добавление (3 варианта) и все не работают
    #39537464
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
иногда,в подобных случаях,помогает:экспорт в ёксель таблицы(столбца),создание там при помощи специальной вставки (копировать только значения)новой таблицы(столбца) и обратно в акс
...
Рейтинг: 0 / 0
17.10.2017, 13:21
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос на добавление (3 варианта) и все не работают
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39537313&tid=1612003]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 37ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 51ms
get tp. blocked users:
 1ms
others: 273ms
total:  407ms
созд. / загр.: 407ms
x
x
Закрыть


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