如何将DW中不同内容保存到EXCEL不同的SHEET当中？（原创）

OLEObject  excelapp 
excelapp  =  CREATE  OLEObject 
IF excelapp.ConnectToNewObject("excel.application") <> 0 THEN
   messageBox('OLE错误','OLE无法连接!请检查您的EXCEL是否正确安装！')
 return
END IF
excelapp.Workbooks.Add
excelapp.DisplayAlerts = FALSE
excelapp.activeworkbook.worksheets[1].cells(1,1).value = "这是第一张SHEET"
excelapp.activeworkbook.worksheets[2].cells(1,1).value = "这是第二张SHEET"
excelapp.activeworkbook.worksheets[3].cells(1,1).value = "这是第三张SHEET"
//通过指定worksheets[1]中的参数1、2、3来设定到不同的sheet即可
excelapp.activeworkbook.saveas("c:/multisheet.xls",39)
excelapp.activeworkbook.close()
excelapp.quit()
excelapp.disconnectobject()
DESTROY  excelapp 
补充：如果想要添加一个SHEET，可以通过：
ExcelServer.Application.ActiveWorkbook.Worksheets.add() //此处添加一个SHEET