UC知道ASP页面可以显示数据库内容,就是无法修改和新增数据库内容,请大哥们帮我看下,谢了!
来源：百度知道 编辑：UC知道 时间：2024/05/21 12:04:14
ASP页面可以显示数据库内容,就是无法修改和新增数据库内容,请大哥们帮我看下,谢了!
代码如下:
<%
dim act,adminname,PassWord,UserType
act=request.QueryString("act")
if(act="add") then
rolename=trim(request.Form("rolename"))
privilege=request.Form("privilege")
'添加到库
set rs=server.createobject("adodb.recordset")
sql="select top 1 * from role where rolename='"&rolename&"' order by id desc "
rs.open sql,conn,3,3
if not rs.eof then
response.Write("<script>alert(""该角色已存在!"");history.back();</script>")
response.End()
else
rs.addnew
rs("rolename")=rolename
rs("privilege")=privilege
rs("moditime")=now
rs.update
response.Write("添加角色成功~!")
response.Write("<br><a href=role_add.asp>返回</a>")
end i
代码如下:
<%
dim act,adminname,PassWord,UserType
act=request.QueryString("act")
if(act="add") then
rolename=trim(request.Form("rolename"))
privilege=request.Form("privilege")
'添加到库
set rs=server.createobject("adodb.recordset")
sql="select top 1 * from role where rolename='"&rolename&"' order by id desc "
rs.open sql,conn,3,3
if not rs.eof then
response.Write("<script>alert(""该角色已存在!"");history.back();</script>")
response.End()
else
rs.addnew
rs("rolename")=rolename
rs("privilege")=privilege
rs("moditime")=now
rs.update
response.Write("添加角色成功~!")
response.Write("<br><a href=role_add.asp>返回</a>")
end i
sql="select top 1 * from role where rolename='"&rolename&"' order by id desc "
我感觉是这句错了
<%
dim 需要输入的项。
例如有***就dim ***
***=trim(requst("***"))
set rs=server.createobject("adodb.recordset")
sql="select * from role"
rs.open sql,conn,3,3
if not rs.eof then
response.Write("<script>alert(""该角色已存在!"");history.back();</script>")
response.End()
else
rs.addnew
rs("***")=***
rs.update
response.Write("添加角色成功~!")
response.Write("<br><a href=role_add.asp>返回</a>")
end if
rs.close
set rs=nothing
%>
先不管程序如何，请确认几步：
1、数据库是不是拥有写入权限
2、帐号everyone是不是拥有写权限