问题：如何读取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!");
}
浏览效果如图：
完毕。
源码可以在这里下载
.gif)
问题：如何读取thumbs.db里的缩略图?
