#12002/11/17 17:34:57
【这个adovbs.inc我已经copy到我的文件夹下面了!这样应该可以include的吧!】
<%
name=request("name")
email=request("email")
subject=request("subject")
memo=request("memo")
if name="" or email="" or subject="" or memo="" then
response.redirect "fail.htm"
response.end
end if
【只要填入的name、email、subject、memo什么的为空,就会跳转到fail.htm】
【但是,如果全填上的话就会说什么“无法显示”,我想这前面肯定没有问题!】
【我用的是win200自带的iis发布网页的!】
dim conn,rs,connstr
connstr="DBQ="+server.mappath("message.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
【这里可能有问题啊!!】
set rs=server.createobject("adodb.recordset")
rs.open "messagedata", conn, adopendynamic, adlockpessimistic
rs.addnew
rs("姓名")=name
rs("email")=email
rs("主题")=subject
rs("留言")=memo
rs.update
conn.close
set conn=nothing
rs.close
set rs=nothing
response.redirect "success.htm"
%>
【哪里有错误呢?】
编辑历史:[这消息被kittyboy编辑过(编辑时间2002-11-17 17:39:03)]