📄 tble.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=DataBase/conn.asp-->
<!--#include file=config.asp-->
<%
a=array("联系人姓名",2,3,4,5,6,7,8,9,10,11)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style></head>
<body>
<%response.ContentType="application/vnd.ms-excel"%>
<%
set rs=conn.execute("select LinkmanName,LinkmanDept,LinkmanTel,LinkmanHander,LinkmanEmail from tb_Linkman")
%>
<table width="100" border="1" cellspacing="0">
<tr>
<%
j=2
for i=0 to rs.fields.count-1
%>
<td align="center"><%=a(i)%></td>
<%next%>
</tr>
<%do while not rs.eof%>
<tr>
<%for i=0 to rs.fields.count-1%>
<td align="center"><%=rs(i)%></td>
<%next%>
</tr>
<%
rs.movenext
j=j+1
loop
rs.close
%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -