权限问题ASP高手入

<%
set rs=server.creatobject("adodb.recordset")
sql="select * from B"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "无数据"
else
do while not rs.eof
if rs("c")="yes" then
response.write "显示"
else
response.write "不显示"
end if
rs.movenext
loop
end if
%>

<!--#include file=\"连数据库\"-->
<%
if rs(\"c\")<>\"yes\" then
response.write(\"不是管理员\")
else
response.write(\"管理员\")
end if
%>

<%
'连接数据库
set conn=...
...
strsql="select c from B"
set rs=server.createobject("adodb.recordset")
rs.open strsql,conn,1,1
if rs("c")="yes" then
response.write("要显示的内容")
else
response