ASPでファイル書き込みができない

このQ&Aのポイント
  • ASPでファイル書き込みができない問題について
  • 個人的にはIISの権限が原因かもしれない
  • 同じような現象が起きた方はいらっしゃいますか?
回答を見る
  • ベストアンサー

ASPでファイル書き込みができない。

こんばんわ、ASPで悩みまくってます。 今、win2000にIISを入れて動作させてます。 つまづいたのはファイル書き込みの個所です。 これを書いたソースを実行させると、ブラウザが真っ白になり、 以後、返答がなくなります。 最後の「ハロー」が表示されないのでそこまで行ってないのかも しれません。 個人的にはIISの権限かなとおもい、いろいろやってみました。が、 うまくいきません。同じような現象の起きた方はおられますでしょうか? 教えていただけたら、嬉しいです。 以下はソースです。 <% FilePath = Server.MapPath("./test.csv") Set FileOBJ = Server.CreateObject("Scripting.FileSystemObject") Set LogFile = FileOBJ.OpenTextFile(FilePath,2,True,False) LogFile.Write("文字列") FileOBJ.Close Set FileOBJ = Nothing Response.Write "ハロー" %>

質問者が選んだベストアンサー

  • ベストアンサー
  • mishida
  • ベストアンサー率34% (19/55)
回答No.2

 こんにちは。  直接コードを記したい気持ちはあるのですが、私は本で勉強したので、書籍のURLを記します。  なお、テキストファイル等の処理は、第4章で解説しています。

参考URL:
http://www.ohmsha.co.jp/data/link/4-274-06381-X/index.htm
mahouchan
質問者

補足

mishidaさん、返答ありがとうございます。 実は自分もこの本で勉強してたんです。 教えていただいたページからサンプルをダウンロードしましてみて、 動かしてみたんですがやはり、結果が表示されません。(TXTを保存できない) (415.htmlのファイルの書き込み部分です。) でもこれでサーバーの設定ということがはっきりしました。 それとも、関数を違うのを使えば、開けるようになるのでしょうかー? 困ってます、今日中なんですよね。。。

その他の回答 (1)

  • mishida
  • ベストアンサー率34% (19/55)
回答No.1

 こんにちは。  勘ですが、「Scripting.FileSystemObject」ではなく、OPEN系の命令で操作されてみてはいかがでしょうか。

mahouchan
質問者

補足

OPEN系というとどのような関数なのでしょうか? 未だに書き込みできずに困ってます。 教えていただけたら幸いです。

