VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行った
VBSにてサーバー中のエクセルファイルを開いて閉じるだけの処理を行ったところクライアントでのテストは上手くいくのですが、サーバーに移植すると下記問題点が発生し解決できません。お教え下さい・
1)サーバーで直接IEで開くと"検索中のページには問題があるため表示できません。"になる
2)クライアント側のIEで開くと"Microsoft VBScript 実行時エラー エラー '800a0046'
",書き込みできません。: 'CreateObject'になる
環境 サーバーwindows 2003 server クライアント windwos XP いずれもIIS
・クライアントPCのIIS環境に移植しクライアントPCのIEで開くと正常動作
プログラム
<%@ 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>
お礼
有難うございます! 全然目処が立たなかったものが、これできっと上手くいきそうです。 良い知恵を教えて頂いて、とても感謝です!!(^^)