0

次のコードを実行すると、ObjectRequiredエラーメッセージが表示されます。助けてもらえますか、古典的なASPは私の強みではありません。

<%
Function WriteToFile(strFile, strContent)
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
    ' Second argument: 0 = reading, 1 = writing, 8 = appending
    ' Third argument: True = create file if it doesn't exist, false = dont
    Set objTextFile = objFSO.OpenTextFile(strFile, 8, True)
    objTextFile.Write strContent
    objTextFile.Close
    Set objTextFile = Nothing
    Set objFSO = Nothing
End Function

Call WriteDataToFile("test.txt", "test")
%>
4

1 に答える 1

1

エラーが発生している行がわからない場合は、Server.MapPath()を使用してみてください。

 Set objTextFile = objFSO.OpenTextFile(Server.MapPath(strFile), 8, True) 

アプリケーションがファイルを作成/配置する場所を認識できるようにします。

于 2012-08-13T00:59:48.683 に答える