📄 company.asp
字号:
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
dim conn
dim rs
set conn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
conn.Open connstring
rs.Open "select * from company",conn,1,1
%>
<html>
<head>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>公司信息</title>
</head>
<script language=javascript>
window.top.frames (1).document.location='../admin/left.asp?type=system';
</script>
<body vlink="#48576C" link="#48576C" alink="#000000" bgcolor="#FFFFFF" topmargin="3">
<table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><strong><font class=title>公司信息</font></strong> <%if rs.EOF then%><a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 150, top=150, menubar=no, location=no, toolbar=no ,width=500, height=420','newcompany.asp');"><img src="../images/button_new.gif" border=0></a><%end if%></td>
</tr>
<tr >
<td height="16" colspan="2" background="../images/title.gif"> </td>
</tr>
<tr>
<td height=4></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#DECFAD">
<tr bgcolor="efefef">
<td align=center>公司</td>
<td align=center>电话</td>
<td align=center>传真</td>
<td align=center>地址</td>
<td align=center>邮编</td>
<td align=center>操作</td>
</tr>
<%do while not rs.EOF%>
<tr bgcolor="#FFFFFF">
<td align=center><%=rs("company")%></a></td>
<td align=center><%=rs("phone")%></td>
<td align=center><%=rs("fax")%></td>
<td align=center><%=rs("address")%></td>
<td align=center><%=rs("zip")%></td>
<td align=center><a href="#">编辑</a></td>
</tr>
<%
rs.MoveNext
loop
rs.Close
set rs=nothing
conn.Close
set conn=nothing
%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -