⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index_main.asp

📁 1。超强文件读写锁定
💻 ASP
字号:
<!--#include file="../Manage/mConn.asp"-->
<!--#include file="../Manage/mConst.asp"-->
<%
If Session("SK2B")="" Then
  Response.Redirect "888_Login.Asp"
  Response.End
End If
 Dim Rs6,affice
  Set Rs6=Server.CreateObject("Adodb.RecordSet")
  Set Rs6=Conn.Execute("Select Top 1 affice From m_config")
  If Not Rs6.Eof Then
   affice=Rs6("affice")
  End If
  Set Rs6=Nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE><%if session("SK2F")<>0 then 
response.write "Super Agent Interface"
else
response.write "Agent Interface"
end if%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="../images/control_main.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD>
<BODY text=#000000 vLink=#0000ff aLink=#0000ff bgColor=#ffffff leftMargin=0 topMargin=0>
<%If instr(Session("SK2B"),"hh")>0 and session("SK2F")="0" Then%>
<TABLE width=750 border=0 align="center" cellPadding=0 cellSpacing=1 bgColor=#000088>
  <TBODY>
  <TR>
    <TD align=right width=160 height=25><FONT color=#ffffff  size=2>系统公告:</FONT></TD></TR>
  <TR align=middle bgColor=#ffffff>
    <TD height=25>
<MARQUEE scrollDelay=168><%=affice%></MARQUEE></TD></TR></TBODY></TABLE><%end if%></BODY></HTML>


⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -