asp生成文件

来源：百度知道 编辑：UC知道 时间：2024/05/08 19:46:22
想求个ASP生成ASP文件的代码。比如我有一个2。ASP我一运行，则自动将1。ASP生成。并且是我指定的内容!

set fso=server.CreateObject("Scripting.FileSystemObject")

shtml="hello world"
path=server.MapPath("../page")
if fso.FolderExists(path)=false then
fso.CreateFolder(path)
end if
path=path&"/1.asp"
set ts=fso.OpenTextFile(path,2,true,-2)
ts.writeline""&shtml&""
ts.close
set ts=nothing
set fso=nothing

你拿回去研究一下

Dim ID
BigClassID=int(Request.QueryString("BigClassID"))
ID=int(Request.QueryString("ID"))
if BigClassID="" then
Response.Write("<script>alert('请选择种类');history.back()</script>")
Response.end()
end if
if ID="" then
Response.Write("<script>alert('请选择发布文章');history.back()</script>")
Response.end()
end if

'读数据===========================
Di