打印

求助



 提示:您可以先修改部分代码再运行
现在这段代码是设定为会员才能看到联系方式,游客看不到,现在我想设为只有VIP会员才能看到联系方式,普通会员和游客都看不到,数据了解库里有VIP字段,请问这样如何做呢,谢谢

TOP

去后台问下 懂点皮毛先参考下
加个判断就可以了
复制内容到剪贴板
代码:
<%
dim cls
if session("admin")="" then
    Response.Redirect("admin.asp")    
else
    if session("flag")<>"0" then
    
        cls = Instr(session("flag"), "vip") //判断是否是vip
        if cls <= 0 then
    %>
        <script language="javascript">
            if (confirm("您的操作权限不够,系统拒绝你的访问,请点确定返回,或者点取消退出重新登录"))
              location.href="login.asp";
            else
              location.href="index.asp";
        </script>
    <%
        end if
    end if
end if
%>

TOP