[心缘地方]同学录 |
首页 | 功能说明 | 站长通知 | 最近更新 | 编码查看转换 | 代码下载 | 常见问题及讨论 | 《深入解析ASP核心技术》 | 王小鸭自动发工资条VBA版 |
发表人 | 主题:请求支援~~ |
魔幻屋 身份:user 发帖:36 登陆次数:24 |
1F
发表于 2005/8/11 17:50:03
站长,不好意思又麻烦你。有些留言很重要,需加精或置顶 不知能否编个程序???? |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
2F
发表于 2005/8/12 8:46:58
班级留言?这个没想过,你自己加下吧,我们现在有项目,忙呀。 =============== 留言表加个子段就行了,比如Y就是置顶,N就不置顶。 Update TBL_msg set xx=''Y'' where msgID=指定ID 就行了。 |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
3F
发表于 2005/8/12 8:56:38
给你写一段吧: ================================ <%@ CODEPAGE="936"%> <!--#include File="session.asp" --> <!--#include File="conn.asp" --> <% if session("userLevel")<>"admin" then call showMsg("对不起,你无权进入此页面!") end if msgID=Trim(Request("msgID")) if msgID="" or NOT IsNumeric(msgID) then call showMsg("参数错误。") end if sql="update TBL_Msg set isTop=''Y'' where msgID="&msgID conn.execute sql call closeConn() response.redirect "msg_index.asp" ====================================================== 把上边的代码保存为admin_msgTop.asp, 然后msg_index.asp里,查找“<HR align="center" size="1" noshade color="#CC3333">”,在他前面加: <%if session("userLevel")="admin" then%> <a href="admin_msgTop.asp?msgID=<%=rs("msgID")%>">置顶</a> <%end if%> =============================== 最后数据库的TBL_msg加个子段,isTop,文本型,长度1。 完了。 |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
4F
发表于 2005/8/12 8:59:09
可能还需要取消置顶,稍微麻烦些。 或者给admin_msgTop.asp多传一个参数,作为置顶或取消置顶的标志。 或者在admin_msgTop.asp里查询msgID的isTop,update成相反的。 你自己来写吧…… 上边的我没有试,有问题再提吧。 |
ywd 身份:user 发帖:8 登陆次数:0 |
5F
发表于 2006/1/6 21:54:26
老大 最后数据库的TBL_msg加个子段,isTop,文本型,长度1。 这个怎么弄啊? 我怎么找不到tbl_msg 这个文件啊? |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
6F
发表于 2006/1/7 14:27:04
Data目录下,有个mdb文件(如果后缀是asp,改成mdb),打开,里面有个表,叫TBL_Msg, 设计视图,添加个字段就行了。 |
ywd 身份:user 发帖:8 登陆次数:0 |
7F
发表于 2006/1/7 17:37:19
老大回复真及时啊! 不过,我的Data目录只有一个abcd.asp文件,奇怪了 但是我的所有代码都是在这里下载的啊! 麻烦老大再帮我看看。谢谢了 |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
8F
发表于 2006/1/7 17:56:46
恩,这个文件就是,把它改名为abcd.mdb就能打开了。 添加完字段后,再把名字改回去。 |
ywd 身份:user 发帖:8 登陆次数:0 |
9F
发表于 2006/1/9 20:02:37
已经安装老大的方法做了,也有了置顶的按键,但是按了以后显示: 无法显示网页 您要访问的网页有问题,无法显示。 唉,可能是我比较笨吧。 老大能不能编译好给我下载?把置顶.加精和取消置顶都加上去? |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
10F
发表于 2006/1/10 10:32:27
你已经参照3楼的代码,把那段保存为admin_msgTop.asp了吧。 sql="update TBL_Msg set isTop=''Y'' where msgID="&msgID 这句的isTop="Y" 两边应该只有一个单引号,这里帖的时候被替换了,所以不对。 你改成一个单引号就对了。 |
嘎嘎,是我 身份:admin 发帖:1438 登陆次数:3287 |
11F
发表于 2006/1/10 10:36:02
取消置顶,一样,update成N就行了。 加精和置顶一个原理,再加一个字段就好了。 =================== 晕,这是留言本,又不是论坛,还要加入精华,呵呵,你真能搞。 |
CopyRight © 心缘地方 2005-2999. All Rights Reserved |