Запара с INSERT INTO? ошибка Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

@qnqska · Регистрация: 08.08.2007

Студворк — интернет-сервис помощи студентам

Пытаюсь внести в таблицу MS ACCESS данные из нескольких текстовых полей...

clientSQL='INSERT INTO Client (Name, Surname, Address, Phone, E-mail) VALUES ('' & names & '','' & surname & '','' & address & '',' & phone & ','' & mail & '')'

Выбивает ошибку..

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement

Хотя для таблицы с одним полем и Autonumber-ом INSERT INTO работает...
Помогите, проект горит как папочки на форуме....

09.08.2007, 00:08

а попробуй проверить без поля phone, может у тебя с ним проблемы

@qnqska · 09.08.2007, 00:24 **[ТС]**

Короче не помогает....Переделал поле в текстовое и теперь.....

clientSQL='INSERT INTO Client (Name, Surname, Address, Phone, E-mail) VALUES ('' + names + '','' + surname + '','' + address + '','' + phone + '','' + mail + '')'

Одна и таже ошибка.... Смотрите выше....

09.08.2007, 10:56

сделай перед выполнением запроса Response.write(clientSQL) и напиши сюда.
Может у тебя апостроф в какой-нить переменной затесался?
К тому же слово 'Name' яв-ся зарезервированным в Access (см. http://www.aspfaq.com/faq/faqShow.asp?fid=141).
Переименуй Name в что-нить другое и не забывай заменять апостроф на двойной апостроф при занесении переменной в БД

@Chein · 09.08.2007, 11:34

Было у меня такое. Помогает написание запроса в самом Access-е, потому как иногда случается путаница с расположением квадратных скобок.

Сконструировал запрос внутри Access, Вид->SQL, копируешь в скрипт. Должно сработать.

@AndreP · 09.08.2007, 11:34

Подозрение так же вызывает и название поля
E-mail
хотя может Access это и выдерживает.

@Spookus · 09.08.2007, 19:48

strSQL = ''
strSQL = strSQL & 'INSERT INTO counters '
strSQL = strSQL & '(UsersIP, UsersLogInTime,UsersLoginDate, UsersHit) ' & vbCrLf
strSQL = strSQL & 'VALUES ('
strSQL = strSQL & ''' & Request.ServerVariables('REMOTE_ADDR') & '''
strSQL = strSQL & ', '
strSQL = strSQL & ''' & Time & '''
strSQL = strSQL & ', '
strSQL = strSQL & ''' & Date & '''
strSQL = strSQL & ', '
strSQL = strSQL & 1
strSQL = strSQL & ');'

Попробуй на подобии этой записи

@Spookus · 09.08.2007, 19:49

strSQL = ''
strSQL = strSQL & 'INSERT INTO counters '
strSQL = strSQL & '(UsersIP, UsersLogInTime,UsersLoginDate, UsersHit) ' & vbCrLf
strSQL = strSQL & 'VALUES ('
strSQL = strSQL & ''' & Request.ServerVariables('REMOTE_ADDR') & '''
strSQL = strSQL & ', '
strSQL = strSQL & ''' & Time & '''
strSQL = strSQL & ', '
strSQL = strSQL & ''' & Date & '''
strSQL = strSQL & ', '
strSQL = strSQL & 1
strSQL = strSQL & ');'

Попробуй на подобии этой записи

09.08.2007, 21:40

кстати, по моему действительно e-mail может вызвать ошибку, а точнее тире
у меня вроде была подобная проблема с названием где присутствовало тире

@qnqska · 12.08.2007, 22:38 **[ТС]**

Огромное спасибо, в базу добавляет записи, но есть маленький проблем: Записи при нажатии Refresh добавляются опять в базу...

12.08.2007, 22:52

тебе нужно сделать в конце формы, после кнопки 'сабмит' скрытое поле
<input type='hidden' name='DataInsert' value='true'>
а в скрипте-записи данных в БД добавить строчку
If (CStr(Request('DataInsert')) <> '') Then
....... скрипт insert ........

То есть, после того как ты нажимаешь сабмит, вместе с данными формы в скрипт отправляется значение скрытого поля true, которое разрешает производить запись в БД. Если же ты делаешь просто рефреш, то соответственно данные формы никуда не отправляются и скрипт не срабатывает.

@qnqska · 12.08.2007, 23:19 **[ТС]**

Sultan! Spasibo sa otvet, no vse ravno ne poluchaetsja... Moshno podrobnee... Pro input ja ponjal.. A vot nashet uslovija moshno po podrobnei??

13.08.2007, 01:04

If (CStr(Request('DataInsert')) <> '') Then

у тебя должно стоять перед основным кодом-инсерт.
Операция инсерт выполняется при условии, что значение скрытого поля 'DataInsert' не равно '' пустому месту. После Then собственно должен идти твой код-инсерт.

@qnqska · 13.08.2007, 01:33 **[ТС]**

.....
clientSQL='INSERT INTO Client (FirstName, Surname, Address, Phone, Email) VALUES ('' & names & '','' & surname & '','' & address & '','' & phone & '','' & mail & '')'

If (CStr(Request('DataInsert'))<>'')then Set clientRS=oConn.Execute(clientSQL)
End if
Response.Write('<input type=submit value=Submit></center>')
Response.Write('<input type=hidden name=DataInsert value=true>')
Response.Write('</form>')

Sultan! Posmotri gde oshibka!!

13.08.2007, 11:35

If (CStr(Request('DataInsert'))<>'')then

clientSQL='INSERT INTO Client (FirstName, Surname, Address, Phone, Email) VALUES ('' & names & '','' & surname & '','' & address & '','' & phone & '','' & mail & '')'

попробуй так

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Programma_Boinc 01.01.2026 Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .

@qnqska 0 / 0 / 0 Регистрация: 08.08.2007 Сообщений: 32

	Запара с INSERT INTO? ошибка Microsoft OLE DB Provider for ODBC Drivers error '80040e14' 08.08.2007, 23:13. Показов 2363. Ответов 14 Метки нет (Все метки) Пытаюсь внести в таблицу MS ACCESS данные из нескольких текстовых полей... clientSQL='INSERT INTO Client (Name, Surname, Address, Phone, E-mail) VALUES ('' & names & '','' & surname & '','' & address & '',' & phone & ','' & mail & '')' Выбивает ошибку.. Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement Хотя для таблицы с одним полем и Autonumber-ом INSERT INTO работает... Помогите, проект горит как папочки на форуме.... 0

Sultan
	09.08.2007, 00:08
	а попробуй проверить без поля phone, может у тебя с ним проблемы

@qnqska 0 / 0 / 0 Регистрация: 08.08.2007 Сообщений: 32
	09.08.2007, 00:24 [ТС]
	Короче не помогает....Переделал поле в текстовое и теперь..... clientSQL='INSERT INTO Client (Name, Surname, Address, Phone, E-mail) VALUES ('' + names + '','' + surname + '','' + address + '','' + phone + '','' + mail + '')' Одна и таже ошибка.... Смотрите выше.... 0

Sergik
	09.08.2007, 10:56
	сделай перед выполнением запроса Response.write(clientSQL) и напиши сюда. Может у тебя апостроф в какой-нить переменной затесался? К тому же слово 'Name' яв-ся зарезервированным в Access (см. http://www.aspfaq.com/faq/faqShow.asp?fid=141). Переименуй Name в что-нить другое и не забывай заменять апостроф на двойной апостроф при занесении переменной в БД

@Chein 0 / 0 / 0 Регистрация: 07.08.2007 Сообщений: 62
	09.08.2007, 11:34
	Было у меня такое. Помогает написание запроса в самом Access-е, потому как иногда случается путаница с расположением квадратных скобок. Сконструировал запрос внутри Access, Вид->SQL, копируешь в скрипт. Должно сработать. 0

@AndreP 0 / 0 / 1 Регистрация: 22.07.2007 Сообщений: 260
	09.08.2007, 11:34
	Подозрение так же вызывает и название поля E-mail хотя может Access это и выдерживает. 0

@Spookus 0 / 0 / 0 Регистрация: 16.06.2007 Сообщений: 165
	09.08.2007, 19:48
	strSQL = '' strSQL = strSQL & 'INSERT INTO counters ' strSQL = strSQL & '(UsersIP, UsersLogInTime,UsersLoginDate, UsersHit) ' & vbCrLf strSQL = strSQL & 'VALUES (' strSQL = strSQL & ''' & Request.ServerVariables('REMOTE_ADDR') & ''' strSQL = strSQL & ', ' strSQL = strSQL & ''' & Time & ''' strSQL = strSQL & ', ' strSQL = strSQL & ''' & Date & ''' strSQL = strSQL & ', ' strSQL = strSQL & 1 strSQL = strSQL & ');' Попробуй на подобии этой записи 0

@Spookus 0 / 0 / 0 Регистрация: 16.06.2007 Сообщений: 165
	09.08.2007, 19:49
	strSQL = '' strSQL = strSQL & 'INSERT INTO counters ' strSQL = strSQL & '(UsersIP, UsersLogInTime,UsersLoginDate, UsersHit) ' & vbCrLf strSQL = strSQL & 'VALUES (' strSQL = strSQL & ''' & Request.ServerVariables('REMOTE_ADDR') & ''' strSQL = strSQL & ', ' strSQL = strSQL & ''' & Time & ''' strSQL = strSQL & ', ' strSQL = strSQL & ''' & Date & ''' strSQL = strSQL & ', ' strSQL = strSQL & 1 strSQL = strSQL & ');' Попробуй на подобии этой записи 0

Sultan
	09.08.2007, 21:40
	кстати, по моему действительно e-mail может вызвать ошибку, а точнее тире у меня вроде была подобная проблема с названием где присутствовало тире

@qnqska 0 / 0 / 0 Регистрация: 08.08.2007 Сообщений: 32
	12.08.2007, 22:38 [ТС]
	Огромное спасибо, в базу добавляет записи, но есть маленький проблем: Записи при нажатии Refresh добавляются опять в базу... 0

Sultan
	12.08.2007, 22:52
	тебе нужно сделать в конце формы, после кнопки 'сабмит' скрытое поле <input type='hidden' name='DataInsert' value='true'> а в скрипте-записи данных в БД добавить строчку If (CStr(Request('DataInsert')) <> '') Then ....... скрипт insert ........ То есть, после того как ты нажимаешь сабмит, вместе с данными формы в скрипт отправляется значение скрытого поля true, которое разрешает производить запись в БД. Если же ты делаешь просто рефреш, то соответственно данные формы никуда не отправляются и скрипт не срабатывает.

@qnqska 0 / 0 / 0 Регистрация: 08.08.2007 Сообщений: 32
	12.08.2007, 23:19 [ТС]
	Sultan! Spasibo sa otvet, no vse ravno ne poluchaetsja... Moshno podrobnee... Pro input ja ponjal.. A vot nashet uslovija moshno po podrobnei?? 0

Sultan
	13.08.2007, 01:04
	If (CStr(Request('DataInsert')) <> '') Then у тебя должно стоять перед основным кодом-инсерт. Операция инсерт выполняется при условии, что значение скрытого поля 'DataInsert' не равно '' пустому месту. После Then собственно должен идти твой код-инсерт.

@qnqska 0 / 0 / 0 Регистрация: 08.08.2007 Сообщений: 32
	13.08.2007, 01:33 [ТС]
	..... clientSQL='INSERT INTO Client (FirstName, Surname, Address, Phone, Email) VALUES ('' & names & '','' & surname & '','' & address & '','' & phone & '','' & mail & '')' If (CStr(Request('DataInsert'))<>'')then Set clientRS=oConn.Execute(clientSQL) End if Response.Write('<input type=submit value=Submit></center>') Response.Write('<input type=hidden name=DataInsert value=true>') Response.Write('</form>') Sultan! Posmotri gde oshibka!! 0

Sultan
	13.08.2007, 11:35
	If (CStr(Request('DataInsert'))<>'')then clientSQL='INSERT INTO Client (FirstName, Surname, Address, Phone, Email) VALUES ('' & names & '','' & surname & '','' & address & '','' & phone & '','' & mail & '')' попробуй так