如何用asp创建一个新的文本文件?

时间:2014-06-19 02:12:04

标签: vbscript asp-classic

我正在尝试编写一个用asp创建新文本文件的程序。 它给出了Microsoft VBScript运行时错误'800a0035'。但是,当我更改行

的文件时
Set f=fs.GetFile("c:\vie4.txt")

到现有文件时不会出现此错误。

  

你好!

     

欢迎来到我的网站!

     

Microsoft VBScript运行时错误'800a0035'

     

找不到文件

     

/simple2.asp,第33行

<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1"  method ="post" action = "simple2.asp"  runat="server"  >
    <div>
        <input id="Text1" type="text"  value =  "fname"   />
        <input id="Text2" type="text"  value ="lname" />
    </div>
    </form>

    <%

response.write(request.querystring("fname"))
response.write(" " & request.querystring("lname"))
        fname = request.querystring("fname")
        lname =  request.querystring("lname")

response.write("<p>Hello " & fname & " " & lname & "!</p>")
response.write("<p>Welcome to my Web site!</p>")

Dim fs,f
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.GetFile("c:\vie4.txt")
Response.Write("File created: " & f.DateCreated)
set f=nothing
set fs=nothing
%>
</body>
</html>

2 个答案:

答案 0 :(得分:4)

如有疑问,请阅读documentationGetFile无法创建文件。请使用CreateTextFile

...
filename = "c:\vie4.txt"
If Not fs.FileExists(filename) Then fs.CreateTextFile filename
Set f = fs.GetFile(filename)
...

答案 1 :(得分:0)

access_token