文件夾文件的創(chuàng)建，文件內(nèi)容的寫(xiě)入

2016/11/19 15:33:541188 閱讀

dim fso,savePath
Set fso = Server.CreateObject("Scripting.FileSystemObject")
savePath = "/uploadfiles/2016/"
If Not fso.FolderExists(Server.mappath(savePath)) Then
fso.CreateFolder(Server.mappath(savePath))
End If

dim filename,html,fout
filename="uploadfiles/2016/ts.asp"
html ="---------"
set fout=fso.CreateTextFile(Server.mappath(filename),true)
fout.Write html 
fout.close 
set fout=nothing 
set fso=nothing 

下一條：IIS添加擴(kuò)展名映射“確定”按鈕灰色解決方法

上一條：查看進(jìn)程中PID所對(duì)應(yīng)的IIS應(yīng)用程序池