ASP讀取檔案夾內的檔案名稱並計算檔案數量

來源:互聯網
上載者:User

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>無標題文檔</title>
</head>

<body>
<%
'讀取檔案夾內的檔案名稱病計算檔案數量

c_path= server.MapPath("files")
set   file_system = createobject("scripting.filesystemobject")  
            set   cur_folder=file_system.getfolder(c_path)  
            '建立檢索目錄下的檔案對象集合  
            set   sub_files=cur_folder.files  
            '遍曆檔案對象集合
            i=0
    
   for   each   each_file   in   sub_files
    if right(each_file.name,4) = ".jpg" or right(each_file.name,4) = ".gif" then
     i=i+1 
     name=each_file.name'取檔案名稱
     names="[upload=jpg]UploadFile/2008-4qqface/"&name&"[/upload]<br>"
     response.write names 
    end if
            next  
            response.write i
   %>

 

 

</body>
</html>

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.