| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 400 人关注过本帖
标题:请问怎么加入内容到限制会员查看里面?谢谢!
只看楼主 加入收藏
znmw
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2011-3-6
收藏
 问题点数:0 回复次数:0 
请问怎么加入内容到限制会员查看里面?谢谢!
源代码如下,现在这个代码只限制了数据库里面的Content内容查看,现在我要在限制查看里面加入一些不是数据库里的内容进里面去,如:下载地址<b><font color="#0000FF" size="4"><a href="<%=rs("Downurl")%>"><%=rs("Downtxt")%></a>   请问怎么加进去?谢谢!

                <%
                if rs("yn")=1 then
                Response.Write("<div style=""margin:40px auto;text-align:center;color:#ff0000;"">该软件还没有通过审核</div>")
                end if
               
                if rs("yn")= 0 then
                        If Rs("ReadPower") = "0" then
                            Response.Write(Content)
                        Else
                            If Rs("ReadPower") <> "" then
                                If (Not(Instr(","& Rs("ReadPower") &",",",0,") <> 0 Or Rs("ReadPower") = "0")) and rs("UserName") <> NewName Then
                                    If Instr(","& Rs("ReadPower") &",",","& UserInfo(NewID,0) &",") > 0 Then
                                        Response.Write(Content)
                                    Else
                                        Response.Write("<div style=""font-size:12px;color:#ff0000;text-align:center;padding:20px;"">对不起,你没有浏览权限,该软件只有<font color=blue>"&ShowlevelOption2(Rs("ReadPower"))&"</font>才能浏览</div>")
                                    End if
                                Else
                                    Response.Write(Content)
                                End if
                            Else
                                If CReadPower = "0" or CReadPower = "" then
                                    Response.Write(Content)
                                Else
                                    If (Not(Instr(","& CReadPower &",",",0,") <> 0 Or CReadPower = "0")) and rs("UserName") <> NewName Then
                                        If Instr(","& CReadPower &",",","& UserInfo(NewID,0) &",") > 0 Then
                                            Response.Write(Content)
                                        Else

                                            Response.Write("<div style=""font-size:12px;color:#ff0000;text-align:center;padding:20px;"">对不起,你没有浏览权限,该软件只有<font color=blue>"&ShowlevelOption2(CReadPower)&"</font>才能浏览</div>")
                                        End if
                                    Else
                                        Response.Write(Content)
                                    End if   
搜索更多相关主题的帖子: color center 源代码 数据库 div 
2012-01-14 23:13
快速回复:请问怎么加入内容到限制会员查看里面?谢谢!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.047734 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved