在线等100分 超级菜的问题
<%
Dim comcoo
Dim comcoopath
Dim comcooopen
Dim comcootable
Dim comcootr
Dim comcootd
DIM comcootitle
DIM comcoonbsp
Dim tr1
DIM td2
comcootable="<table width=384 height=380 bgcolor=#EEEEEE cellpadding=0 style=border-collapse: collapse>"
comcootr="<tr><td height=19>"
comcootd="</td><tr>"
tr1="<td height=19>"
td2="</td>"
comcoonbsp="
;
; "
comcootitle="<center><a class=comcoo3>-----------请您牢记您注册的信息-------------</a></center><br>"
set comcoo=Server.CreateObject("ADODB.Connection")
comcoo.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("COMCOObbsdata/comcoo.mdb")
'comcoo.open"Provider=Microsoft.jet.OLEDB.4.0;Data source="&comcoopath
'开始检测帐号是否注册
set comcooopen=comcoo.Execute("select*from everybody where name='"&request.form("name")&"'")
comcoo.Execute"insertinto everybody(name,Turename,y1,y2,y3,qq,img,age,clew,answer,homepage,email,phone,dizhi,message)values
('"&request.form("name")&"','"&request.form("Turename")&"',"&request.form("y1")&"',"&request.form("y2")&"',"&request.form
("y3")&"',"&request.form("qq")&"',"&request.form("img")&"',"&request.form("age")&"',"&request.form("clew")&"',"&request.form
("answer")&"',"&request.form("homepage")&"',"&request.form("email")&"',"&request.form("phone")&"',"&request.form("dizhi")
&"',"&request.form("message")&"')"
%>
为什么提示
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14'
[Microsoft][ODBC Microsoft Access Driver] 无效的 SQL语句;期待 'DELETE'、'INSERT'、'PROCEDURE'、'SELECT'、或 'UPDATE'。