用ASP.NET創(chuàng)建網(wǎng)絡(luò)相冊 保存美好時光
2024-07-10 13:13:18
供稿：網(wǎng)友
最大的網(wǎng)站源碼資源下載站，
在我們的日常生活中數(shù)碼照像設(shè)備已經(jīng)很普遍了，我們會經(jīng)常拍攝一些相片以供留念，而隨著數(shù)碼照片的增多，往往需要很好地管理這些照片，以便更好地查閱留念。現(xiàn)在網(wǎng)上有不少的電子相冊，都能很好的實(shí)現(xiàn)這些功能，那我們能否自己動手創(chuàng)建自己的相冊呢？當(dāng)然可以，在這篇文章中，我們將利用asp.net，來創(chuàng)建一個簡單的在線相冊，以收藏我們的照片。
首先來看下，這個相冊有哪些功能。在這個相冊中，我們必須先把預(yù)先攝影好的照片放到一個目錄下去，之后，可以供在網(wǎng)上使用“上一張，下一張”的鏈接一張張地查看。
下面先介紹如何獲得文件夾中的圖片。我們可以使用system.io命名空間中的directoryinfo類來實(shí)現(xiàn)。將文件夾所在的路徑做為參數(shù)傳遞到該類的構(gòu)造函數(shù)中，并聲明一個directoryinfo類的實(shí)例。directoryinfo類中有一個getfiles()的方法，會返回fileinfo的對象數(shù)組，而每一個fileinfo的實(shí)例將包含指定路徑下文件的具體信息。下面的代碼片段說明了該過程：
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獲得當(dāng)前目錄的路徑，而dirinfo.getfiles()將會返回該目錄下的所有文件。而由于我們的是相冊，只需要看到比如jpg，bmp，gif等圖象文件，所以我們可以通過程序?qū)崿F(xiàn)，只裝載這些類型的文件，這通過一個自定義的過程filterforimages來實(shí)現(xiàn)，該過程將只返回指定文件夾中圖象類型的文件。代碼如下：
function filterforimages(images() as fileinfo) as fileinfo()
dim newimages as new arraylist(images.length)
dim i as integer
for i = 0 to images.length - 1
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
該過程對于傳遞進(jìn)來的fileinfo參數(shù)數(shù)組進(jìn)行遍歷，對文件夾中的文件的后綴名進(jìn)行叛斷，如果屬于圖象文件，則添加到newimages數(shù)組中去，并以arraylist形式返回。
接下來，我們看下如何顯示每一張圖片，并以“上一張，下一張”來顯示。為了知道當(dāng)前瀏覽的是第幾張圖片，可以通過使用傳遞參數(shù)的方法來實(shí)現(xiàn)。先往窗體中添加一個image控件和文本框，程序代碼如下：
sub page_load(sender as object, e as eventargs)
...
' dim imgindex as integer = 0
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 + 1 & " 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" />
在上面的代碼中，使用變量imgindex來表示當(dāng)前瀏覽的是第幾張圖片，剛開始時候n=0，則獲得images數(shù)組中的第一個變量，也即第一張圖片，之后每次讀取該變量值，則可以知道當(dāng)前瀏覽的是第幾張圖片。
