/wsj/Manage/Main.asp
https://github.com/hare1987/kaidun180 · ASP · 63 lines · 61 code · 2 blank · 0 comment · 0 complexity · 28b7dd20e7159a0a50151127d30962ae MD5 · raw file
- <!-- #include file="Include/Chk.asp" -->
- <!-- #include file="Include/Login_Conn.asp" -->
- <%
- set rs=server.createobject("adodb.recordset")
- %>
- <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
- <html xmlns="http://www.w3.org/1999/xhtml">
- <head>
- <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
- <title></title>
- <link href="Images/font.css" rel="stylesheet" type="text/css" />
- <style type="text/css">
- <!--
- .STYLE3 {font-size: 12px; color: #FF0000;}
- -->
- </style>
- </head>
-
- <body>
- <div align="center">
- <table width="100%" border="0" cellspacing="2" cellpadding="2">
- <tr>
- <td height="30" colspan="2" class="input1"><div align="center">£ÛÏà¹ØÐÅÏ¢£Ý</div></td>
- </tr>
-
- <tr>
- <td height="30" colspan="2" align="center" valign="middle" bgcolor="#efefef">·þÎñÆ÷ÐÅÏ¢</td>
- </tr>
- <tr>
- <td height="30" colspan="2" align="center" valign="middle" bgcolor="#efefef"><%=Session("flag")%>
- £º<%=Session("Admin")%>£¬ÄúºÃ£¡½ñÌìÊÇ <%=year(date())&" Äê "&month(date())&" Ô "&day(date()) & " ÈÕ "& weekdayname(weekday(date()))%> </td>
- </tr>
- <tr>
- <td width="166" height="30" align="right" valign="middle" bgcolor="#efefef">·þÎñÆ÷IP£º</td>
- <td width="795" height="30" align="left" valign="middle" bgcolor="#efefef"><%=Request.ServerVariables("LOCAL_ADDR")%></td>
- </tr>
- <tr>
- <td height="30" align="right" valign="middle" bgcolor="#efefef">IIS°æ±¾£º<br /></td>
- <td height="30" align="left" valign="middle" bgcolor="#efefef"><%=Request.ServerVariables("SERVER_SOFTWARE")%></td>
- </tr>
- <tr>
- <td height="30" align="right" valign="middle" bgcolor="#efefef">·þÎñÆ÷²Ù×÷ϵͳ£º</td>
- <td height="30" align="left" valign="middle" bgcolor="#efefef"><%=Request.ServerVariables("OS")%></td>
- </tr>
- <tr>
- <td height="30" align="right" valign="middle" bgcolor="#efefef">ÍøÕ¾Õ¼Óÿռ䣺</td>
- <td height="30" align="left" valign="middle" bgcolor="#efefef"><%
- set fso = server.CreateObject("Scripting.FileSystemObject")
- Path = server.MapPath("./")
- set Dir = fso.GetFolder(Path)
- Response.Write (int((Dir.Size/1048576)*1000)/1000 & " MB")
- %> </td>
- </tr>
- <tr>
- <td height="30" colspan="2" align="center" valign="middle" bgcolor="#efefef" class="input1">°æÈ¨ËùÓС¡©¡¡</td>
- </tr>
- </table>
- </div>
- </body>
- </html>
- <%
- Set rs=Nothing
- %>