resultdepart.asp
来自「功能不是很全面,需要自己修改和添加.尊重作者版权,希望大家相互学习,提出意见和建」· ASP 代码 · 共 61 行
ASP
61 行
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
dim id
id=request.QueryString("ID")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from XzDepart where ID='"&id&"'",conn,1,1
%>
<!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" />
<link rel="stylesheet" type="text/css" href="main.css">
<title>部门详细信息页面</title>
<style type="text/css">
<!--
body {
background-image: url(images/5.jpg);
}
.style1 {color: #FF0000}
-->
</style></head>
<body>
<h3>部门详细信息</h3>
<h4 align="right"> <a href="index.asp" class="style1">返回首页</a></h4>
<table width="60%" align="center">
<tr>
<td width="31%"><div align="center">部门名称</div></td>
<td width="69%"><%=rs("XzName")%></td>
</tr>
<tr>
<td><div align="center">部门类型</div></td>
<td><%=rs("DepartTypeName")%></td>
</tr>
<tr>
<td><div align="center">部门简介</div></td>
<td><%=rs("XzJianJie")%></td>
</tr>
<tr>
<td><div align="center">部门负责人</div></td>
<td><%=rs("XzJoin")%></td>
</tr>
<tr>
<td><div align="center">办公地址</div></td>
<td><%=rs("XzAdd")%></td>
</tr>
<tr>
<td><div align="center">联系电话</div></td>
<td><%=rs("XzTel")%></td>
</tr>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?