❶ asp file 如何获取文件名
<input type="file" name="filename">
❷ ASP中如何读取文件夹的名字
<%
infopath=request.servervariables("path_info") '得到文件相对路径
serverpath=server.mappath("要循环的文件夹/文件夹下的文件") '得到文件绝对路径 这个我没改。必须的要在循环的文件夹下面建一个文件。并在上面写上才可以。
set objfso=createobject("scripting.filesystemobject") '实例文件组件
set objfile=objfso.GetFile(serverpath) '读取文件所在路径
set objfolder=objfile.parentfolder '根据文件所在路径得到上级目录
%>
<%
for each objfoldercount in objfolder.subfolders '循环显示文件夹
response.write(objfoldercount.name)
next
%>
也可以这样
serverpath=server.mappath("要循环的文件夹/文件夹下的文件")
split(serverpath,"/")
之取数组的值就可以了,那就是文件夹
❸ asp如何批量获取一个文件夹下所有文件的文件名然后存入数据库
用ADIR函数
将文件信息存放到数组中，然后返回文件个数。
语法
ADIR(ArrayName [, cFileSkeleton [, cAttribute ]])
参数
ArrayName
指定数组名。如果数组不存在，Visual FoxPro 将自动创建此数组。如果数组存在，但其大小不足以包含所有信息，则 Visual FoxPro 自动增加数组大小，使得数组能容纳所有信息。如果数组超过了所需大小，Visual FoxPro 将截掉多余部分。如果数组存在，并且 ADIR( )
函数由于没找到匹配文件而返回 0，则数组保持不变。如果数组不存在，并且 ADIR( ) 函数返回零，则不创建数组。
下表说明了数组中每列的内容及其数据类型：
列 数组内容 数值类型
1 文件名 字符型
2 文件大小 数值型
3 文件日期 日期型
4 文件时间 字符型
5 文件属性 字符型
数组的最后一列包含匹配文件的文件属性。每个文件属性值由一个字母表示，一个文件可有多个属性。下表说明每个字母表示的文件属性含义：
字母 属性
A 档案文件 一 可读写（在 FoxPro for Macintosh 中，此属性无效）
H 隐藏文件
R 只读文件
S 系统文件
D 目录或文件夹
cFileSkeleton
指定文件梗概，以便存储满足搜索条件的文件名或扩展名的文件信息。例如，条件可以是所有表、所有文本文件、所有文件名第一个字母为“A”的文件，等等。这些通配查询在 cFileSkeleton 中可以包含通配符 * 和 ?。其中问号代表单个字符，星号代表任意字符串。在文件梗概中，可在任意位置使用任意个数的通配符。
在 Visual FoxPro、FoxPro for Windows 和 FoxPro for MS-DOS 中，可以指定驱动器和目录名，程序将在此驱动器和目录下搜索匹配文件。如果不指定驱动器和目录名，将把当前目录下的文件信息存入数组中。
在 FoxPro for Macintosh 中，可以搜索匹配文件名的卷和文件夹。如果不指定卷和文件夹，FoxPro for Macintosh 将当前文件夹中的文件信息存入数组中。
cAttribute
指定在返回内容中包含子目录或嵌套文件夹、隐藏或系统文件、或者卷名。
cAttribute 可以是 D、H 和 S 的任意组合。如果包含 D，除了返回匹配 cFileSkeleton 的文件名外，还将返回当前目录的子目录或当前文件夹的嵌套文件夹。如果包含 H，将返回与 cFileSkeleton 指定相匹配的隐藏文件信息。如果包含 S，将返回与 cFileSkeleton 指定通配文件名相匹配的系统文件信息。
如果 cFileSkeleton 为空字符串，仅返回子目录或嵌套文件夹名、隐藏或系统文件。
cAttribute 参数中包含字符 V，将返回当前驱动器的卷名。如果 V 和 D、H 或 S 一起包含在数组中，则只返回卷名。卷名存入数组的第一个元素中，并截去数组的其余部分。
返回值类型
数值型
说明
对于每一个文件，ADIR( ) 将文件名、大小、日期、时间和属性信息存入数组。
例子：
=adir(abc,"d:\123\*.jpg")
把d:\123文件夹下jpg照片文件的名字、大小、日期、时间和属性信息存入数组abc
❹ asp中如何获得上传文件的名字
post.asp 做为发表页，其中引用choose.asp作图片上传
choose.asp 提供浏览选择图片，提交数据给upload.asp
upload.asp中的asp程序负责上传
writepost.asp 负责将文本和图片名一起写入数据库
1－－－－－－－－
filename＝"上传后获得的文件名"，然后upload.asp自动跳转choose.asp 页，加上参数，格式为：
choose.asp？filename＝"上传后获得的文件名"
然后你用Request.QueryString("filename")即可获取文件名，然后就能将post.asp中书写的文本一起提交给wirtepost.asp 保存了
2－－－－－－－－－－－
也可以用session来保存文件名，session("filename")＝"上传后获得的文件名"，然后直接跳转回choose.asp，在post.asp页提供的表单中写完文本，提交给writepost.asp 保存，因为用的session所以不必担心文件名丢失
那最后在writepost.asp 中，如果用session，完成保存动作后，要清空session("filename")哦
❺ ASP 如何获取所有文件,包括子目录中的全有文件名
没时间细改，给你个参考下：
<table>
<tr>
<td><strong>文件名</strong></td>
<td><strong>文件大小</strong></td>
<td><strong>创建时间</strong></td>
</tr>
<%
Dim fso, f, f1, fc,fp,fs,vf
Set fso = CreateObject("Scripting.FileSystemObject")
fp=server.MapPath("/") & "\"
Set f = fso.GetFolder(fp)
Set fc = f.SubFolders
For Each f1 in fc
%>
<tr>
<td><%=f1.name%></td>
<td><%=f1.size%></td>
<td><%=f1.DateCreated%></td>
</tr>
<%
Set fs = f1.Files
For Each vf in fs
%>
<tr>
<td>/<%=f1.name%>/<%=vf.name%></td>
<td><%=vf.size%></td>
<td><%=vf.DateCreated%></td>
</tr>
<%
next
next
Set fc = f.Files
For Each f1 in fc
%>
<tr>
<td><%=f1.name%></td>
<td><%=f1.size%></td>
<td><%=f1.DateCreated%></td>
</tr>
<%
next
%>
</table>
❻ asp如何循环读取指定文件夹文件夹中的文件名
刚写完代码问题关闭了, 没把我晕死.
你看一看吧 不懂可以问我.
========================================================================
没有时间把整站代码都写给你
大概说下思路吧
1,遍历文件夹取文件对象值,添加在数据库中(先建好表方便一些),然后操作Drive对象,取数据库值取表格值或输入值都可以,假设要复制文件夹中所有文件的话就直接在遍历循环中建FSO对象,不过代码复杂一点.
祝你成功.
给你一些主要functions和思路,你会发现其实点破了就很简单:
1.
function bianli(path)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
on error resume next
Set objFolder=fso.GetFolder(server.MapPath(path))
Set objFiles=objFolder.Files
'循环输出文件夹path下的文件的文件名
For each objFile in objFiles '取相关值
Response.Write "Name: " & objFile.Name & " "
Response.Write "ShortName: " & objFile.ShortName & " "
Response.Write "Size: " & objFile.Size & " bytes "
Response.Write "Type: " & objFile.Type & "<BR>"
Response.Write "Path: " & objFile.Path & " "
Response.Write "ShortPath: " & objFile.ShortPath & "<BR>"
Response.Write "Created: " & objFile.DateCreated & " "
Response.Write "LastModified: " & objFile.DateLastModified & "<P>"
Next
Set objFolder=nothing
Set fso=nothing '释放对象
end function
下面的建表写表就不用我说了吧?
==========================================================================
2.文件复制操作'之讲了复制,下面有详细关于File对象的讲解,希望触类旁通
Sub backupdata()
Filepath=request.form("Filepath")
Filepath=server.mappath(Filepath)
bkfolder=request.form("bkfolder")
bkfilename=request.form("bkfilename")
Set Fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(Filepath) then
If CheckDir(bkfolder) = True Then
fso.file Filepath,bkfolder& "\"& bkfilename
else
MakeNewsDir bkfolder
fso.file Filepath,bkfolder& "\"& bkfilename
end if
response.write "操作成功，您备份的数据路径为<br>" &bkfolder& "\"& bkfilename
Else
response.write "找不到您所需要备份的文件。"
End if
end sub
Driver对象的RootFolder属性返回一个Folder对象，通过该对象可访问这个驱动器内的所有的内容。可以使用这个Folder对象的属性和方法遍历驱动器上的目录，并得到该文件夹和其他文件夹的属性。
Copy(destination,overwrite)
将这个文件复制到destination指定的文件夹。如果destination的末尾是路径分隔符(‘\’)，那么认为destination是放置拷贝文件的文件夹。否则认为destination是要创建的新文件的路径和名字。如果目标文件已经存在且overwrite参数设置为False，将产生错误，缺省的overwrite参数是True
Delete(force)
删除这个文件。如果可选的force参数设置为True，即使文件具有只读属性也会被删除。缺省的force是False
Move(destination)
将文件移动到destination指定的文件夹。如果destination的末尾是路径分隔符(‘\’)，那么认为destination是一文件夹。否则认为destination是一个新的文件的路径和名字。如果目标文件夹已经存在，则出错
CreateTextFile
(filename,overwrite,unicode)
用指定的文件名创建一个新的文本文件，并且返回一个相应的TextStream对象。如果可选的overwrite参数设置为True，将覆盖任何已有的同名文件。缺省的overwrite参数是False。如果可选的unicode参数设置为True，文件的内容将存储为unicode文本。缺省的unicode是False
OpenAsTextStream
(iomode,format)
打开指定文件并且返回一个TextStream对象，用于文件的读、写或追加。iomode参数指定了要求的访问类型，允许值是ForReading(1) (缺省值)、ForWrite(2)、ForAppending(8)。format参数说明了读、写文件的数据格式。允许值是TristateFalse(0)（缺省），说明用ASCII数据格式；TristateTrue(-1)说明用Unicode数据格式；TristateUseDefault(-2)说明使用系统缺省格式
不是为了多少分 主要能帮到你就可以