asp数据导出
我的代码:
<body>
<%
%>
<table cellPadding=0 cellSpacing=0 align=center width=100%>
<tr>
<th width="100%" style="text-align:center;">日志列表</th>
</tr>
</table>
<table width="100%" cellpadding="0" cellspacing="0">
<TR>
<TD width="*">
<%
if session("flag") then
%>
搜索用户:
<select name="loginID">
<option value="">日志检索</option>
<%
sql="select * from [user] where loginID<>'admin' order by id"
set rs=conn.execute(sql)
while not rs.eof
%>
<option value="<%=rs("loginID")%>"<%if rs("loginID")=request.QueryString("loginID") then%> selected<%end if%>><%=rs("username")%></option>
<%
rs.movenext
wend
rs.close
%>
</SELECT>
搜索机房:
<select name="home">
<option value="">机房检索</option>
<%
sql="select distinct home from [summary]"
set rs=conn.execute(sql)
while not rs.eof
%>
<option value="<%=rs("home")%>"<%if rs("home")=request.QueryString("home") then%> selected<%end if%>><%=rs("home")%></option>
<%
rs.movenext
wend
rs.close
%>
</SELECT>
<%end if%>
日期:从
<input name="startDate" type="text" id="startDate" size="10" onClick="javascript:ShowCalendar('startDate')" value="<%=request.QueryString("startDate")%>"> <img style="cursor:hand;" src="images/date1.jpg" onClick="javascript:ShowCalendar('startDate')">
到
<input name="endDate" type="text" id="endDate" size="10" onClick="javascript:ShowCalendar('endDate')" value="<%=request.QueryString("endDate")%>"> <img style="cursor:hand;" src="images/date2.jpg" onClick="javascript:ShowCalendar('endDate')">
<input name="button" type="submit" class="button" id="button" onClick="location.href='worklog.asp?startDate='+document.all.startDate.value+'&endDate='+document.all.endDate.value<%if session("flag") then%>+'&loginID='+document.all.loginID.options[document.all.loginID.selectedIndex].value+'&home='+document.all.home.options[document.all.home.selectedIndex].value<%end if%>" value="搜索"></TD>
</TR>
</table>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" style="word-break:break-all" >
<tr align=center>
<td>标题</td>
<td>所属机房</td>
<td>真实姓名</td>
<td>添加时间</td>
<td>提交IP</td>
<td>是否审核</td>
<td>审核日期</td>
<td>操作</td>
</tr>
&l