<%@ CodePage = 936 LCID = 2052 %>
<%
sExport = Request.QueryString("export") ' Load Export Request
If sExport = "excel" Then
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=ZheroseDesign_excel.xls"
End If
%> <!--以下在网页中显示但是，不会出现在输出的电子表格里-->
<% If sExport = "" Then %>
<a href="1.asp?export=excel">将数据生成 Excel 文件（便于编辑打印）</a>
<% End If %> <!--以下是电子表格输出部分-->
<table border="1" bordercolor="#999999" style="border-collapse: collapse">
<tr><td colspan="5">!!!!!!!明细表</td></tr>
<tr><td>姓名</td><td>年龄</td><td>性别</td><td>工作单位</td><td>联系电话</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
</table>
<!--以下在网页中显示但是，不会出现在输出的电子表格里-->
<% If sExport = "" Then %>
<table border="1" bordercolor="#999999" style="border-collapse: collapse">
<tr><td colspan="5">!!!!!!!明细表</td></tr>
<tr><td>姓名</td><td>年龄</td><td>性别</td><td>工作单位</td><td>联系电话</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
<tr><td>一二四</td><td>盎司非得</td><td>额权威人防</td><td>前往</td><td>三等分</td></tr>
</table>
<% End If %>
|