如何用asp添加文件夹-花衣燕子别来

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

我想做个多用户相册BLOG系统

语言我只会ASP

用户上传的照片我想把他们分别存在/upload/用户名的文件夹里

也就是说每个用户上传的图片都在他自己的文件夹里

现在我的思路就是用户申请注册的时候，可不可以用asp语句在upload中建立一个以用户名命名的文件夹？

要有相关的代码语句

谢谢

解析:

使用FSO新建文件夹

Dim objFSO

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

path = Server.MapPath("\upload\user")

If objFSO.FolderExists(path) Then

Response.Write path&"文件夹已经存在！"

Else

objFSO.CreateFolder(path)

Response.Write "新建文件夹的位置为"&path

End If

Set objFSO = Nothing

花衣燕子这下出名了

用FSO创建，判断是否存在，然后创建。

也可以直接创建，如果生成失败就证明有了。

tmppath="D:\2012\01\25\13\25\36"

if not objfolder.folderexists(tmppath) then objfolder.createfolder tmppath

下面是表单代码：

<form id="form1" name="form1" method="post" action="folder.asp">

请指定<span class="STYLE3">文件位置和文件名： <input type="text" name="createflie">

<input type="submit" name="Submit" value="确定" />

</form>

提交到folder.asp

<%

folder = request("createflie")

set fso = server.CreateObject("scripting.filesystemobject")

fso.createfolder(server.MapPath(".\"&folder&""))

response.Write("文件夹创建成功")

%>

经测试可以创建成功

---