嘗試創建要在VBScript中寫入的文件時出現權限被拒絕錯誤

Question

嘗試在此處打開第二個文件進行寫入時，我一直拒絕獲得許可。 我知道第一個文件可以很好地打開，因為我可以將其寫到屏幕上，並且已經為用戶設置了寫權限。 這是如此簡單，以至於我被它蒙住了雙眼？？？

css_org = server.MapPath("style.css")
css_new = server.MapPath("new_style.css")           
Set fso = CreateObject("Scripting.FileSystemObject")
Const ForReading = 1 
Const ForWriting = 2        
Set objFile1 = fso.OpenTextFile (css_org, ForReading)
Set objFile2 = fso.OpenTextFile (css_new, ForWriting, True)  ' 500 error on this line

Answer 1

您的代碼似乎是ASP，因此您需要向運行該代碼的用戶（通常是運行IIS的服務帳戶）授予寫權限，而不是登錄到Web應用程序的用戶。

Answer 2

您是否嘗試過在代碼之外寫入文件，以查看用戶上下文是否可以寫入文件？ 您的代碼可能不是問題。 如果嘗試使用記事本進行寫操作，則可能會得到更多有用的錯誤消息。 另外，您可以嘗試使用SysInternals的“進程資源管理器”-他們的“查找句柄”功能來測試該文件，以查看是否有某些進程將其鎖定。