ASP对Excel的基本操作

  ASP对Excel的基本操作      
  1、                         建立Excel对象      
  set     objExcelApp     =     CreateObject("Excel.Application")      
  objExcelApp.DisplayAlerts     =     false                                                 不显示警告      
  objExcelApp.Application.Visible     =     false                                                 不显示界面      
  2、                         新建Excel文件      
  objExcelApp.WorkBooks.add      
  set     objExcelBook     =     objExcelApp.ActiveWorkBook      
  set     objExcelSheets     =     objExcelBook.Worksheets      
  set     objExcelSheet     =     objExcelBook.Sheets(1)      
  3、                         读取已有Excel文件      
  strAddr     =     Server.MapPath(".")      
  objExcelApp.WorkBooks.Open(strAddr     &     "\Templet\Table.xls")      
  set     objExcelBook     =     objExcelApp.ActiveWorkBook      
  set     objExcelSheets     =     objExcelBook.Worksheets      
  set     objExcelSheet     =     objExcelBook.Sheets(1)      
  4、                         另存Excel文件      
  objExcelBook.SaveAs     strAddr     &     "\Temp\Table.xls"      
  5、                         保存Excel文件      
  objExcelBook.Save                                                 （笔者测试时保存成功，页面报错。）      
  6、                         退出Excel操作      
  objExcelApp.Quit                         一定要退出      
  set     objExcelApp     =     Nothing