注册 登录
编程论坛 ASP技术论坛

请问怎么加入内容到限制会员查看里面?谢谢!

znmw 发布于 2012-01-14 23:13, 405 次点击
源代码如下,现在这个代码只限制了数据库里面的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   
0 回复
1