アプリ版:「スタンプのみでお礼する」機能のリリースについて

宜しくお願いします。
サーバーに保管してあるEXCELテンプレートが保管してあります。
ASPを用いて、テンプレートの特定セルにデータを入力したのち
そのテンプレートをクライアント側のPCに保存したいのですが可能でしょうか。

ちなみに、自分のPC内(Localhost)では、下記のプログラムでうまく動いたのですが
サーバーに移すと、このプログラムのところでエラーが出ます。

初心者で見よう見まねでプログラムしているので、理屈等が理解できていないのですが
どなたかアドバイスいただけると幸いです。
宜しくお願いします。

'=================================================
'----- EXCEL作成
'=================================================
Sub excel_save()

Dim strFileName
Dim ex, wb, sh, objExcelBook

strFileName = "C:\Temp\報告書.xls"
Set ex = Server.CreateObject("Excel.Application")
ex.visible=false
ex.displayalerts=false
Set objExcelBook = ex.Workbooks.Open(strFileName)

Set wb = ex.activeworkbook
Set sh = wb.Sheets("報告書")
sh.Range("I3").Value = KanriNo

objExcelBook.SaveAs ("【" & KanriNo & "】報告書.xls")
objExcelBook.Close False
ex.Application.Quit
set sh = Nothing
Set wb = Nothing
Set objExcelBook = Nothing
Set ex = Nothing

End Sub

A 回答 (3件)

SaveAsは通常、絶対パス(ドライブ名からファイル名まで)で入力します。

この回答への補足

無事できました。
何度もお付き合いいただきありがとうございました。

補足日時:2011/01/13 18:12
    • good
    • 0
この回答へのお礼

無事にできました。
何度もお付き合いいただきありがとうございました。

お礼日時:2011/01/13 18:14

Excelを作成した後、別ページに飛びそこから


javascriptで
location.href=ファイルのリンク(ドメイン以降)
自動で行う場合はBODYタグにonLoadを使用します。

この回答への補足

nmktkskさん、ありがとうございます。

そもそも
objExcelBook.SaveAs ("【" & KanriNo & "】報告書.xls")
のところでアクセスできませんとのエラーが表示されます。
サーバー側で何か設定しなければならないのでしょうか?

また今回教えていただいたEXCELの作成とは、上記のEXCELファイル保存
だと思えばよいですか?

なにぶん、素人考えなものですからお付き合いいただけると幸いです。

補足日時:2011/01/13 15:16
    • good
    • 0

自分のパソコンではASPが動作している自分のパソコンにできます。


ダウンロードするには、ダウンロードするためのjavascriptかリンクを作ってください。

この回答への補足

nmktkskさん、レスありがとうございます。
もう少しお教え願いたいのですが、ということは、
1.まずクライアントからサーバーにおいてあるEXCELファイルを更新する。
2.更新したEXCELファイルを、クライアントにダウンロードする。
といった手順を踏めばよいのでしょうか?

補足日時:2011/01/12 16:58
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!