※ ChatGPTを利用し、要約された質問です（原文：VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行った）
VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行ったときの問題点と解決方法
このQ&Aのポイント
サーバーで直接ＩＥで開くと "検索中のページには問題があるため表示できません。"になる
クライアント側のＩＥで開くと "Microsoft VBScript 実行時エラー エラー '800a0046' ,書き込みできません。: 'CreateObject'になる
サーバーでの正常動作のためには、クライアントＰＣのＩＩＳ環境に移植してＩＥで開き、エラーを回避する必要がある
VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行った
VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行ったところクライアントでのテストは上手くいくのですが、サーバーに移植すると下記問題点が発生し解決できません。お教え下さい・
１）サーバーで直接ＩＥで開くと"検索中のページには問題があるため表示できません。"になる
２）クライアント側のＩＥで開くと"Microsoft VBScript 実行時エラー エラー '800a0046'
",書き込みできません。: 'CreateObject'になる
環境 サーバーwindows 2003 server クライアント windwos XP いずれもIIS
・クライアントＰＣのＩＩＳ環境に移植しクライアントＰＣのＩＥで開くと正常動作
プログラム
<%@ LANGUAGE = VBSCRIPT %>
<html>
<body>
<%
On Error Resume Next
Set objExcelApp = CreateObject("Excel.Application")
If Err <> 0 Then
' エラー処理
response.write "Excelを起動できませんでした"
response.write "エラー:" & Err.Description & ""
Else
On Error Resume Next
'確認ダイアログ非表示
objExcelApp.DisplayAlerts = False
'エクセルのオープン
Set objExcelBook = objExcelApp.Workbooks.Open("C:\Temp\2010.xls",,True)
Set objExcelSheet = objExcelBook.Sheets(1)
Set objExcelSheet = Nothing
objExcelBook.Close
Set objExcelBook = Nothing
objExcelApp.Quit
Set objExcelApp = Nothing
End If
%>
</body>
</html>
お礼
ありがとうございました。 コンポーネットサービス DCOMの構成⇒MicrosoftExcel⇒セキュリティ⇒「起動とアクティブ化のアクセス許可」 で権限を設定したら上手く行きました。 ありがとうございました。