#12003/7/31 19:29:38
请高手指教！
请高手帮我看一下，下面的asp程序哪里出错了，
<%if request("name")="" then
%>
LANGUAGE="javascript">
<%
Response.end
end if
%>
<%if request("email")="" then
%>
LANGUAGE="javascript">
<%
Response.end
end if
%>
<%if request("title")="" then
%>
LANGUAGE="javascript">
<%
Response.end
end if
%>
<%if request("suggesion")="" then
%>
LANGUAGE="javascript">
<%
Response.end
end if
%>
<%
strDSN="DBQ="+server.mappath("bbs.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
'strDSN="Driver={Microsoft Access Driver (*.mdb)};../bbs/bbs.mdb;UID=ad;PWD="
Set cn = Server.CreateObject("ADODB.Connection")
cn.ConnectionTimeout=10
cn.Open strDSN
Set cm=Server.CreateObject("ADODB.Command")
Set cm.ActiveConnection=cn
sInput=request("t7")&""
cm.CommandText="INSERT INTO bbs(标题,姓名,email,电话，主题，意见与建议,日期) valueS(?,?,?,?,?,?,'"&sInput&"',?)"
cm.Prepared=True
cm.Parameters.Append cm.CreateParameter("type0", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type1", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type2", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type3", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type4", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type5", 200, ,255)
cm.Parameters.Append cm.CreateParameter("type7", 200, ,255)
cm("type0")=Request("T1")
cm("type1")=Request("T2")
cm("type2")=Request("T3")
cm("type3")=Request("T4")
cm("type4")=Request("T5")
cm("type5")=Request("T6")
cm("type7")=Date+Time
cm.Execute
cn.close
%>
最近提示的时候说：
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14'
[Microsoft][ODBC Microsoft Access 驱动程序] 查询值的数目与目标字段中的数目不同。
/常通/suggestion/addbbs.asp, 行107
