ZKX's LAB

asp 列表网站目录文件名 如何通过ASP来查询文件夹中是否有该文件名的文件存在

2020-07-21知识10

如何通过ASP来查询文件夹中是否有该文件名的文件存在 Set objFSO=Server.CreateObject(\"Scripting.FileSystemObject\")if objFSO.FolderExists(Server.MapPath(\"\\foldername\"))thenresponse.write\"存在elseresponse.write\"不存在end iffoldernames是文件夹名字给你查的书,呵呵祝你好运用asp获取本地文件名并形成树型目录 ASP遍历文件及文件夹的代码:function bianli(path)dim fso 'fso对象dim objFolder '文件夹对象dim objSubFolders '子文件夹集合dim objSubFolder '子文件夹对象dim objFiles '文件集合dim objFile '文件对象set fso=server.CreateObject(\"scripting.filesystemobject\")on error resume nextset ōbjFolder=fso.GetFolder(path)'创建文件夹对象set ōbjSubFolders=objFolder.Subfolders'创建的子文件夹对象for each objSubFolder in objSubFoldersnowpath=path+\"\\\\\"+objSubFolder.nameResponse.Write nowpathset ōbjFiles=objSubFolder.Filesfor each objFile in objFilesResponse.Write\"-Response.Write objFile.namenextResponse.Write\"bianli(nowpath)'调用递归nextset ōbjFolder=nothingset ōbjSubFolders=nothingset fso=nothingend functionbianli(\"F:\\\")'调用bianli()函数,假设这里是遍历F:盘遍历某文件夹下文件,并输出为XMLResponse.contentType=\"application/xmlResponse.Expires=0function bianli(path)dim fso 'fso对象dim objFolder '文件夹对象dim objFiles '文件集合dim objFile '文件对象set fso=。ASP.NET如何获取路径中的文件名名称 Path.GetFileName(\"/uploads/FOYin/六字大明咒 齐豫.mp3\")获取文件名:六字大明咒 齐豫.mp3Path.GetExtName(\"/uploads/FOYin/六字大明咒 齐豫.mp3\")获取扩展名:.mp3然后你就懂了。如何让ASP.NETW网页列出某目录下的所有图片的文件名 public void getImageUrl(){string imgtype=\"*.BMP|*.JPG|*.GIF|*.PNG;string[]ImageType=imgtype.Split('|');for(int i=0;i;i+){string[]dirs=Directory.GetFiles(@\"d:\\\\My Documents\\\\My Pictures\",ImageType[i]);foreach(string dir in dirs){string temp=dir;temp=temp.Substring(temp.LastIndexOf('\\\\')+1);得到文件名Response.Write(\"<;p>;\"+temp+\"<;/p>;\");}}}ASP 如何获取所有文件,包括子目录中的全有文件名 <;html>;dim myfilename()redim myfilename(0)set fs=Server.CreateObject(\"Scripting.FileSystemObject\")sub showfile(thefolder)set fd=fs.getfolder(thefolder)for each myfile in fd.filesi=ubound(myfilename)myfilename(i)=fd.path&\"\\\"&myfile.nameredim Preserve myfilename(i+1)nextfor each myfolder in fd.SubFolders '递归记录其它文件夹的文件call showfile(fd.path&\"\\\"&myfolder.name)nextend subthefolder=\"e:\\lzweb\"'在此指定要搜索的文件夹绝对路径,要确定匿名用户有访问的权限,否则会出错call showfile(thefolder)'过程调用后,查到的文件名包括路径名保存在myfilename数组,'共ubound(myfilename)个,下标分布在0至ubound(myfilename)-1;'以下示例把找到文件显示出来response.write(\"共找到\"&ubound(myfilename)&\"个文件\")for i=0 to ubound(myfilename)-1response.write(i+1&\"-\"&myfilename(i)&\"\")next

#asp

随机阅读

qrcode
访问手机版