asp+ access 表单内容写不进数据库里怎么办 - 编程论坛

#2

guoqingchun2011-04-25 10:20

下面是提交页面：<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>
<form id="form1" name="form1" method="post" action="check.asp">
  <label>
  实验名：
  <input name="exp_title" type="text" id="exp_title" />
  </label>
  <p>
    <label>
    实验人：
    <input name="exp_people" type="text" id="exp_people" />
    </label>
  </p>
  <p>
    <label>
    <input type="submit" name="Submit" value="提交" />
    </label>
  </p>
</form>
</body>
</html>

下面是判断页面：

程序代码：

<%
dim exp_title,exp_people
if request("exp_title")="" then
    response.write "<script language=JavaScript>" & chr(13) & "alert('请输入实验名！');" & "history.back()" & "</script>"
    Response.End
end if
if request("exp_people")="" then
    response.write "<script language=JavaScript>" & chr(13) & "alert('请输入实验人！');" & "history.back()" & "</script>"
    Response.End
end if

exp_title=request("exp_title")
exp_people=request("exp_people")
dim sql
dim rs
dim conn
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("baogao.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="insert into baogao(exp_title,exp_people) values('"&exp_title&"','"&exp_people&"')"
rs.Open sql,conn,3,3
Response.Write "记录添加成功!"
%>

能够插入啊，我把代码和数据库发给你，你自己再试试

只有本站会员才能查看附件，请登录

#3

海的天空2011-04-25 10:49

我试了一下确实可以，但是为什么在我的总程序中不可以

#4

kangli_kl2011-04-26 09:43

1、查一下你数据库文件所在文件夹的写权限是否没有给
2、数据库里的字段名和你程序里的字段名对应不上