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

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

请先到这里下载一个控件

ThumbDBLib

A C# library for reading thumbs.db files

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主要代码:

Code
 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#主要代码：

Code
 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!");
            }

 
浏览效果如图：

 

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

转载于:https://www.cnblogs.com/downmoon/archive/2009/06/04/1495915.html