***************************************
*动网论坛 VIP插件第二版(完善版)for dv6.0
*
*程序:Asilas
*
*版权:Asilas 虫虫论坛
*
*主页:www.asilas.net.tf
*
*EMAIL: asilas@hotmail.com
*
****************************************
程序说明:
主要包括:
VIP插件第二版(完全版);后台数据库管理插件for 6.0 final
安装使用方法:
1、将所有文件和文件夹全部考到您动网的根目录下
2、用记事本打开 admin_index.asp进行如下的修改
<%
REM 管理栏目设置
dim menu(8,10)
menu(0,0)="常规设置"
……
menu(8,0)="项目管理"
menu(8,1)="<a href=admin_vip.asp target=main>VIP管理</a>"
menu(8,2)="<a href=admin_down_manage.asp target=main>下载中心管理</a>"
menu(8,3)="<a href=admin_connsql.asp target=main>数据库管理</a>"
%>
3、在前台首页加上一个链接,相关链接vip.asp上
4、数据库升级方法有两种,请自行选择
数据库升级的方法一,在user表中增加 vip字段,字段属性为数字。将vip.mdb中的vip表导入您的主数据库中
数据库升级的方法二,前面已经安装了数据库后台管理,您可以输入下面的语句对您的论坛进行升级
alter table [user] add vip int default 0
CREATE TABLE vip(wealth int,usercp int,userep int,power int,article int)
INSERT INTO vip(wealth,usercp,userep,power,article) VALUES (0,0,0,0,0)
这样数据库就完成了升级
5、进入后台管理,进入论坛VIP管理页面,修改其中的VIP申请条件相关值。
6、在list.asp,dispbbs.asp,ANNOUNCE.ASP,vote.asp中找到如下代码
if cint(Board_Setting(1))=1 then
if Cint(GroupSetting(37))=0 then
Errmsg=ErrMsg+"<Br>"+"<li>您没有权限进入隐含论坛!"
founderr=true
end if
end if
这它的后面加上:
'###################特殊版面修改开始(asilas制作)##################
if cint(Board_Setting(51))=1 then
if not founduser then
Errmsg=Errmsg+"<br>"+"<li>本论坛为特殊论坛,请<a href=login.asp>登陆</a>并确认您的用户名已经得到管理员的认证后进入。"
founderr=true
else
if chkviplogin(membername)=false then
Errmsg=Errmsg+"<br>"+"<li>本论坛版面为<font color=red>VIP会员专用版面</font>,请确认您的属性是否符合。"
founderr=true
end if
end if
end if
'####################特殊版面修改结束(asilas制作)#################
注意:您最好在版面的介绍中注明此版为VIP版:)不然用户怎么知道哪个版面是什么呢:)
如果有问题请去虫虫论坛
www.asilas.net.tf
vip会员插件 for dvbbs 6.0
需积分: 50 2 浏览量
2005-12-27
09:38:51
上传
评论
收藏 44KB RAR 举报
普通网友
- 粉丝: 882
- 资源: 2万+