<%
folder = Request.QueryString("folder")

Set objfso = Server.CreateObject("Scripting.FileSystemObject")
If Not objfso.folderExists(folder) Then
objfso.CreateFolder(folder)
Response.Write(folder & "目录创建成功")
Else
Response.Write(folder & "该目录已存在")
End If
%>


浏览器地址栏输入 http://localhost/study/index.asp?folder=folderc

Microsoft VBScript 运行时错误 错误 '800a0046'

没有权限

/study/index.asp，行6

IIS5.0 WIN2000 PRO

study目录是我在IIS创建的虚拟目录 虚拟目录权限为默认 实际目录在我的E盘中 E盘文件格式是FAT32

系统目录是C盘 系统目录的文件格式是NTFS 我把everyone用户组的权限设置为完全控制后仍不可以


在线等答案 还有什么测试环境需要我补充的吗？

可能没有在IIS中设置权限如果是虚拟目录默认权限，是不允许执行FSO的。
只有把虚拟目录权限中的读取，写入都选中才可以FSO。

不行的 请问还要指定创建文件的目录吗

当然要啦，要指定完整的物理路径

晕 这样啊 问题已经解决

原因是因为我没指定完整的物理路径 我还以为会在ASP文件所在的目录创建呢 原来要指定物理路径

OK 谢谢

可以用Server.MapPath([虚拟路径])的办法得到虚拟路径的物理路径，
参数就是虚拟路径[字符串格式]比如/bbs/post.asp
Dim Path
Path=Server.MapPath("/bbs/post.asp")
这时Path返回的就是X:\XXX\XXX\bbs\post.asp的物理路径的形式。