随笔-3  评论-26  文章-41  trackbacks-0
在查询数据页头加上:
<%   
  Response.Buffer   
=   TRUE   
  Response.AddHeader   
"Content-Disposition",   "attachment;   filename=???.xls"   
  Response.contentType
="application/vnd.ms-excel"   
%
>

还可以用js   
  
<!--     
  
function   AutomateExcel(   )     
  
{     
  
//   Start   Excel   and   get   Application   object.     
  var   oXL   =   new   ActiveXObject("Excel.Application");   
  
//   Get   a   new   workbook.   
  var   oWB   =   oXL.Workbooks.Add();   
  
var   oSheet   =   oWB.ActiveSheet;   
  
var   table   =   document.all.outputexcel;   
  
var   hang   =   table.rows.length;   
  
var   lie   =   table.rows(0).cells.length;   
  
//   Add   table   headers   going   cell   by   cell.   
  for   (i=0;i<hang;i++)   
    
{   
      
for   (j=0;j<lie;j++)   
          
{   
            oSheet.Cells(i
+1,j+1).value   =   table.rows(i).cells(j).innerText;   
          }
   
    }
   
  oXL.Visible   
=   true;   
  oXL.UserControl   
=   true;   
  }
   
  
//-->
用一个button激发一个事件弹出一个新页,将检索的sql传人到此页中,(就象又重新检索了一遍)加上这句Response.contentType="application/vnd.ms-excel"
posted on 2007-04-05 12:55 百年 阅读(682) 评论(0)  编辑  收藏 所属分类: Asp Article

只有注册用户登录后才能发表评论。


网站导航: