INSERT INTO出现错误!!!!急!!!

来源：百度知道 编辑：UC知道 时间：2024/06/29 02:26:17
<%
dim conn
DBPath=SERVER.MapPath("data/message.asp")
set conn=Server.CreateObject("ADODB.Connection")
conn.Open"provider=microsoft.jet.oledb.4.0; data source="&DBPath
set rs=server.CreateObject("adodb.recordset")
sql="select * from zhucexinxi"
rs.open sql,conn,1,3
%>
<%
dim sname,semail,ssex,sinput,ddate,sxinming,errormsg,founderror,spassword
founderror=false
errormasg=""
sname=request.form("dname")
sxinming=request.Form("dxinming")
spassword=request.Form("dpassword")
semail=request.form("dE-mail")
ssex=request.form("dsex")
sinput=trim(request.form("dlianxifangshi"))
ddate=now()
if sname=""then
founderror=true
errormsg="<script LANGUAGE='javascript'>alert('对不起！用户名不能为空！');

多写了一列date，insert语句写完先数数参数数目对不对

补充:
改成
cmdsql="insert into [zhucexinxi]([username],[xinming],[userpassword],[sex],[E-mail],[lianxifangshi],[date]) values('"&sname&"','"&sxinming&"','"&spassword&"','"&ssex&"','"&semail&"','"&sinput&"',#"&ddate&"#)"
还不行就改成
cmdsql="insert into [zhucexinxi]([username],[xinming],[userpassword],[sex],[E-mail],[lianxifangshi],[date]) values('"&sname&"','"&sxinming&"','"&spassword&"',"&ssex&",'"&semail&"','"&sinput&"',#"&ddate&"#)"
注意sex和date的数据类型

cmdsql="insert into zhucexinxi(username,xinming,userpassword,sex,E-mail,lianxifangshi,date,date) values('"&sname&"','"&sxinming&"','"&spassword&"','"&ssex&"&