麻烦大家帮我看一下,代码不提示错误,数据插入不成功的原因
<table align="center" width="600" cellpadding="0" cellspacing="0" border="1">
<%
if cname="" and add="" and post="" then
%>
<form action="" method="post" name="f1">
<tr>
<td>姓名:<input type="text" name="cname" size="15" /></td>
</tr>
<tr>
<td>地址:<input type="text" name="add" size="15" /></td>
</tr>
<tr>
<td>邮编:<input type="text" name="post" size="15" /></td>
</tr>
<tr>
<td><input type="submit" value="确定" /></td>
</tr>
</form>
<%
else
dim sql,cname,add,post
cname=request.form("cname")
add=request.form("add")
post=request.form("past")
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("../data/data.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="insert into [user] (cname,add,post) values ('"&cname&"','"&add&"','"&post&"')"
rs.open sql,conn,1,1
%>
</table>
<script>
alert("输入成功!");
location.href="charu.asp";
</script>
<%
end if
%>
</body>