如何读取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

<!-- {cps..0}--> < 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 <!-- {cps..1}--> 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 ' CoulduseaLiteralcontrolhereifyouwantmore ' controloverthehtml. 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.dbNotFound! " ) 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 数据类型。 浏览效果如图：

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

相关资源：thumbs.db文件下载