(BugFix:Core:ASP) 修复文件创建失败和删除失败时提示

source/core/asp/template/filemanager.js

@@ -11,13 +11,13 @@ module.exports = (arg1, arg2, arg3) => ({
 
   delete: {
     _:
-      `Dim P:P=bd(Request("${arg1}")):Set FS=CreateObject("Scripting.FileSystemObject"):If FS.FolderExists(P)=true Then:FS.DeleteFolder(P):Else:FS.DeleteFile(P):End If:Set FS=Nothing:If Err Then:S="ERROR:// "&Err.Description:Else:S="1":Response.Write(S):End If`,
+      `Dim P:P=bd(Request("${arg1}")):Set FS=CreateObject("Scripting.FileSystemObject"):If FS.FolderExists(P)=true Then:FS.DeleteFolder(P):Else:FS.DeleteFile(P):End If:Set FS=Nothing:If Err Then:S="ERROR:// "&Err.Description:Else:S="1":End If:Response.Write(S)`,
     [arg1]: "#{hex::path}"
   },
 
   create_file: {
     _:
-      `CreateObject("Scripting.FileSystemObject").CreateTextFile(""&bd(Request("${arg1}"))&"").Write(""&bd(Request("${arg2}"))&""):If Err Then:S="ERROR:// "&Err.Description:Else:S="1":Response.Write(S):End If`,
+      `CreateObject("Scripting.FileSystemObject").CreateTextFile(""&bd(Request("${arg1}"))&"").Write(""&bd(Request("${arg2}"))&""):If Err Then:Response.Write("ERROR:// "&Err.Description):Else:Response.Write("1"):End If`,
     [arg1]: "#{hex::path}",
     [arg2]: "#{hex::content}"
   },