前台代码 <%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>无标题文档</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link href="css.css" rel="stylesheet" type="text/css"> </head> <body> <form name="form1" method="post" action="see.asp"> <table width="769" height="299" border="0" cellpadding="0" cellspacing="0"> <tr> <td align="left" valign="top"><p align="center" class="unnamed1">客户订 购系统</p> <table width="739" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="290"><div align="right"><span class="unnamed1">姓 名 :</span> </div></td> <td width="449"><input name="数据1" type="text" id="数据1" maxlength="8"></td> </tr> </table> <table width="739" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="290" height="22"><div align="right">联系电话: </div> <div align="left"></div> <div align="justify"></div></td> <td width="449"><input name="数据2" type="text" id="数据2" maxlength="13"></td> </tr> </table> <table width="740" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="290"><div align="right">订购日期:</div></td> <td width="450"><input name="数据3" type="text" id="数据3" maxlength="12"></td> </tr> </table> <table width="740" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="290" height="24" align="center" valign="middle"><div align="right"><span class="unnamed1">备 注</span>: </div> <div align="center"></div></td> <td width="450" align="center" valign="middle"><div align="left"> <textarea name="数据4" id="数据4"></textarea> </div></td> </tr> </table> <p align="center"> <input name="submit" type="submit" id="zh2" value="提交"> <input type="reset" name="Submit2" value="重置"> </p> <p> </p> <p> </p> <p align="left" class="unnamed1"> </p> <p></p> <div align="center"></div></td> </tr> </table> </form> </body> </html> 后台代码 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <% @LANGUAGE = VBScript %> <html><title>无标题文档</title> <!--#include file=conn.asp--> <% dim sqlstr sqlstr="select * from 客户统计表" rs.open sqlstr,conn,1,3 rs.addnew 新增加一条记录 rs("数据1")=request.form1(数据1) rs("数据2")=request.form1(数据2) rs("数据3")=request.form1(数据3) rs("数据4")=request.form1(数据4) rs.update 刷新数据库 response.write("<script>alert(""订购成功!"") rs.close conn.close 这几句是用来关闭数据库 set rs=nothing set conn=nothing %> <head> <title>无标题文档</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <body> </body> </html> 数据库连接 <% set conn=server.CreateObject("adodb.connection") connstr="driver={microsoft access driver (个人数据库.mdb)};dbq="&server.MapPath个人数据库.mdb") set rs=server.CreateObject("adodb.recordset")%> 刚学,请大家帮我看看,错在那里,简单的存储数据
他不见鸟,俺看看。 set conn=server.CreateObject("adodb.connection") connstr="driver={microsoft access driver (个人数据库.mdb)};dbq="&server.MapPath("个人数据库.mdb") set rs=server.CreateObject("adodb.recordset") %>
缺少conn.open connstr 这一句改成 connstr="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("个人数据库.mdb")
我把后台改成这样了 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <% @LANGUAGE = VBScript %> <html><title>无标题文档</title> <% dim sqlstr,数据1,数据2,数据3,数据4 set rs=server.CreateObject("adodb.recordset") sqlstr="select * from 客户统计表" rs.open sqlstr,conn,1,3 rs.addnew '新增加一条记录 rs("数据1")=request.form1(数据1) rs("数据2")=request.form1(数据2) rs("数据3")=request.form1(数据3) rs("数据4")=request.form1(数据4) rs.update '刷新数据库 response.write("<script>alert(""订购成功!"") rs.close set rs=nothing set conn=nothing rs.close conn.close set rs=nothing set conn=nothing %> <head> <title>无标题文档</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <body> </body> </html> 数据库连接改为 <% set conn=server.CreateObject("adodb.connection") connstr="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("?????.mdb") set rs=server.CreateObject("adodb.recordset") conn.open connstr %> 结果错误为 技术信息(用于支持人员) 错误类型: Microsoft VBScript 编译器错误 (0x800A0408) 无效字符 /geren/see.asp, line 7, column 11 dim sqlstr,数据1,数据2,数据3,数据4 ----------^ 浏览器类型: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322) 网页: POST 123 ??? /geren/see.asp POST Data: %CA%FD%BE%DD1=%CA%BF%B4%F3%B7%F2%A1%A1&%CA%FD%BE%DD2=1234&%CA%FD%BE%DD3=1978%2F08%2F1&%CA%FD%BE%DD4=sdf&submit=%CC%E1%BD%BB
我把变量名改了`~ 但是又提示出现了新的错误`~ 我把数据1改成a,数据2改成b,数据3改成c,数据4改成D. 但又提示了错误信息: 错误类型: Microsoft VBScript 编译器错误 (0x800A0408) 无效字符 /geren/see.asp, line 10, column 23 rs.open sqlstr,conn,1,3 ----------------------^ 浏览器类型: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322) 网页: POST 57 ??? /geren/see.asp
修改过变量后的页面中,下面这一行呢? <!--#include file=conn.asp--> 好像没见到有。 另外 conn.asp 中的 set rs=server.CreateObject("adodb.recordset") 这一行去掉,因为和后台页面中的重复了。