(0x800A0046) Permission denied,not IIS permission!
Hi,
I've made this quick and a lttle dirty asp script to output a list of folder contents as xml using FSO. I'm getting a Microsoft VBScript runtime (0x800A0046)Permission denied error (oddly on the last line I included which is just adding to a local string) but I'm running local IIS and all the permissions are good. It's driving me crazy! It worked on Friday and it still works for sub directories with the same permissions.
Thanks in advance,
Dave
<%@ Language=VBScript %>
<%
Dim path, output_str
output_str = "<?xml version=""1.0"" encoding=""iso-8859-1""?>" & vbcrlf & "<contents>"
directory=Request.QueryString("folder")
if (directory<>"") then
path = Server.MapPath("/Admin/"&directory&"/")
else
path = Server.MapPath("/Admin/")
end If
ListFolderContents(path)
output_str=output_str & vbcrlf & "</contents>"
response.Write(output_str)
sub ListFolderContents(path)
dim fs, folder, file, item, url
set fs = CreateObject("Scripting.FileSystemObject")
set folder = fs.GetFolder(path)
'Display the target folder and info.
output_str = output_str & vbcrlf & "<folder>" _
|