在我們的日常生活中數碼照像設備已經很普遍了 我們會經常拍攝壹些相片以供留念 而隨著數碼照片的增多 往往需要很好地管理這些照片 以便更好地查閱留念 現在網上有不少的電子相冊 都能很好的實現這些功能 那我們能否自己動手創建自己的相冊呢？當然可以 在這篇文章中 我們將利用asp net 來創建壹個簡單的在線相冊 以收藏我們的照片
首先來看下 這個相冊有哪些功能 在這個相冊中 我們必須先把預先攝影好的照片放到壹個目錄下去 之後 可以供在網上使用 上壹張 下壹張 的鏈接壹張張地查看
下面先介紹如何獲得文件夾中的圖片 我們可以使用System IO命名空間中的DirectoryInfo類來實現 將文件夾所在的路徑做為參數傳遞到該類的構造函數中 並聲明壹個DirectoryInfo類的實例 DirectoryInfo類中有壹個GetFiles()的方法 會返回FileInfo的對象數組 而每壹個FileInfo的實例將包含指定路徑下文件的具體信息 下面的代碼片段說明了該過程
以下為引用的內容 Sub Page_Load(sender as Object e as EventArgs) Get list of images Dim dirInfo as New DirectoryInfo(Server MapPath( )) Dim images() as FileInfo = FilterForImages(dirInfo GetFiles()) End Sub其中 用Server mappath獲得當前目錄的路徑 而dirinfo getfiles()將會返回該目錄下的所有文件 而由於我們的是相冊 只需要看到比如JPG BMP GIF等圖象文件 所以我們可以通過程序實現 只裝載這些類型的文件 這通過壹個自定義的過程FilterForImages來實現 該過程將只返回指定文件夾中圖象類型的文件 代碼如下
以下為引用的內容 Function FilterForImages(images() as FileInfo) as FileInfo() Dim newImages as New ArrayList(images Length)
Dim i as Integer For i = to images Length If Path GetExtension(images(i) Name) = jpg OrElse _ Path GetExtension(images(i) Name) = jpeg OrElse _ Path GetExtension(images(i) Name) = png OrElse _ Path GetExtension(images(i) Name) = gif then newImages Add(images(i)) End If Next
Return CType(newImages ToArray(GetType(FileInfo)) FileInfo())End Function
? 該過程對於傳遞進來的FileInfo參數數組進行遍歷 對文件夾中的文件的後綴名進行叛斷 如果屬於圖象文件 則添加到newimages數組中去 並以arraylist形式返回
接下來 我們看下如何顯示每壹張圖片 並以 上壹張 下壹張 來顯示 為了知道當前瀏覽的是第幾張圖片 可以通過使用傳遞參數的方法來實現 先往窗體中添加壹個image控件和文本框 程序代碼如下
以下為引用的內容 Sub Page_Load(sender as Object e as EventArgs)
Dim imgIndex as Integer =If Not Request QueryString( N ) is Nothing AndAlso _ IsNumeric(Request QueryString( N )) then imgIndex = CInt(Request QueryString( N )) End If currentImgTitle Text = You are Viewing: & _ Path GetFileNameWithoutExtension(images(imgIndex) Name) & _ ( & imgIndex + & of & images Length & ) currentImg ImageUrl = Path GetFileName(images(imgIndex) Name) End Sub
HTML部分代碼
以下為引用的內容 <asp:Label runat= server id= currentImgTitle /><br /><asp:Image runat= server id= currentImg />? lishixinzhi/Article/program/net/201311/15504