css.asp

来自「网络程序-学生个人信息管理系统。以学生个人用户实际需要为中心」· ASP 代码 · 共 60 行

<!-------样式配置------------>
<!--#include file="../database/opendb.asp"-->
<%
    	     sql="select content from info where english_name ='bg_pic'"  
             rst.Open sql,my_conn,1,1   
%>

<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-image: url(<%=rst("content")%>);
        background-attachment: fixed;
	scrollbar-base-color: #76B856; 
	scrollbar-arrow-color: #9668bd; 
}

a:link {
	text-decoration: none;
}
a:visited {
	text-decoration: none;
}
a:hover {
	text-decoration: none;
}
a:active {
	text-decoration: none;
}
<%
rst.close
    	     sql="select content from info where english_name = 'style1'" 
             rst.Open sql,my_conn,1,1   
%>
.style1 {<%=rst("content")%>}
<%
rst.close
    	     sql="select content from info where english_name = 'style2'" 
             rst.Open sql,my_conn,1,1   
%>
.style2 {<%=rst("content")%>}
<%
rst.close
    	     sql="select content from info where english_name = 'style3'" 
             rst.Open sql,my_conn,1,1   
%>
.style3 {<%=rst("content")%>}

-->
</style>
<%
rst.close
    	     sql="select content from info where english_name = 'title'" 
             rst.Open sql,my_conn,1,1   
%>
<title><%=rst("content")%></title>
<%rst.close%>