哪位有asp生成静态页面实列？

Dim fso, MyFile,filepath
filepath=server.mappath("./")&"a.html"
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile= fso.CreateTextFile(filepath)
MyFile.Write("这是一个测试。")
MyFile.close

ASP源码下载站 要多少有多少 碰到问题了先自己去搜一下这种事问了跟没问一下还不如自己去搜一下呢