书签 分享 收藏 举报 版权申诉 / 17

类型asp讲义23.docx

  • 文档编号:8672706
  • 上传时间:2023-02-01
  • 格式:DOCX
  • 页数:17
  • 大小:18.86KB

添加

<%

setrs=server.CreateObject("adodb.recordset")

sql="select*fromnews_users"

rs.opensql,conn,1,1

ifnotrs.bofandnotrs.eofthen

fori=1tors.recordcount

%>

 <%=i%>

id=<%=rs("id")%>"> <%=rs("uname")%>

 <%=rs("uid")%>

<%

rs.movenext

next

endif

rs.close

setrs=nothing

%>

B、添加管理员的页面:

user_add.asp

要点:

a、定义函数以及按钮超链接:

--

functionMM_goToURL(){//v3.0

vari,args=MM_goToURL.arguments;document.MM_returnValue=false;

for(i=0;i<(args.length-1);i+=2)eval(args[i]+".location='"+args[i+1]+"'");

}

……

onClick="MM_goToURL('parent','users.asp');returndocument.MM_returnValue"value="返回

b、输入完整性检测函数functionSubmitOk()

c、用户信息和用户权限的表单变量提交到user_sql.asp

action="user_sql.asp"

d、复选框的用法:

选中的提交,不选的不提交,提交的变量值为value="1":

e、含有一个提交到user_sql.asp决定是添加(add)还是修改(update)用户的特征值的隐含域(非常重要)

<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>

--#includefile="../common/connection.asp"-->

--#includefile="../common/check.txt"-->

<%

Calladmincheck

%>

后台管理

--

functionMM_goToURL(){//v3.0

vari,args=MM_goToURL.arguments;document.MM_returnValue=false;

for(i=0;i<(args.length-1);i+=2)eval(args[i]+".location='"+args[i+1]+"'");

}

//-->

--

.样式1{color:

#FF0000}

-->

functionSubmitOk()

{

varuid=document.form1.uid.value;

varupwd=document.form1.upwd.value;

varuname=document.form1.uname.value;

if(uid=='')

{

alert("请填写用户名!

");

document.form1.uid.focus();

returnfalse;

}

if(upwd=='')

{

alert("请填写密码!

");

document.form1.upwd.focus();

returnfalse;

}

if(uname=='')

{

alert("请填写姓名!

");

document.form1.uname.focus();

returnfalse;

}

if(confirm("确定要添加吗?

"))

{

form1.submit();

}

}

--#includefile="left.asp"-->

 您目前所出的位置>>后台管理>>用户管理

恭喜<%=session("uname")%>登陆成功!

 

用户信息

 

用户名:

密码:

 

姓名:

注销:

 

用户权限

 

用户管理:

新闻发布:

 

公告通知:

 

 

  

C、修改用户信息以及权限页面:

user_update.asp

要点:

a、从users.asp中获取id,从而查询到相应的管理员的信息:

id=request.QueryString("id")

b、获取并显示管理员已有的各项信息:

链接数据库、用查询语句找到与id相符合的纪录,在表格的相应位置显示:

<%=uid%><%=upwd%><%=uname%>

c、获取并显示管理员已有的各项权限:

>

d、非常重要的两个隐藏域:

为的是提交给"user_sql.asp"时

">(修改哪一条)

(是修改还是增加,在这里是,意味着是修改)

<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>

--#includefile="../common/connection.asp"-->

--#includefile="../common/check.txt"-->

<%

Calladmincheck

%>

<%

dimid,uid,upwd,uname,zx

id=request.QueryString("id")

setrs=server.CreateObject("adodb.recordset")

sql="select*fromnews_userswhereid="&id

rs.opensql,conn,1,1

ifnotrs.bofandnotrs.eofthen

uid=rs("uid")

upwd=rs("upwd")

uname=rs("uname")

zx=rs("zx")

yhgl=rs("yhgl")

xwfb=rs("xwfb")

ggtz=rs("ggtz")

endif

rs.close

setrs=nothing

%>

后台管理

--

functionMM_goToURL(){//v3.0

vari,args=MM_goToURL.arguments;document.MM_returnValue=false;

for(i=0;i<(args.length-1);i+=2)eval(args[i]+".location='"+args[i+1]+"'");

}

//-->

--

.样式1{color:

#FF0000}

.样式2{color:

#000000}

-->

functionSubmitOk()

{

varuid=document.form1.uid.value;

varupwd=document.form1.upwd.value;

varuname=document.form1.uname.value;

if(uid=='')

{

alert("请填写用户名!

");

document.form1.uid.focus();

returnfalse;

}

if(upwd=='')

{

alert("请填写密码!

");

document.form1.upwd.focus();

returnfalse;

}

if(uname=='')

{

alert("请填写姓名!

");

document.form1.uname.focus();

returnfalse;

}

if(confirm("确定要添加吗?

"))

{

form1.submit();

}

}

--#includefile="left.asp"-->

 您目前所出的位置>>后台管理>>用户管理>>修改

恭喜<%=session("uname")%>登陆成功!

举报
举报
版权申诉
版权申诉
word格式文档无特别注明外均可编辑修改;预览文档经过压缩,下载后原文更清晰! 立即下载
配套讲稿:

如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

特殊限制:

部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

关 键  词:
asp 讲义 23
提示  冰豆网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:asp讲义23.docx
链接地址:https://www.bdocx.com/doc/8672706.html
相关搜索
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2008-2022 冰点文档网站版权所有

经营许可证编号:鄂ICP备2022015515号-1

收起
展开