Ошибка ASP - ошибка ядра базы данных Microsoft JET '80040e07' - PullRequest
1 голос
/ 11 января 2012

У меня проблемы с регистрационной формой, подключающейся к базе данных и сохранением данных, ниже приведена ошибка, которую я получаю.

Ошибка ядра базы данных Microsoft JET '80040e07'

Несоответствие типов данных в выражении критериев.

/ mus0280 / coursework2 / storefuncs.asp, строка 330

Это фрагмент кода, я проверил, одинаковы ли типы данных в базе данных и на всем веб-сайте.

' Add New User to Database
 sqlString = "INSERT INTO users ( " &_
  "user_username, " &_
  "user_password, " &_
  "user_email," &_
  "user_address, " &_
  "user_city," &_
  "user_postcode," &_
  "user_cardnumber, " &_
  "user_cardtype, " &_
  "user_cardexpiremonth," &_
  "user_cardexpireyear," &_
  "user_cardname," &_
  "user_HTML" &_
  ") VALUES ( " &_
  " '" & fixQuotes( newusername ) & "', " &_
  " '" & fixQuotes( newpassword ) & "', " &_
  " '" & fixQuotes( email ) & "', " &_
  " '" & fixQuotes( address ) & "', " &_
  " '" & fixQuotes( city ) & "', " &_
  " '" & fixQuotes( postcode ) & "', " &_
  " '" & fixQuotes( cardnumber ) & "', " &_
  " '" & cardtype & "', " &_
  " '" & cardexpiremonth & "', " &_
  " '" & cardexpireyear & "', " &_
  " '" & fixQuotes( cardname ) & "', " &_
  " "  & html & " " &_
  ")"

Con.Execute sqlString 

- это строка 330

1 Ответ

0 голосов
/ 11 января 2012
' Try with include single Quote's before and After Html in values (

' Add New User to Database
 sqlString = "INSERT INTO users ( " &_
  "user_username, " &_
  "user_password, " &_
  "user_email," &_
  "user_address, " &_
  "user_city," &_
  "user_postcode," &_
  "user_cardnumber, " &_
  "user_cardtype, " &_
  "user_cardexpiremonth," &_
  "user_cardexpireyear," &_
  "user_cardname," &_
  "user_HTML" &_
  ") VALUES ( " &_
  " '" & fixQuotes( newusername ) & "', " &_
  " '" & fixQuotes( newpassword ) & "', " &_
  " '" & fixQuotes( email ) & "', " &_
  " '" & fixQuotes( address ) & "', " &_
  " '" & fixQuotes( city ) & "', " &_
  " '" & fixQuotes( postcode ) & "', " &_
  " '" & fixQuotes( cardnumber ) & "', " &_
  " '" & cardtype & "', " &_
  " '" & cardexpiremonth & "', " &_
  " '" & cardexpireyear & "', " &_
  " '" & fixQuotes( cardname ) & "', " &_
  " '"  & html & "' " &_
  ")"

Con.Execute sqlString 
...