トップページ⇒tech
21コメント6KB

aspで質問です。

■ このスレッドは過去ログ倉庫に格納されています
00011NGNG
質問させてください。
ASPより既存Excelファイルを開き、
データを書き込んで上書き保存、終了という一連の作業をしたいのです。
ですが、エラーも出ずに固まってしまい、サーバ側のプロセスにExcel.exe
が残ったままになってしまいます。プロセスの終了をしても、このプロセスにはアクセスできませんみたいなエラーが表示され、サーバの再起動をしないと消せないという２倍困った事態です。
どなたか原因ご存知のかたいらっしゃいましたら、御教授よろしくお願いいたします。

以下、ソース↓
'Excelｼｰﾄへﾃﾞｰﾀの書込み

Err.Clear
On Error Resume Next

ExcelFILE = "C:\プロジェクト診断結果報告書\a.xls"

Set ObjExcelAPP = Server.CreateObject("Excel.Application")
ObjExcelAPP.DisplayAlerts = False

Set ObjExcelBook = ObjExcelAPP.Workbooks.Open(ExcelFILE)

Set ObjExcelSheet = ObjExcelBook.Sheets("診断書")

ObjExcelAPP.Visible = False

ObjExcelSheet.Cells(1,4).Value = "4"
ObjExcelSheet.Cells(1,9).Value = "9"

ObjExcelBook.Save

'Excelｵﾌﾞｼﾞｪｸﾄを解放します。
ObjExcelAPP.Quit
Set ObjExcelSheet = Nothing
Set ObjExcelBook = Nothing
Set ObjExcelAPP = Nothing

以上です。
0002木村　キタキタマシーンNGNG
初２ゲトォーーーーーーーーー！！！！！！
0003木村　キタキタマシーンNGNG
気持ちよくゲットできたのでお答えそます。
ObjExcelAPP.Workbooks.Open(ExcelFILE)
でオープンそたら、ちゃんとクローズそまそょう。
0004デフォルトの名無しさんNGNG
単発質問断固反対
単発質問断固反対
単発質問断固反対
0005デフォルトの名無しさんNGNG
清々しいまでの単発質問スレだな
00061NGNG
単発ですいません。
木村　キタキタマシーンさん、早速のお返事ありがとうございます。
ですが、closeしても変わりませんでした。
（ObjExcelBook.Saveの下に
　ObjExcelBook.Closeを追加。）

どうしたらいいのでしょうか。よろしくお願いいたします。
0007木村　キタキタマシーンNGNG
>>4
>>5
書き込むぐらいならちゃんと答えろヴォケ！

>>1
気にするな。漏れは味方だ。
00081NGNG
単発質問スレは、作法違反なんですね。
知りませんでした、本当にすいません。
0009デフォルトの名無しさんNGNG
おい、さらっと流すな。

削除依頼して、質問スレに移動だろ。
00101NGNG
質問スレの話題にいきなり「１」の内容で書き込んで入り込むのも
どうかと思いますので、こちらで解決させていただきたいのですが・・・
どうでしょうか。
0011うんこ ◆.y6pppoo NGNG
単発質問ダメ！ゼッタイ！

でもaspのスレ無いから許す。
00121NGNG
木村　キタキタマシーン さん、お気遣いわざわざありがとうございます。
00131NGNG
うんこ ◆.y6pppoo さん、ということは、このまま続けてもよろしいのでしょうか？
0014デフォルトの名無しさんNGNG
aspのすれって、イタチ飼いではごぜぇまんか。
0015うんこ ◆.y6pppoo NGNG
>>13
みんなが使うスレになればいいんじゃないの？

ところで、どこでエラーになってるかわからんので
On Error Resume Next 外してみたら？
00161NGNG
デフォルトの名無しさん さん、すいませんが、
正しい掲示板のありかを御教授していただければそこに行きます。
本当に、ご迷惑をおかけしています。すみません。
00171NGNG
うんこ ◆.y6pppooさん、そうなんです。
On Error Resume Next があってもなくても、エラーにならないんです。
もしエラーになるのでしたら、どこが悪いのかはわかるのですが・・・
00181NGNG
すみません、書き込むことを忘れていたことが一つありました。
Set ObjExcelBook = ObjExcelAPP.Workbooks.Open(ExcelFILE)
というのは、既存のファイルを開くということですよね。
それを、
ObjExcelAPP.Workbooks.Add
Set ObjExcelBook = ObjExcelAPP.ActiveWorkbook
に置き換えて、新規ファイルとして作成すると、正常にいくのです。
つまり、オープン処理がうまくいってないように思えるのですが・・・
0019うんこ ◆.y6pppoo NGNG
正直、ここで聞くより
「〜質問スレ」で聞いた方が、早く答え返ってきそうだなぁ。


エクセルファイルが書込み禁止とかになってたりとかそんなのはない？



腹減ったので帰ります。さようなら。
0020デフォルトの名無しさんNGNG
「IUSE_コンピュータ名」の"C:\プロジェクト診断結果報告書\a.xls"へのアクセス
権の設定どうする？とか、不安定なアプリはインプロセスではだめ？とか
Excel重過ぎOBDC経由ならどう？とか、ふつーAccessだよねとか逝った話題は
ここでは無理なのでWebProgｲﾀ
http://pc.2ch.net/test/read.cgi/php/984840107/l50
でどうぞ。

ではさようなら。
0021デフォルトの名無しさんNGNG
WebProg 板に ASP スレあります。
■ このスレッドは過去ログ倉庫に格納されています