関連するQ&A

  • csvファイルを読み込む方法について

    aspにてscvファイルを読み込む際、直接ファイル名を指定するとうまくいくのですが、ファイル名を変数で指定しようとすると、「ファイルが見つかりません」というエラーになってしまいます。どのように記述すれば良いでしょうか。お教えください。よろしくお願いいたします。 (例) 'OK Set objFS = CreateObject("Scripting.FileSystemObject") Set objText = objFS.OpenTextFile(Server.MapPath("aaa.csv"),1) 'NG fname = "aaa.csv" Set objFS = CreateObject("Scripting.FileSystemObject") Set objText = objFS.OpenTextFile(Server.MapPath(fname),1) また、 Set objText = objFS.OpenTextFile(Server.MapPath("""" & fname & """"),1) としてもダメでした。以上です。

  • ASPでのテキストファイルの参照・更新??

    下記の質問のタイトルが違ってきたので新たに質問します。 テキストファイルの参照・更新(別のASP)で動作が止まってしまいます。(なんでもありのローカルIISサーバーでは動作しますが・・) テキストファイルの参照と更新の所で止まって動かなくなります。原因は何かヒントを頂きたく思います。 その部分は参照が下記です。 <% Set Fs = Server.CreateObject("Scripting.FileSystemObject") Set Stream = Fs.OpenTextFile("d:\websites\home\web\staff\news\top-news.html",1,true) do until StreamAtEndOfStream    wk = Stream.ReadLine %>    <%=wk %> <% loop   Stream.close   Set Stream = Nothing %> 更新が下記です。 <% Set Fs = Server.CreateObject("Scripting.FileSystemObject") Set Stream = Fs.OpenTextFile("d:\websites\home\web\staff\news\top-news.html",2,true) Stream.WriteLine "<html>" Stream.WriteLine "</html>"   ・   ・ Stream.Close Set Stream = Nothing

  • ファイル結合について

    .vbsを使用して複数のテキストファイルを1つのテキストファイルに結合したいと思っております。 条件として対象ファイルが0KB及びない場合には追記しない。 結合部分に関しては下記で追記することができたのですが 条件部分に関してはFilelen?を使用するとファイルサイズを取得できるみたいなのですが 実際の記述がわかりませんでした。 ご教授頂けると助かります。 ■追記部分 Set logFile = fso.GetFile(logFile) Set f = logFile.OpenAsTextStream(8, -2) Set objFS = CreateObject("Scripting.FileSystemObject") Set objText = objFS.OpenTextFile(srcFile) myText = objText.ReadAll 'ExecDateTime = Now f.Write(myText & vbNewLine) f.close '解放 Set f = Nothing Set logFile = Nothing Set fso = Nothing

  • ASPでdatファイル書き出しについて

    いまだにASPの質問で申し訳ありません。 現在作成中のフォームは、キャラセットがUTF-8です。 datファイルに書き込みを行うのですが、書き込む言語は簡体字となります。日本語、英語、英数字は書き込みができたのですが、フォームより簡体字を入力したところ、エラーが発生します。 内容は、プロシージャを使用してもいないのに「プロシージャの呼び出し、または引数が不正です。」と言われます。下記の部分がエラー対象行となっていました。 ↓ ここから ↓ Set objFs=Server.CreateObject("Scripting.FileSystemObject") Set objTs=objFs.OpenTextFile(Server.MapPath("dl.dat"),8,True) objTs.WriteLine T_DATE & "," & USR_NAME & "," & LOC objTs.Close ↑ ここまで ↑ Response.Writeでの表示はできたのですが、datへの書き込みができず、どのように対応したらよいかわかりません。 どなたか御教示願えませんでしょうか。よろしくお願いいたします。

  • CSVファイルの読み込み

    ASPの勉強をしています。 CSVファイルを読み込んでDBに登録していきたいのですが、 111,222,"aaa[改行]bbb","1,000",444,555 のようなデータがあったとすると、 「1,000」の桁区切りのカンマのせいで、 「1」 と 「000」に別れてしまいます。 これを防ぐプログラムを作りたいのですが、 わかる方よろしくお願いします。 現在はReadLineで1行ずつ読み込んでいます。 set ObjFS = CreateObject("Scripting.FileSystemObject") set Stream = ObjFS.OpenTextFile(Server.MapPath(FILENAME,1,false,0) ReadBuf = Stream.ReadLine

  • ファイル書き込み

    out.csvファイルに追記していくにはどのように記述すればいいのでしょうか? アドバイス下さい。 Set objFSO = WScript.CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile("c:\test.csv") 'objFile.ReadLine Do While Not objFile.AtEndOfStream StrLine = objFile.ReadLine MyString = split(StrLine,",") ' msgbox Mid(MyString(0),2,10) ' MyString = split(objFile.ReadLine,",") if Mid(MyString(0),2,10) = "(PDH-CSV 4" then Set objWFile=objFSO.OpenTextFile("c:\out.csv",2,true) objWFile.write(StrLine) msgbox "!!!" end if ' if Mid(MyString(0),2,10) = DateString then Set objWFile=objFSO.OpenTextFile("c:\out.csv",2,true) objWFile.write(StrLine) ' 'msgbox Mid(MyString(0),2,10) msgbox "???" end if loop objFile.close Set objFSO = Nothing Set objFile = Nothing

  • [ASP+File操作]長いファイル名の操作。

    こんばんは。 Windows2000 + IIS という環境でASPプログラミングをしています。 テキストファイルを操作する処理があるものを制作していますが・・・1つ問題が。 Set fs = Server.CreateObject("Scripting.FileSystemObject") Set fsData = fs.OpenTextFile("C:\demo.csv",8"True) としますと問題ないのですが・・・ いろいろ検証した結果・・・ファイル名が8文字までで9文字以上になるとエラーになることがわかりました。 たとえば a20030711.csv などは駄目ということです。 これも自力で調べたことなので確かかどうかは判りませんが・・・。 もし、そうであれば・・・9文字以上のファイル名にてテキストファイルを保存したい場合はどうすればいいでしょか?? 宜しくお願いいたします。

  • VB6.0 CreateObject以外のファイルI/O

    以前CreateObject("Scripting.FileSystemObject")を使用してファイルを読込む方法、一行ずつ書込む方法を教えていただいたのですが。 環境によってはウイルスチェックに引っかかってしまうようで、別な手段を取らなければならなくなりました。 読込み: Set objFso = CreateObject("Scripting.FileSystemObject") Set objTxtSt = objFso.OpenTextFile(strFilePass, 1) strData = CStr(objTxtSt.ReadAll()) 書込み: Set objFso = CreateObject("Scripting.FileSystemObject") Set objTxtSt = objFso.OpenTextFile(strFilePass, 2, False) Call objTxtSt.WriteLine(strData) 現在の処理は以上です。 上記と同じ処理をCreateObjectを使用せずに作成するにはどのようにすればよろしいでしょうか。

  • ASP内で他のASPファイルを読み込む方法

    ASP内で別ファイル(A.html)を読み込みました。下記の通りです。 <% Set objA = Server.CreateObject("Scripting.FileSystemObject") Set objFile = objA.OpenTextFile("A.html", 1, False) If Err.Number > 0 Then Response.Write "Open Error" Else Do Until objFile.AtEndOfStream Response.Write objFile.ReadAll Loop End If objFile.Close %> 読み込みはできたのですが、問題なのはA.htmlにもASPの処理が書かれてて、その部分がそのままテキストとして表示されたのです。 このように表示されました↓ <% ASP %> 読み込んだ際に、A.htmlに書かれたASP処理も実行させるにはどうすればよいのでしょうか?

  • VBScriptのOpenTextFileメソッドのようなことをJavaScriptで行いたい

    VBScriptの指定されたファイルを開き、ファイルを読み込んだりするOpenTextFileメソッドのようなことを JavaScriptを用いて行いたいんですがどのようにすればいいんでしょうか? できれば、以下ソースと対比したソースを張っていただけるとありがたいです。よろしくお願いします。 Sub OpenTextFileTest Const ForReading = 1, ForWriting = 2, ForAppending = 3 Dim fs, f Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,TristateFalse) f.Write "Hello world!" f.Close End Sub