目錄
一、 環(huán)境配置
二、 asp對(duì)excel的基本操作
三、 asp操作excel生成數(shù)據(jù)表
四、 asp操作excel生成chart圖
五、 服務(wù)器端excel文件瀏覽、下載、刪除方案
六、 附錄
正文
一、 環(huán)境配置
服務(wù)器端的環(huán)境配置從參考資料上看,微軟系列的配置應(yīng)該都行,即:
1.win9x+pws+office
2.win2000 professional+pws+office
3.win2000 server+iis+office
目前筆者測(cè)試成功的環(huán)境是后二者。office的版本沒(méi)有特殊要求,考慮到客戶機(jī)配置的不確定性和下兼容特性,建議服務(wù)器端office版本不要太高,以防止客戶機(jī)下載后無(wú)法正確顯示。
服務(wù)器端環(huán)境配置還有兩個(gè)偶然的發(fā)現(xiàn)是:
1. 筆者開發(fā)機(jī)器上原來(lái)裝有金山的wps2002,結(jié)果excel對(duì)象創(chuàng)建始終出現(xiàn)問(wèn)題,卸載wps2002后,錯(cuò)誤消失。
2. 筆者開發(fā)asp代碼喜歡用frontpage,結(jié)果發(fā)現(xiàn)如果frontpage打開(服務(wù)器端),對(duì)象創(chuàng)建出現(xiàn)不穩(wěn)定現(xiàn)象,時(shí)而成功時(shí)而不成功。擴(kuò)展考察后發(fā)現(xiàn),office系列的軟件如果在服務(wù)器端運(yùn)行,則excel對(duì)象的創(chuàng)建很難成功。
服務(wù)器端還必須要設(shè)置的一點(diǎn)是com組件的操作權(quán)限。在命令行鍵入“dcomcnfg”,則進(jìn)入com組件配置界面,選擇microsoft excel后點(diǎn)擊屬性按鈕,將三個(gè)單選項(xiàng)一律選擇自定義,編輯中將everyone加入所有權(quán)限。保存完畢后重新啟動(dòng)服務(wù)器。
客戶端的環(huán)境配置沒(méi)發(fā)現(xiàn)什么特別講究的地方,只要裝有office和ie即可,版本通用的好象都可以。
二、 asp對(duì)excel的基本操作
1、 建立excel對(duì)象
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 & "templettable.xls")
set objexcelbook = objexcelapp.activeworkbook
set objexcelsheets = objexcelbook.worksheets
set objexcelsheet = objexcelbook.sheets(1)
4、 另存excel文件
objexcelbook.saveas straddr & "temptable.xls"
5、 保存excel文件
objexcelbook.save ?。üP者測(cè)試時(shí)保存成功,頁(yè)面報(bào)錯(cuò)。)
6、 退出excel操作
objexcelapp.quit 一定要退出
set objexcelapp = nothing
三、 asp操作excel生成數(shù)據(jù)表
1、 在一個(gè)范圍內(nèi)插入數(shù)據(jù)
objexcelsheet.range("b3:k3").value = array("67", "87", "5", "9", "7", "45", "45", "54", "54", "10")
2、 在一個(gè)單元格內(nèi)插入數(shù)據(jù)
objexcelsheet.cells(3,1).value="internet explorer"
3、 選中一個(gè)范圍
4、 單元格左邊畫粗線條
5、 單元格右邊畫粗線條
6、 單元格上邊畫粗線條
7、 單元格下邊畫粗線條
8、 單元格設(shè)定背景色
9、 合并單元格
10、 插入行
11、 插入列
四、 asp操作excel生成chart圖
1、 創(chuàng)建chart圖
objexcelapp.charts.add
2、 設(shè)定chart圖種類
objexcelapp.activechart.charttype = 97
注:二維折線圖,4;二維餅圖,5;二維柱形圖,51
3、 設(shè)定chart圖標(biāo)題
objexcelapp.activechart.hastitle = true
objexcelapp.activechart.charttitle.text = "a test chart"
4、 通過(guò)表格數(shù)據(jù)設(shè)定圖形
objexcelapp.activechart.setsourcedata objexcelsheet.range("a1:k5"),1
5、 直接設(shè)定圖形數(shù)據(jù)(推薦)
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、 顯示數(shù)據(jù)表
objexcelapp.activechart.hasdatatable = true
8、 顯示圖例
objexcelapp.activechart.datatable.showlegendkey = true
五、 服務(wù)器端excel文件瀏覽、下載、刪除方案
瀏覽的解決方法很多,“l(fā)ocation.href=”,“navigate”,“response.redirect”都可以實(shí)現(xiàn),建議用客戶端的方法,原因是給服務(wù)器更多的時(shí)間生成excel文件。
下載的實(shí)現(xiàn)要麻煩一些。用網(wǎng)上現(xiàn)成的服務(wù)器端下載組件或自己定制開發(fā)一個(gè)組件是比較好的方案。另外一種方法是在客戶端操作excel組件,由客戶端操作服務(wù)器端excel文件另存至客戶端。這種方法要求客戶端開放不安全activex控件的操作權(quán)限,考慮到通知每個(gè)客戶將服務(wù)器設(shè)置為可信站點(diǎn)的麻煩程度建議還是用第一個(gè)方法比較省事。
刪除方案由三部分組成:
a: 同一用戶生成的excel文件用同一個(gè)文件名,文件名可用用戶id號(hào)或sessionid號(hào)等可確信不重復(fù)字符串組成。這樣新文件生成時(shí)自動(dòng)覆蓋上一文件。
b: 在global.asa文件中設(shè)置session_onend事件激發(fā)時(shí),刪除這個(gè)用戶的excel暫存文件。
c: 在global.asa文件中設(shè)置application_onstart事件激發(fā)時(shí),刪除暫存目錄下的所有文件。
注:建議目錄結(jié)構(gòu) src 代碼目錄 templet 模板目錄 temp 暫存目錄
六、 附錄
出錯(cuò)時(shí)excel出現(xiàn)的死進(jìn)程出現(xiàn)是一件很頭疼的事情。在每個(gè)文件前加上“on error resume next”將有助于改善這種情況,因?yàn)樗鼤?huì)不管文件是否產(chǎn)生錯(cuò)誤都堅(jiān)持執(zhí)行到“application.quit”,保證每次程序執(zhí)行完不留下死進(jìn)程。
該文章在 2010/7/8 0:26:18 編輯過(guò)