asp作业: asp连接access数据库向里面添加数据。我编好了,但就是添加不了数据。请大虾帮忙找找里面的问题
我编写的代码:<html><body><formname="form3"method="post"actiom="cnn.asp"><p>时间:<inputname="t...
我编写的代码:
<html><body>
<form name="form3" method="post" actiom="cnn.asp">
<p>时间:<input name="time" size="15" maxlength="20">
<p>周一:<input name="xq1" size="15" maxlength="20">
<p>周二:<input name="xq2" size="15" maxlength="20">
<p>周三:<input name="xq3" size="15" maxlength="20">
<p>周四:<input name="xq4" size="15" maxlength="20">
<p>周五:<input name="xq5" size="15" maxlength="20">
<p align="center"><input type="submit" name="Subit" value="提交">
</form>
</body></html>
<%
dim filepath,cnl,sql,rs
set conn=server.createobject("ADODB.Connection")
strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db11.mdb")
conn.Open strProvider
set rst=Server.CreateObject("ADODB.Recordset")
sql="select * from test1"
set rs=conn.execute(sql)
a1=trim(Request.Form("time"))
a2=trim(Request.Form("xq1"))
a3=trim(Request.Form("xq2"))
a4=trim(Request.Form("xq3"))
a5=trim(Request.Form("xq4"))
a6=trim(Request.Form("xq5"))
cn2=" ' "&a1&" ',' "&a2&" ',' "&a3&" ',' "&a4&" ',' "&a5&" ',' "&a5&" ' "
conn.Execute("Insert into test1(时间,周一,周二,周三,周四,周五) values(" & cn2 & ")")
conn.close
%>
我是在win7上运行的,总是提示:An error occurred on the server when processing the URL. Please contact the system administrator.
If you are the system administrator please click here to find out more about this error. 展开
<html><body>
<form name="form3" method="post" actiom="cnn.asp">
<p>时间:<input name="time" size="15" maxlength="20">
<p>周一:<input name="xq1" size="15" maxlength="20">
<p>周二:<input name="xq2" size="15" maxlength="20">
<p>周三:<input name="xq3" size="15" maxlength="20">
<p>周四:<input name="xq4" size="15" maxlength="20">
<p>周五:<input name="xq5" size="15" maxlength="20">
<p align="center"><input type="submit" name="Subit" value="提交">
</form>
</body></html>
<%
dim filepath,cnl,sql,rs
set conn=server.createobject("ADODB.Connection")
strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db11.mdb")
conn.Open strProvider
set rst=Server.CreateObject("ADODB.Recordset")
sql="select * from test1"
set rs=conn.execute(sql)
a1=trim(Request.Form("time"))
a2=trim(Request.Form("xq1"))
a3=trim(Request.Form("xq2"))
a4=trim(Request.Form("xq3"))
a5=trim(Request.Form("xq4"))
a6=trim(Request.Form("xq5"))
cn2=" ' "&a1&" ',' "&a2&" ',' "&a3&" ',' "&a4&" ',' "&a5&" ',' "&a5&" ' "
conn.Execute("Insert into test1(时间,周一,周二,周三,周四,周五) values(" & cn2 & ")")
conn.close
%>
我是在win7上运行的,总是提示:An error occurred on the server when processing the URL. Please contact the system administrator.
If you are the system administrator please click here to find out more about this error. 展开
4个回答
展开全部
set rst=Server.CreateObject("ADODB.Recordset")
sql="select * from test1"
set rs=conn.execute(sql)
这个是不需要的
看看你的日期格式对否,是否有允许空字符串!
sql="select * from test1"
set rs=conn.execute(sql)
这个是不需要的
看看你的日期格式对否,是否有允许空字符串!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
cn2=" ' "&a1&" ',' "&a2&" ',' "&a3&" ',' "&a4&" ',' "&a5&" ',' "&a5&" ' "
改成
cn2=" #"&a1&"#,'"&a2&"','"&a3&"','"&a4&"','"&a5&"','"&a5&"' "
原因1:ACCESS中日期要用#括起来;
原因2:单引号前后都多了个空格。
改成
cn2=" #"&a1&"#,'"&a2&"','"&a3&"','"&a4&"','"&a5&"','"&a5&"' "
原因1:ACCESS中日期要用#括起来;
原因2:单引号前后都多了个空格。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不是代码问题,是你的系统IIS没有配置好
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询