fso.DeleteFile (FileName) 错误信息:没有权限?如何解决
Set fso = Server.CreateObject("Scripting.FileSystemObject")
strRelPath = "../File"
Folder = Server.MapPath(strRelPath)
FileName = Folder & "\DBServer.txt"
strURL=Request("strUrl")
if strURL <> "" then
if fso.FileExists (FileName) then
fso.DeleteFile (FileName)
end if
Set fileStream = fso.CreateTextFile(FileName, true)
fileStream.WriteLine(Trim(Request("strUrl")))
fileStream.Close()