<strike id="3tkic"><sup id="3tkic"></sup></strike>

  1. <ul id="3tkic"></ul>
      <b id="3tkic"><legend id="3tkic"></legend></b>
      <b id="3tkic"><meter id="3tkic"></meter></b>

    • <strike id="3tkic"></strike>

      <blockquote id="3tkic"></blockquote>

    • 亚洲AV无码国产在丝袜线观看_亚洲第一页A∨在线_亚洲国产人成在线观看69网站_无码日韩人妻AV一区免费l

      ASP操作Excel技術(shù)總結(jié)

      2012/10/13 8:48:50   閱讀:3329    發(fā)布者:3329

      目錄
      一、    環(huán)境配置
      二、    asp對Excel的基本操作
      三、    ASP操作Excel生成數(shù)據(jù)表
      四、    ASP操作Excel生成Chart圖
      五、    服務器端Excel文件瀏覽、下載、刪除方案
      六、    附錄

      正文
      一、    環(huán)境配置
      服務器端的環(huán)境配置從參考資料上看,微軟系列的配置應該都行,即:
      1.Win9x+PWS+Office
      2.Win2000 PRofessional+PWS+Office
      3.Win2000 Server+IIS+Office
      目前筆者測試成功的環(huán)境是后二者。Office的版本沒有特殊要求,考慮到客戶機配置的不確定性和下兼容特性,建議服務器端Office版本不要太高,以防止客戶機下載后無法正確顯示。
      服務器端環(huán)境配置還有兩個偶然的發(fā)現(xiàn)是:
      1.    筆者開發(fā)機器上原來裝有金山的wps2002,結(jié)果Excel對象創(chuàng)建始終出現(xiàn)問題,卸載WPS2002后,錯誤消失。
      2.    筆者開發(fā)ASP代碼喜歡用FrontPage,結(jié)果發(fā)現(xiàn)如果FrontPage打開(服務器端),對象創(chuàng)建出現(xiàn)不穩(wěn)定現(xiàn)象,時而成功時而不成功。擴展考察后發(fā)現(xiàn),Office系列的軟件如果在服務器端運行,則Excel對象的創(chuàng)建很難成功。
      服務器端還必須要設(shè)置的一點是COM組件的操作權(quán)限。在命令行鍵入“DCOMCNFG”,則進入COM組件配置界面,選擇Microsoft Excel后點擊屬性按鈕,將三個單選項一律選擇自定義,編輯中將Everyone加入所有權(quán)限。保存完畢后重新啟動服務器。
      客戶端的環(huán)境配置沒發(fā)現(xiàn)什么特別講究的地方,只要裝有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   (筆者測試時保存成功,頁面報錯。)
      6、    退出Excel操作
      objExcelApp.Quit    一定要退出
      set objExcelApp = Nothing

      三、    ASP操作Excel生成數(shù)據(jù)表
      1、    在一個范圍內(nèi)插入數(shù)據(jù)
      objExcelSheet.Range("B3:k3").Value = Array("67", "87", "5", "9", "7", "45", "45", "54", "54", "10")
      2、    在一個單元格內(nèi)插入數(shù)據(jù)
      objExcelSheet.Cells(3,1).Value="Internet Explorer"
      3、    選中一個范圍
      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圖標題
      objExcelApp.ActiveChart.HasTitle = True
      objExcelApp.ActiveChart.ChartTitle.Text = "A test Chart"
      4、    通過表格數(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

      五、    服務器端Excel文件瀏覽、下載、刪除方案
      瀏覽的解決方法很多,“Location.href=”,“Navigate”,“Response.Redirect”都可以實現(xiàn),建議用客戶端的方法,原因是給服務器更多的時間生成Excel文件。
      下載的實現(xiàn)要麻煩一些。用網(wǎng)上現(xiàn)成的服務器端下載組件或自己定制開發(fā)一個組件是比較好的方案。另外一種方法是在客戶端操作Excel組件,由客戶端操作服務器端Excel文件另存至客戶端。這種方法要求客戶端開放不安全ActiveX控件的操作權(quán)限,考慮到通知每個客戶將服務器設(shè)置為可信站點的麻煩程度建議還是用第一個方法比較省事。
      刪除方案由三部分組成:
      A:    同一用戶生成的Excel文件用同一個文件名,文件名可用用戶ID號或sessionID號等可確信不重復字符串組成。這樣新文件生成時自動覆蓋上一文件。
      B:    在Global.asa文件中設(shè)置Session_onEnd事件激發(fā)時,刪除這個用戶的Excel暫存文件。
      C:    在Global.asa文件中設(shè)置Application_onStart事件激發(fā)時,刪除暫存目錄下的所有文件。
      注:建議目錄結(jié)構(gòu) \Src 代碼目錄 \Templet 模板目錄 \Temp 暫存目錄

      六、    附錄
      出錯時Excel出現(xiàn)的死進程出現(xiàn)是一件很頭疼的事情。在每個文件前加上“On Error Resume Next”將有助于改善這種情況,因為它會不管文件是否產(chǎn)生錯誤都堅持執(zhí)行到“Application.Quit”,保證每次程序執(zhí)行完不留下死進程。

      亚洲AV无码国产在丝袜线观看_亚洲第一页A∨在线_亚洲国产人成在线观看69网站_无码日韩人妻AV一区免费l
      <strike id="3tkic"><sup id="3tkic"></sup></strike>

      1. <ul id="3tkic"></ul>
          <b id="3tkic"><legend id="3tkic"></legend></b>
          <b id="3tkic"><meter id="3tkic"></meter></b>

        • <strike id="3tkic"></strike>

          <blockquote id="3tkic"></blockquote>

        • 乐安县| 桦川县| 横山县| 灵丘县| 蒲城县| 伊通| 澄迈县| 奈曼旗| 安平县| 江油市| 台中市| 呈贡县| 焉耆| 西宁市| 霍邱县| 方正县| 平远县| 天长市| 青阳县| 旺苍县| 金乡县| 怀仁县| 马关县| 铁力市| 东乡县| 洛南县| 外汇| 黄陵县| 大英县| 安岳县| 溧阳市| 略阳县| 绥德县| 北京市| 海安县| 桂平市| 辽源市| 文成县| 桐梓县| 金平| 巴东县|