日期:2014-05-17  浏览次数:21086 次

添加记录问题
我添加记录的代码是这样的:
<%   option   explicit%>
<!--#Include   file= "ado.asp "-->
<%

Dim   title,body,name,email                                         '声明变量
title=Request.Form( "title ")                                       '返回留言主题
body=Request.Form( "body ")                                         '返回留言内容
name=Request.Form( "name ")                                         '返回留言人姓名
email=Request.Form( "email ")                                   '返回留言人email
set   db
set   rs=server.CreateObject( "adodb.recordeset ")
sql= "select   *   from   guest "
rs.open   sql,db,1,3
rs.addnew
rs( "email ")=email
rs( "name ")=name
rs( "body ")=body
rs( "title ")=title
rs.update
rs.close
set   rs=nothing
db.close
set   db=nothing                                                  
Response.Redirect   "index.asp "                                   '重定向回首页
%>

数据库ado.asp的代码是这样的:
<%

Dim   db
Set   db=Server.CreateObject( "ADODB.Connection ")
db.Open   "Driver={Microsoft   Access   Driver   (*.mdb)};Dbq= "&Server.Mappath( "database/guest.mdb ")
%>

点提交后,显示网页无法显示,不知道是什么原因阿

------解决方案--------------------
email=Request.Form( "email ") '返回留言人email
set db ' ' ' ' ' ' ' ' ' ' ' ' ' '这个多余 还有ado.asp是在同一个目录下吗?
set rs=server.CreateObject( "adodb.recordeset ")
------解决方案--------------------
调试一下看看吧.这样看不出来问题
------解决方案--------------------
把下面这行去掉。
<% option explicit%>

------解决方案--------------------
当然,也要把
set db
这行也去掉。