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

📄 index_main1.asp

📁 1。超强文件读写锁定
💻 ASP
字号:
<!--#include file="../Manage/mConn.asp"-->
<!--#include file="../Manage/mConst.asp"-->
<%
If Session("SK2sub")="" 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></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>
<TABLE cellSpacing=1 cellPadding=0 width=750 bgColor=#000088 border=0>
  <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></BODY></HTML>


⌨️ 快捷键说明

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