关于vbscript：如何使用ASP创建新的文本文件？

How to create a new text file with asp?

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

的文件时

1	Set f=fs.GetFile("c:\\vie4.txt")

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

Hello !

Welcome to my Web site!

Microsoft VBScript runtime error '800a0035'

File not found

/simple2.asp, line 33

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">

</head>
<body>
<form id="form1" method ="post" action ="simple2.asp" runat="server" >

<input id="Text1" type="text" value = "fname" />
<input id="Text2" type="text" value ="lname" />

</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><center>[wp_ad_camp_2]</center></p><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>

相关讨论

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

Table1.Rows.Clear();

List<Knjiga> knjige = new List<Knjiga>();

XmlDocument doc = new XmlDocument();
doc.Load(Server.MapPath("biblioteka.xml"));
foreach (XmlElement el in doc.GetElementsByTagName("knjiga"))
{
knjige.Add(new Knjiga()
{
ISBN = el.GetAttribute("ISBN"),
Naslov = el.GetAttribute("naslov"),
Stanje = Int32.Parse(el.GetAttribute("stanje")),
Citano = Int32.Parse(el.GetAttribute("citano"))
});
}

knjige = knjige.OrderByDescending(d => d.Citano).ToList();

foreach (var knjiga in knjige)
{
TableRow tr = new TableRow();

// Cells
TableCell isbn = new TableCell();
TableCell naslov = new TableCell();
TableCell stanje = new TableCell();
TableCell citano = new TableCell();

isbn.Text = knjiga.ISBN;
naslov.Text = knjiga.Naslov;
stanje.Text = knjiga.Stanje.ToString();
citano.Text = knjiga.Citano.ToString();

tr.Cells.AddRange(new TableCell[]{ isbn, naslov, stanje, citano});

Table1.Rows.Add(tr);
}