Asp’de zip dosyalarını listeleme

Discussion in 'Programlama' started by ......, Sep 13, 2009.

  1. ......

    ...... Misafir



    Vereceğimiz “asp kodları“ ile sunucunuz veya bilgisayarınızda bulunan zip dosyalarını görebilirsiniz. Bu kodları bir örnekle açıklama çalışalım. Bu örnekte VBscript dili kullanılmıştır.

    Code:
    <html>
    <head>
    <title>Show Zip Files</title>
    
    <style>
    a
    {
    color:000000;
    font-weight:bold;
    }
    </style>
    </head>
    
    <body>
    
    <%
    set  FileSystem = CreateObject(”Scripting.FileSystemObject”)
    
    path = “c:\\folder1\\folder2″
    
    set  Folder = FileSystem.GetFolder(path)
    
    set  Files = Folder.Files
    
    for  each File  in  Files
    
    FileName = File.name
    Ext =  right(FileName, 4)
    %>
    
    <%  if  Ext = “.zip”  then  %>
    <a href=”<%= FileName %>”><%= FileName %></a>
    <br />
    <%  end  if %>
    
    <%  next  %>
    
    </body>
    </html>


    Yukarıdaki asp kodlarında bazı yerleri kendinize göre uyarlayınız. Daha sonra metin dosyasına yapıştırdıktan sonra asp kodları ile kaydetiniz.​
     

Share This Page