main.asp

来自「新闻发布系统」· ASP 代码 · 共 244 行

ASP
244
字号
<!--#include file = "conn.asp"-->
<!--#include file = "Fsmanage/Session.asp"-->
<%
thesoft=Request.ServerVariables("HTTP_USER_AGENT")
if instr(thesoft,"Windows NT 5.0") then
	vOS="Microsoft Windows 2000"
elseif instr(thesoft,"Windows NT 5.2") then
	vOs="Microsoft Windows 2003"
elseif instr(thesoft,"Windows NT 5.1") then
	vOs="Microsoft Windows XP"
elseif instr(thesoft,"Windows NT") then
	vOs="Microsoft Windows NT"
elseif instr(thesoft,"Windows 9") then
	vOs="Microsoft Windows 9x"
elseif instr(thesoft,"unix") or instr(thesoft,"linux") or instr(thesoft,"SunOS") or instr(thesoft,"BSD") then
	vOs="类Unix"
elseif instr(thesoft,"Mac") then
	vOs="Mac"
else
	vOs="其他操作系统"
end if

set rs2=server.CreateObject ("ADODB.RecordSet")
sql2="select * from admin where UserName='"&session("Name")&"' and userpass='"&session("PassWord")&"'"
rs2.Open sql2,conn,1,1
set rs3=server.CreateObject ("ADODB.RecordSet")
sql3="select * from Role where title='"&rs2("art")&"'"
rs3.Open sql3,conn,1,1
%>
<HTML><HEAD><TITLE>Foosun管理 > 登录成功</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE type=text/css>
A:link{COLOR:#000000;TEXT-DECORATION:none}
A:visited{COLOR:#00000C;TEXT-DECORATION:none;TEXT-DECORATION:none}
A:active{COLOR:#009966;TEXT-DECORATION:underline}
A:hover{COLOR:#ff0000;TEXT-DECORATION:underline}
.white_bg {COLOR: #4397C5; FONT-SIZE: 9pt}
.t{LINE-HEIGHT: 1.4}
BODY {
scrollbar-face-color:#55AA64;
scrollbar-highlight-color:#55AA64;
scrollbar-3dlight-color:#55AA64;
scrollbar-darkshadow-color:#85DC98;
scrollbar-shadow-color:#009700;
scrollbar-arrow-color:#ffffff;
scrollbar-track-color:#6BD199;
}
TD,DIV,form ,P,TD,BR{FONT-FAMILY: 宋体; FONT-SIZE: 9pt} 


td{font-size:9pt;LINE-HEIGHT: 18px;COLOR:#000000}
.big {
	font-size: 9pt;
	text-decoration: underline;
}
.Btn
{
	BACKGROUND-COLOR: #E1F4EE;
	BORDER-BOTTOM: buttonface 1px solid;
	BORDER-LEFT: buttonface 1px solid;
	BORDER-RIGHT: buttonface 1px solid;
	BORDER-TOP: buttonface 1px solid;
	HEIGHT: 24px;
	POSITION: absolute;
	TOP: 70px;
	WIDTH: 32px;
	left: 49px;

}
.Ico
{
LEFT: 2px;
POSITION: absolute;
TOP: 2px
}
.small1 {
	font-size: 12px;
}
.small2 {
	font-size: 10px;
}
.ensm {
	font-family: "Verdana", "Arial", "Helvetica", "sans-serif";
	font-size: 9px;
}
.chang {
	font-size: 9pt;
	line-height: 22px;
}
.Name {
	font-size:10px;
}

.small2 {
	font-size: 10px;
}
.bigcss {
	font-size: 9pt;
	line-height: 22px;
}
.bigcss1 {
	font-size: 9pt;
	line-height: 22px;
}
select{ font-family: 宋体; font-size: 12px; font-weight: normal; background-color: #ffffff; color: #4A4A4A }
textarea, select {border-width: 1; border-color: #666666; background-color: #ffffff; font-family: 宋体;
font-size: 9pt; font-style: bold;}
.Anbut {
	BACKGROUND-COLOR: #C9EBD3; BORDER-BOTTOM: #004F00 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #004F00 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #004F00; FONT-SIZE: 9pt; HEIGHT: 18px; WIDTH: 40px
}
.Anbut1 {
	BACKGROUND-COLOR: #C9EBD3; BORDER-BOTTOM: #004F00 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #004F00 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #004F00; FONT-SIZE: 9pt; HEIGHT: 20px; WIDTH: 55px
}
.Anbut2 {
	BACKGROUND-COLOR: #C9EBD3; BORDER-BOTTOM: #004F00 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #004F00 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #004F00; FONT-SIZE: 9pt; HEIGHT: 18px; WIDTH: 85px
}
.Anbutc {
	BACKGROUND-COLOR: #C9EBD3; BORDER-BOTTOM: #004F00 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #004F00 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #004F00; FONT-SIZE: 9pt; HEIGHT: 18px;
}

</STYLE>

<META content="MSHTML 5.00.3813.800" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=10 MARGINHEIGHT="0" MARGINWIDTH="0">
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=600>
  <TBODY>
  <TR>
      <TD width=207><img src="Pic/fosunlogon.gif" width="126" height="37"></TD>
    <TD width=11></TD>
    <TD width="537" align=right vAlign=bottom>
      <DIV id=topnav><a href="http://www.foosun.net">产品中心</a> | <a href="http://www.cooin.com" target="_blank">产品演示中心</a> 
          | <a href="http://bbs.cooin.com">论坛支持</a> 
          <%
	  if trim(rs2("art"))<>"" then
	  if instr(1,rs3("Popedom"),"pass",1)<>0 then
	  response.Write"|<a href=FsManage/Admin_Adminu.asp>修改密码</A>"
	  end if
	  end if
	  %>
          | <a href="ManuQu.asp" target="_blank"><font color="#FF0000">投稿</font></a> 
          | <A 
    href="FsManage/Logout.asp">退出</A></DIV></TD></TR>
  <TR bgColor=#000000>
    <TD colSpan=3><IMG height=5 src="pic/topline.gif" 
  width=400></TD></TR></TBODY></TABLE>
<table width="95%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="4"></td>
  </tr>
</table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#339900">
  <tr>
    <td bgcolor="#F7FFF4"> 
      <TABLE width=100% height=150 border=0 align=center cellPadding=0 
cellSpacing=0>
        <TBODY>
          <TR> 
            <TD width=20 vAlign=bottom></TD>
            <TD width=2 vAlign=bottom>&nbsp; </TD>
            <TD height=52 class=p8> <DIV id=memo> 
                <table width="95%" border="0" cellspacing="0" cellpadding="0">
                  <tr> 
                    <td height="4"></td>
                  </tr>
                </table>
                <STRONG><FONT 
      color=#ff0000><%=session("Name")%></FONT></STRONG> 欢迎您来到风讯! <br>
                你的级别:<font color="#FF0000"> 
                <%
	  if rs2("level")=1 then response.Write"一般会员"
	  if rs2("level")=2 then response.Write"高级会员"
	  if rs2("level")=3 then response.Write"认证会员"
	  if rs2("level")=4 then response.Write"VIP会员"
	  if rs2("level")=5 then response.Write"系统管理员"
	  if rs2("level")=6 then response.Write"你已经被锁定"
	  if trim(rs2("art"))<>"" then 
	  response.Write"&nbsp;&nbsp;&nbsp;<b><a href=""Fsmanage/Admin_Manage.asp""><font color=green>进入管理中心</font></a></b>"
	  end if
	  %>
                </font>  <br>
                <%
				if trim(rs2("art"))<>"" then
				response.Write"你的管理角色:<font color=red>"&rs2("art")&"</font>"
				else
				response.write"你没有管理角色"
				end if
				%>
                <br>
                <font color="#CC6600">你的操作系统:<%=vOS%>    你的登陆 I P:<%=request.ServerVariables("Remote_Addr")%></font> 
                <table width="95%" border="0" cellspacing="0" cellpadding="2">
                  <tr> 
                    <td><hr size="1" noshade color=#339900>
                      <strong><a href="Help/FoosunAnnounce/index.htm" target="_blank"><font color="#006600">风讯最新公告</font></a></strong></td>
                  </tr>
                  <tr> 
                    <td><hr size="1" noshade color=#339900> <strong><font color="#FF0000">风讯产品技术支持中心</font></strong></td>
                  </tr>
                  <tr> 
                    <td>官方论坛:BBS.COOIN.COM   BBS.FOOSUN.NET<br>
                      官方演示地址:www.Cooin.com<br>
                      官方产品中心:www.Foosun.net</td>
                  </tr>
                  <tr> 
                    <td>服务电话:028-88882641<br>
                      售后服务Email:Service@Cooin.com<br>
                      技术支持Email:skeen@Cooin.com  skeen@Foosun.net<br>
                      服务OICQ:655071(轻风云) <br>
                      服务MSN:xoooloooy@Hotmail.com </td>
                  </tr>
                </table>
              </DIV>
              <DIV id=memo></DIV></TD>
          </TR>
          <TR>
            <TD vAlign=bottom></TD>
            <TD vAlign=bottom>&nbsp;</TD>
            <TD height=52 class=p8><font color="#FF0000">注意:请在要会员登陆后才能访问的页面中加入代码:</font><br>
              <font face="Verdana, Arial, Helvetica, sans-serif"><span class="small2">&lt;!--#include 
              file = &quot;/CONN.asp&quot;--&gt;<br>
              &lt;!--#include file = &quot;/Fsmanage/Session.asp&quot;--&gt;</span></font><br>
              加入后需要会员登陆才能浏览 </TD>
          </TR>
        </TBODY>
      </TABLE>
    </td>
  </tr>
</table>
<table width="95%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="4"></td>
  </tr>
</table>
<TABLE width=600 border=0 align=center cellPadding=0 cellSpacing=1 bgcolor="#339900">
  <TBODY>
  <TR>
      <TD width="100%" align=middle bgcolor="#D9FFCA" class=p2><FONT 
      color=#000000>四川</FONT><FONT 
      color=#000000>风讯计算机系统有限责任公司版权所有<br>
        </FONT><font color=red>&copy;2002-2004</font> Copyright www.foosun.net 
        ,All Rights Reserved 
    </TR></TBODY></TABLE>
<NOSCRIPT><IMG height=1 src="pic/ping.gif" width=1> 
</NOSCRIPT></BODY></HTML>

⌨️ 快捷键说明

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