如何读取thumbs.db里的缩略图?(downmoon)

 

问题：如何读取thumbs.db里的缩略图?

请先到这里下载一个控件

ThumbDBLib

A C# library for reading thumbs.db file

http://www.petedavis.net/MySite/DynPageView.aspx?pageid=31

引用dll,这里提供了 VB和C#代码,一个Thumbs.aspx,添加一个ID为plcThumbs 的PlaceHolder 

< form id ="form1" runat ="server" > < div > < asp:PlaceHolder id ="plcThumbs" runat ="server" EnableViewState ="False" ></ asp:PlaceHolder > </ div > </ form >

 VB主要代码:

Dim ThumbDb As String = Server.MapPath( " . " ) & " /thumbs.db " If System.IO.File.Exists(ThumbDb) Then Dim ThumbLib As New ThumbDBLib.ThumbDB(ThumbDb) If Not Request.QueryString( " thumb " ) Is Nothing Then Dim Thumb As String = Request.QueryString( " thumb " ) Dim ThumbData As Byte () = ThumbLib.GetThumbData(Thumb) Response.Clear() Response.ContentType = " image/ " & System.IO.Path.GetExtension(Thumb).ToLower.Replace( " . " , "" ) Response.BinaryWrite(ThumbData) Response.Flush() Response.End() Else For Each thumb As String In ThumbLib.GetThumbfiles If System.IO.File.Exists(Server.MapPath( " . " ) & " / " & thumb) Then ' Could use a Literal control here if you want more ' control over the html. Dim ThumbImage As New System.Web.UI.WebControls.Image ThumbImage.ImageUrl = " thumbs.aspx?thumb= " & Server.UrlEncode(thumb) ThumbImage.ImageAlign = ImageAlign.Top ThumbImage.AlternateText = thumb ThumbImage.BorderStyle = BorderStyle.Outset ThumbImage.BorderWidth = New Unit( 1 ) ThumbImage.Attributes.Add( " hspace " , " 4 " ) ThumbImage.Attributes.Add( " vspace " , " 4 " ) ThumbImage.Attributes.Add( " onclick " , " window.location.href=' " & thumb & " '; " ) ThumbImage.Style.Add( " cursor " , " hand " ) plcThumbs.Controls.Add(ThumbImage) End If Next End If ThumbLib = Nothing Else Response.Write( " Thumbs.db Not Found! " ) End If  
  Dim  ThumbDb  As   String   =  Server.MapPath( " . " )  &   " /thumbs.db "
         If  System.IO.File.Exists(ThumbDb)  Then

             Dim  ThumbLib  As   New  ThumbDBLib.ThumbDB(ThumbDb)

             If   Not  Request.QueryString( " thumb " )  Is   Nothing   Then

                 Dim  Thumb  As   String   =  Request.QueryString( " thumb " )
                 Dim  ThumbData  As   Byte ()  =  ThumbLib.GetThumbData(Thumb)

                Response.Clear()
                Response.ContentType  =   " image/ "   &  System.IO.Path.GetExtension(Thumb).ToLower.Replace( " . " ,  "" )
                Response.BinaryWrite(ThumbData)
                Response.Flush()
                Response.End()

             Else

                 For   Each  thumb  As   String   In  ThumbLib.GetThumbfiles

                     If  System.IO.File.Exists(Server.MapPath( " . " )  &   " / "   &  thumb)  Then

                         '  Could use a Literal control here if you want more 
                         '  control over the html.
                         Dim  ThumbImage  As   New  System.Web.UI.WebControls.Image

                        ThumbImage.ImageUrl  =   " thumbs.aspx?thumb= "   &  Server.UrlEncode(thumb)
                        ThumbImage.ImageAlign  =  ImageAlign.Top
                        ThumbImage.AlternateText  =  thumb
                        ThumbImage.BorderStyle  =  BorderStyle.Outset
                        ThumbImage.BorderWidth  =   New  Unit( 1 )
                        ThumbImage.Attributes.Add( " hspace " ,  " 4 " )
                        ThumbImage.Attributes.Add( " vspace " ,  " 4 " )
                        ThumbImage.Attributes.Add( " onclick " ,  " window.location.href=' "   &  thumb  &   " '; " )
                        ThumbImage.Style.Add( " cursor " ,  " hand " )

                        plcThumbs.Controls.Add(ThumbImage)

                     End   If

                 Next

             End   If

            ThumbLib  =   Nothing

         Else

            Response.Write( " Thumbs.db Not Found! " )

         End   If

C#主要代码： 

 string ThumbDb = Server.MapPath( " . " ) + " //thumbs.db " ; if (System.IO.File.Exists(ThumbDb)) { ThumbDBLib.ThumbDB ThumbLib = new ThumbDBLib.ThumbDB(ThumbDb); if ((Request.QueryString[ " thumb " ] != null )) { string Thumb = Request.QueryString[ " thumb " ]; byte [] ThumbData = ThumbLib.GetThumbData(Thumb); Response.Clear(); Response.ContentType = " image/ " + System.IO.Path.GetExtension(Thumb).ToLower().Replace( " . " , "" ); Response.BinaryWrite(ThumbData); Response.Flush(); Response.End(); } else { foreach ( string thumb in ThumbLib.GetThumbfiles()) { if (System.IO.File.Exists(Server.MapPath( " . " ) + " // " + thumb)) { // Could use a Literal control here if you want more // control over the html. System.Web.UI.WebControls.Image ThumbImage = new System.Web.UI.WebControls.Image(); ThumbImage.ImageUrl = " thumbs.aspx?thumb= " + Server.UrlEncode(thumb); ThumbImage.ImageAlign = ImageAlign.Top; ThumbImage.AlternateText = thumb; ThumbImage.BorderStyle = BorderStyle.Outset; ThumbImage.BorderWidth = new Unit( 1 ); ThumbImage.Attributes.Add( " hspace " , " 4 " ); ThumbImage.Attributes.Add( " vspace " , " 4 " ); ThumbImage.Attributes.Add( " onclick " , " window.location.href=' " + thumb + " '; " ); ThumbImage.Style.Add( " cursor " , " hand " ); plcThumbs.Controls.Add(ThumbImage); } } } ThumbLib = null ; } else { Response.Write( " Thumbs.db Not Found! " ); } xt 和 image 数据类型。
浏览效果如图：

 

 

 完毕。
源码可以在这里 下载