📄 admin_l.asp
字号:
<!--#include file="Admin_IsLogin.asp" -->
<!--#include file="dataconn.asp"-->
<%
dim Sql,rs
dim compname
Sql="Select top 1 comname,comtel,comcode from cominfo"
set rs=server.createobject("adodb.recordset")
rs.open Sql,conn,1,1
if not rs.eof then
session("compname")=rs("comName")
session("comcode")=rs("comcode")
end if
%>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0">
<table width="100%" height="18" border="0" cellpadding="0" cellspacing="0" bgcolor="08729c">
<tr>
<td width="781" height="18" align="left" valign="middle" style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=1,startColorStr=#08729c,endColorStr=#3b839f)" style="font-size: 12px" ><div align="right"><font color="#ffffff"><%=session("compname")%>成绩系统</font></div>
</td>
</tr>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -