📄 showserver.asp

📁 个人备忘系统一个不错的备忘软件.专供刚学ASP的人学习. 代码简单易懂 mymanage

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="html.asp"-->
<%
if session("user")="" or session("group")="" then
response.write("<script>alert('您还没有登陆或登陆超时');window.location.href('index.asp')</script>")
response.end
end if
%>
<%
dim typ
typ=request.QueryString("typ")
if typ="" then
response.write("<script>alert('非法提交参数！');window.location.href('addserver.asp')</script>")
response.end
end if
set rs1=server.CreateObject("adodb.recordset")
cmd1="select * from question where id="&typ

rs1.open cmd1,conn,1,3
if rs1.eof then
response.write("<script>alert('无此文章！');window.location.href('addserver.asp')</script>")
response.end
end if
if rs1("type")=5 then
if session("user")="" or session("group")<>1 then
response.write("<script>alert('您没有权限，请与管理员联系');window.location.href('vir.asp')</script>")
response.end
end if
end if 
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>Untitled Document</title>
<style type="text/css">
<!--
.style2 {
	font-size: 12px;
	color: #FFFFFF;
}
.style3 {
	font-size: 14px;
	color: #000000;
}
.style4 {color: #FF0000}
-->
</style>
</head>

<body>
<form id="form1" name="form1" method="post" action="">
  <table width="700" border="0" align="center" bgcolor="#6699cc">
    <tr>
      <td><span class="style2">
        <%
select case rs1("type")
case 1
response.write "WEB服务器"
case 2
response.write  "FTP服务器"
case  3
response.write "Mail服务器"
case 4
response.write  "SQLSERVER服务器"
case 5
response.write "Mysql服务器"
case 6
response.write  "编程文章区"
case 7
response.write  "编程源码区"
case 8
response.write  "网络设备区"
case 9
response.write  "网络问题区"
case 10
response.write  "综合布线区"
end select
%>
        <span class="style4">→</span>
        <% =rs1("title") %>
        <span class="style4">→</span></span><span class="style2">发表于：
        <% =rs1("time") %></span></td>
    </tr>
    <tr bgcolor="#FFFFFF">
      <td><span class="style3">
        <% =ubbcode(rs1("all")) %>
      &nbsp;</span></td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -