<%set rs=server.CreateObject("adodb.recordset")
rs.open "select * from 设置",conn,1,3
for i=1 to rs.recordcount
if rs("项目")="公司名" then
cna=rs("内容")
end if
if rs("项目")="公司版权" then
ban=rs("内容")
end if
if rs("项目")="关键字" then
key=rs("内容")
end if
rs.movenext
if rs.eof then exit for
next
rs.close
set rs=nothing
%>
<%=cna%>