我们这里通过遍历一个文件夹下的文件来生成一个sitemap.txt文件,代码如下：<%Set fso=Server.CreateObject("Scripting.FileSystemObject")Set fsd=fso.getfolder(server.mappath("../test/"))Set fs=fso.openTextFile(Server.mappath("/sitemap.txt"),8,true)Set fsfiles=fsd.FilesFor Each fsfile In fsfiles tmpPath="http://www.test.com/test/" & fsFile.name fs.writeLine tmpPathNextresponse.write "<p>Create Sitemap.txt Successfully !"set fsfiles=nothingset fs=nothingset fsd=nothingset fso=nothing%>