Number of query values and destination...

[Microsoft][ODBC Microsoft Access Driver] Number of query values and destination fields are not the same.

/booking/addbook.asp, line 28

-------------------------

<%
Set objConn = Server.CreateObject("ADODB.Connection")
strConnection = "DRIVER={Microsoft Access Driver (*.md}; DBQ=" & Server.MapPath("book.mdb") & ";User ID=admin; Password=123;"
objConn.Open(strConnection)

SQLstmt = "INSERT INTO booking (name,address,postcode,email,adyear,admonth,adday,ddyear,ddmonth,ddday,ppl,nights,hear,other,furthinfo)"
SQLstmt = SQLstmt & " VALUES ("
SQLstmt = SQLstmt & "'" & name & "',"
SQLstmt = SQLstmt & "'" & address & "',"
SQLstmt = SQLstmt & "'" & postcode & "',"
SQLstmt = SQLstmt & "'" & email & "'"
SQLstmt = SQLstmt & "'" & adyear & "',"
SQLstmt = SQLstmt & "'" & admonth & "',"
SQLstmt = SQLstmt & "'" & adday & "'"
SQLstmt = SQLstmt & "'" & ddyear & "',"
SQLstmt = SQLstmt & "'" & ddmonth & "',"
SQLstmt = SQLstmt & "'" & ddday & "'"
SQLstmt = SQLstmt & "'" & ppl & "',"
SQLstmt = SQLstmt & "'" & nights & "',"
SQLstmt = SQLstmt & "'" & hear & "'"
SQLstmt = SQLstmt & "'" & other & "',"
SQLstmt = SQLstmt & "'" & furthinfo & "',"
SQLstmt = SQLstmt & ")"

set RS = objConn.Execute(SQLstmt)
objConn.Close

Set RS = Nothing
Set objConn = Nothing

response.write("
<CENTER>")
response.write("Thank you!</CENTER>

")

%>

HELP