刚学写ASP就遇到这样的问题了，本机调试的时候这些语句不能写数据库。是，如果进到添加的那一页就先检查看有没有登陆过，如果没有，就检查他在添加那页的帐号密码是否正确，如果正确就写数据库，不正确就返回，如果有登陆过那就直接写数据库，但是写出来却不是我想的那样的！谁能帮我看看，感激不尽。。。<!--#include file="../conn/conn.asp" --><!--#include file="../conn/md5.asp" --><%dim rs,sqlif trim(request.form("content"))="" thencall ShowErrer("日记内容不能为空")end ifif session("admin")="" thencall cklogin()elsecall add()end if%><% sub cklogin()dim sqldim rsdim usernamedim passwordusername=replace(trim(request.form("username")),"'","")password=md5(md5(replace(trim(Request.form("password")),"'","")))set rs=server.createobject("adodb.recordset")sql="select * from config where username='"&username&"' and password='"&password&"'"rs.open sql,conn,1,1if not(rs.bof and rs.eof) thenif password=rs("password") and username=rs("username") thensession("admin")=rs("username")call add()elsecall ShowErrer("用户名或密码错误!")Response.Redirect "../login.asp"end ifelsecall ShowErrer("无记录!)Response.Redirect "../login.asp"end ifrs.closeconn.closeset rs=nothingset conn=nothingend sub%><% sub add()set rs=server.createobject("adodb.recordset")sql="select * from diary"rs.open sql,conn,1,3rs.addnewrs("xinqing")=request.form("xingqing")rs("Content")=request.form("content")rs("Time")=date()rs.updatecall ShowErrer("添加成功！")end sub%>
參考答案:更新数据库时open的参数要用1,3
你的数据库是MS SQL还是ACCESS？前者看看用户名是否有更新的权限。后者的话看看mdb文件本身是不是设置成只读了，以及WEB用户对该文件的访问权限。
