ホーム>ネットワークプログラミングチュートリアル>ASP チュートリアル

ASPから出力Excelファイルインスタンスの使用の説明

著者：Eve Cole 更新時間：2025-02-25 00:48:02

この記事の主な内容は、ASPからExcelファイルの例を使用することです。

ASPでExcelを使用する1つの方法は、Excelファイルをデータベースとしてリンクすることであり、操作はアクセスデータベース操作に似ています。固定形式の場合、この形式には、複雑なセルの合併、境界線のスタイル、パターン、セル間の式などが含まれています。 、保存、出力...

ここで説明した方法は、Excelオブジェクトを直接作成することです。これは、Excelドキュメントでさまざまな操作をバックグラウンドでより便利に実行できます。

サーバー側は、comコンポーネントの操作権限を設定する必要があります。コマンドラインでDComCNFGを入力し、Microsoft Excelを選択し、[すべての単一]オプションをすべて[すべて]を選択します。保存後にサーバーを再起動します。

それは非常に重要です。

ただし、この方法は、実際の操作にもあり、同じファイルが実行されている場合、その場所はまだありません適切にセットアップされていません。

さらに、上記の記事の例のコード形式はそれほど完全ではなく、コードが不正確である場合、ラインの破損とスペースの多くが不正確です。調査して修正すると、変更されたコードが次のようになりました（チャートが削除された部分が削除されました）。

プログラムコード：

  1. <％
  2. onerrorresumenext
  3. straddr = server.mappath（。）
  4. setobjexcelApp = createObject（excel.application）
  5. objexcelapp.displayalerts = false
  6. objexcelapp.application.visible = false
  7. objexcelapp.workbooks.open（straddr＆/templet/null.xls）
  8. setobjexcelbook = objexcelapp.activeworkbook
  9. setobjexcelsheets = objexcelbook.worksheets
  10. setobjexcelsheet = objexcelbook.sheets（1）
  12. objexcelsheet.range（b2：k2）.value = array（week1、week2、week3、week4、week5、week6、week7）
  13. objexcelsheet.range（b3：k3）.value = array（67,87,5,7,45,45,54,54,10）
  14. objexcelsheet.range（b4：k4）.value = array（10,10,8,33,37,50,54,10,10）
  15. objexcelsheet.range（b5：k5）.value = array（23,3,86,64,60,18,5,1,36,80）
  16. objexcelsheet.cells（3,1）.value = internetExplorer
  17. objexcelsheet.cells（4,1）.value = netscape
  18. objexcelsheet.cells（5,1）.value =その他
  19. objexcelsheet.range（b2：k5）.select
  21. Saveas（straddr＆/temp/excel.xls）
  22. objexcelapp.quit
  23. setobjexcelApp = Nothing
  24. ％>
  25. <！doctypehtmlpublic - // w3c // dtdhtml4.0transitional // en>
  26. <html>
  27. <head>
  28. <title> newDocument </title>
  29. <metaname = generatorContent = microsoftfrontpage5.0>
  30. <Metaname = authorContent =>
  31. <metaname = keywordscontent =>
  32. <Metaname = DescriptionContent =>
  33. </head>
  34. <body>
  35. </body>
  36. </html>

Excelファイルを操作した後、ファイルを出力する必要がありますIEで直接開くには、ExcelファイルをFSOでロードしてからIEに出力しないでください。

プログラムコード：

  1. <％
  3. dimfso、fileext、strfilepath、mime
  4. strfilepath = f：/aspxuexi.doc
  5. setFSO = server.createObject（scripting.filesystemObject）
  6. fileext = fso.getExtensionName（strfilepath）
  7. setfso =何もない
  9. SelectCaseFileExt
  10. Casedoc
  11. mime = application/msword
  12. casexls
  13. mime = application/msexcel
  14. EndSelect
  16. CallOutput（strfilepath、mime）
  18. '############################################################################## #####
  19. functionoutput（strfilepath、mime）
  20. Response.ContentType = MIME
  21. ConstadTypebinary = 1
  22. setobjstream = server.createobject（adodb.stream）
  23. objstream.open
  24. objstream.type = adtypebinary
  25. objstream.loadfromfilestrfilepath
  26. respons.binarywriteobjstream.read
  27. objstream.close
  28. setobjstream =何もない
  29. エンド機能
  30. '############################################################################## #####
  31. ％>

実際のアプリケーションでは、サーバーがExcelまたはAccessプログラムを実行している場合、クライアントはExcel.Applicationオブジェクトの確立を別の場合に提出します。 。

私たちの部門の内部ネットワークに関連する例がありますローカルエリアネットワークで実行されるクライアントIEセキュリティレベルは、あなたが低く設定して、関連するActiveXの実行を許可することができます（つまり、IEツールオプションで許可するあらゆる種類のセキュリティ関連のものを設定し、どの特定のアイテムがそうではないか調査されていない場合でも、警告ウィンドウをポップアップしますか？

実装されたコードは前のログに似ており、最も単純なログは次のとおりです。

プログラムコード：

  1. <scriptlanguage = vbscript>
  3. setobjexcelApp = createObject（excel.application）
  4. objexcelapp.displayalerts = true
  6. objexcelapp.workbooks.open（http://xxx.xxx.xxx/xxx.xls）
  7. '完全なネットワークアドレスを備えたXLSファイル、このファイルはフォーマットおよび印刷され、サーバーに保存されています
  8. setobjexcelbook = objexcelapp.activeworkbook
  9. setobjexcelsheets = objexcelbook.worksheets
  10. setobjexcelsheet = objexcelbook.sheets（1）
  11. '====データベースからデータが抽出されている場合、これらのステートメントをバックグラウンドプログラムで生成でき、ASPの列を示します。
  12. '例：respons.writeobjexcelsheet.range（b2）.value =＆rs（xxx）＆
  13. 'またはobjexcelsheet.range（b2）.value = <％= rs（xxx）％>
  15. objexcelsheet.range（b2：k2）.value = array（week1、week2、week3、week4、week5、week6、week7）
  16. objexcelsheet.range（b3：k3）.value = array（67,87,5,7,45,45,54,54,10）
  17. objexcelsheet.range（b4：k4）.value = array（10,10,8,33,37,50,54,10,10）
  18. objexcelsheet.range（b5：k5）.value = array（23,3,86,64,60,18,5,1,36,80）
  19. objexcelsheet.cells（3,1）.value = internetExplorer
  20. objexcelsheet.cells（4,1）.value = netscape
  21. objexcelsheet.cells（5,1）.value =その他
  22. '=======================
  24. 'objexcelapp.quit
  25. 'setobjexcelApp =何もない
  27. </script>

上記のコードで

  1. 'objexcelapp.quit
  2. 'setobjexcelApp =何もない

キャンセルとして、ここではexpel.applicationを閉じないでください。そうしないと、データが入力された後、クライアントに開かれたExcelファイルを修正または印刷する必要があります。

上記は、ASPから出力Excelファイルを使用するプロセス全体です。

関連記事