沒有使用權限??

我寫一個讀取檔案的程式
<%
set filobj=server.createobject("Scripting.FileSystemObject")
Filename=server.mappath("/圖片/total.txt")
'If Not Request("rad")=Empty Then
set txtwrite=filobj.OpenTextFile(Filename, 2, true)
'End if
%>
但是在執行到這
set txtwrite=filobj.OpenTextFile(Filename, 2, true)
寫
錯誤類型：
Microsoft VBScript 執行階段錯誤 (0x800A0046)
沒有使用權限

我不知道要去哪裡改權限= =!!
謝謝解答嘍

x0