一、 環(huán)境配置 服務(wù)器端的環(huán)境配置從參考資料上看,微軟系列的配置應該都行,即: 1.Win9x+PWS+Office 2.Win2000 Professional+PWS+Office 3.Win2000 Server+IIS+Office 目前筆者測試成功的環(huán)境是后二者。Office的版本沒(méi)有特殊要求,考慮到客戶(hù)機配置的不確定性和下兼容特性,建議服務(wù)器端Office版本不要太高,以防止客戶(hù)機下載后無(wú)法正確顯示。 服務(wù)器端環(huán)境配置還有兩個(gè)偶然的發(fā)現是: 1. 筆者開(kāi)發(fā)機器上原來(lái)裝有金山的WPS2002,結果Excel對象創(chuàng )建始終出現問(wèn)題,卸載WPS2002后,錯誤消失。 2. 筆者開(kāi)發(fā)ASP代碼喜歡用FrontPage,結果發(fā)現如果FrontPage打開(kāi)(服務(wù)器端),對象創(chuàng )建出現不穩定現象,時(shí)而成功時(shí)而不成功。擴展考察后發(fā)現,Office系列的軟件如果在服務(wù)器端運行,則Excel對象的創(chuàng )建很難成功。 服務(wù)器端還必須要設置的一點(diǎn)是COM組件的操作權限。在命令行鍵入“DCOMCNFG”,則進(jìn)入COM組件配置界面,選擇Microsoft Excel后點(diǎn)擊屬性按鈕,將三個(gè)單選項一律選擇自定義,編輯中將Everyone加入所有權限。保存完畢后重新啟動(dòng)服務(wù)器。 客戶(hù)端的環(huán)境配置沒(méi)發(fā)現什么特別講究的地方,只要裝有Office和IE即可,版本通用的好象都可以。
二、 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 ?。üP者測試時(shí)保存成功,頁(yè)面報錯。) 6、 退出Excel操作 objExcelApp.Quit 一定要退出 set objExcelApp = Nothing
三、 ASP操作Excel生成數據表 1、 在一個(gè)范圍內插入數據 objExcelSheet.Range("B3:k3").Value = Array("67", "87", "5", "9", "7", "45", "45", "54", "54", "10") 2、 在一個(gè)單元格內插入數據 objExcelSheet.Cells(3,1).Value="Internet Explorer" 3、 選中一個(gè)范圍 4、 單元格左邊畫(huà)粗線(xiàn)條 5、 單元格右邊畫(huà)粗線(xiàn)條 6、 單元格上邊畫(huà)粗線(xiàn)條 7、 單元格下邊畫(huà)粗線(xiàn)條 8、 單元格設定背景色 9、 合并單元格 10、 插入行 11、 插入列
四、 ASP操作Excel生成Chart圖 1、 創(chuàng )建Chart圖 objExcelApp.Charts.Add 2、 設定Chart圖種類(lèi) objExcelApp.ActiveChart.ChartType = 97 注:二維折線(xiàn)圖,4;二維餅圖,5;二維柱形圖,51 3、 設定Chart圖標題 objExcelApp.ActiveChart.HasTitle = True objExcelApp.ActiveChart.ChartTitle.Text = "A test Chart" 4、 通過(guò)表格數據設定圖形 objExcelApp.ActiveChart.SetSourceData objExcelSheet.Range("A1:k5"),1 5、 直接設定圖形數據(推薦) objExcelApp.ActiveChart.SeriesCollection.NewSeries objExcelApp.ActiveChart.SeriesCollection(1).Name = "=""333""" objExcelApp.ActiveChart.SeriesCollection(1).Values = "={1,4,5,6,2}" 6、 綁定Chart圖 objExcelApp.ActiveChart.Location 1 7、 顯示數據表 objExcelApp.ActiveChart.HasDataTable = True 8、 顯示圖例 objExcelApp.ActiveChart.DataTable.ShowLegendKey = True
五、 服務(wù)器端Excel文件瀏覽、下載、刪除方案 瀏覽的解決方法很多,“Location.href=”,“Navigate”,“Response.Redirect”都可以實(shí)現,建議用客戶(hù)端的方法,原因是給服務(wù)器更多的時(shí)間生成Excel文件。 下載的實(shí)現要麻煩一些。用網(wǎng)上現成的服務(wù)器端下載組件或自己定制開(kāi)發(fā)一個(gè)組件是比較好的方案。另外一種方法是在客戶(hù)端操作Excel組件,由客戶(hù)端操作服務(wù)器端Excel文件另存至客戶(hù)端。這種方法要求客戶(hù)端開(kāi)放不安全ActiveX控件的操作權限,考慮到通知每個(gè)客戶(hù)將服務(wù)器設置為可信站點(diǎn)的麻煩程度建議還是用第一個(gè)方法比較省事。 刪除方案由三部分組成: A: 同一用戶(hù)生成的Excel文件用同一個(gè)文件名,文件名可用用戶(hù)ID號或SessionID號等可確信不重復字符串組成。這樣新文件生成時(shí)自動(dòng)覆蓋上一文件。 B: 在Global.asa文件中設置Session_onEnd事件激發(fā)時(shí),刪除這個(gè)用戶(hù)的Excel暫存文件。 C: 在Global.asa文件中設置Application_onStart事件激發(fā)時(shí),刪除暫存目錄下的所有文件。 注:建議目錄結構 \Src 代碼目錄 \Templet 模板目錄 \Temp 暫存目錄
六、 附錄 出錯時(shí)Excel出現的死進(jìn)程出現是一件很頭疼的事情。在每個(gè)文件前加上“On Error Resume Next”將有助于改善這種情況,因為它會(huì )不管文件是否產(chǎn)生錯誤都堅持執行到“Application.Quit”,保證每次程序執行完不留下死進(jìn)程。 | |