在ASP.NET里轻松实现缩略图
来源:互联网 发布:sql2005还原数据库 编辑:程序博客网 时间:2024/05/02 11:58
在ASP.NET里轻松实现缩略图 |
作者:孟宪会 出自:【孟宪会之精彩世界】 发布日期:2003年5月23日 8点26分35秒 |
以前,在页面上实现缩略图必须借助第三方组件。现在,有了.NET,就可以很轻松地实现缩略图。下面就是实现缩略图的例子。 代码如下:Thumbnail.aspx 后代码:Thumbnail.aspx.vb 在ASP.NET里轻松实现缩略图" Button1.Text = "上载并显示缩略图" End Sub Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim MyFileColl As HttpFileCollection = HttpContext.Current.Request.Files Dim MyPostedFile As HttpPostedFile = MyFileColl.Item(0) If LCase(MyPostedFile.ContentType.ToString()).IndexOf("image") < 0 Then Response.Write("无效的图形格式。") Exit Sub End If GetThumbNail(MyPostedFile.FileName, 100, 100, MyPostedFile.ContentType.ToString(),_ False, MyPostedFile.InputStream) End Sub Private Function GetImageType(ByVal strContentType) As System.Drawing.Imaging.ImageFormat Select Case (strContentType.ToString().ToLower()) Case "image/pjpeg" GetImageType = System.Drawing.Imaging.ImageFormat.Jpeg Case "image/gif" GetImageType = System.Drawing.Imaging.ImageFormat.Gif Case "image/bmp" GetImageType = System.Drawing.Imaging.ImageFormat.Bmp Case "image/tiff" GetImageType = System.Drawing.Imaging.ImageFormat.Tiff Case "image/x-icon" GetImageType = System.Drawing.Imaging.ImageFormat.Icon Case "image/x-png" GetImageType = System.Drawing.Imaging.ImageFormat.Png Case "image/x-emf" GetImageType = System.Drawing.Imaging.ImageFormat.Emf Case "image/x-exif" GetImageType = System.Drawing.Imaging.ImageFormat.Exif Case "image/x-wmf" GetImageType = System.Drawing.Imaging.ImageFormat.Wmf Case Else GetImageType = System.Drawing.Imaging.ImageFormat.MemoryBmp End Select End Function Private Sub GetThumbNail(ByVal strFileName, ByVal iWidth, ByVal iheight, ByVal strContentType, _ ByVal blnGetFromFile, ByVal ImgStream) Dim oImg As Image If blnGetFromFile Then oImg = oImg.FromFile(strFileName) Else oImg = oImg.FromStream(ImgStream) End If oImg = oImg.GetThumbnailImage(iWidth, iheight, Nothing, (New IntPtr()).Zero) Dim strGuid As String = (New Guid()).NewGuid().ToString().ToUpper() Dim strFileExt As String = strFileName.Substring(strFileName.LastIndexOf(".")) '保存到本地 'oImg.Save(Server.MapPath("images") + "/" + strGuid + strFileExt, GetImageType(strContentType)) '直接输出url文件 'Response.Redirect("images/" + strGuid + strFileExt) '以下显示在屏幕上 Response.ContentType = strContentType Dim MemStream As New MemoryStream() ' 注意:这里如果直接用 oImg.Save(Response.OutputStream, GetImageType(strContentType)) ' 对不同的格式可能会出错,比如Png格式。 oImg.Save(MemStream, GetImageType(strContentType)) MemStream.WriteTo(Response.OutputStream) End SubEnd ClassC# 在ASP.NET里轻松实现缩略图"; Button1.Text = "上载并显示缩略图"; }#region Web 窗体设计器生成的代码override protected void OnInit(EventArgs e){//// CODEGEN: 该调用是 ASP.NET Web 窗体设计器所必需的。//InitializeComponent();base.OnInit(e);}/// |
- 在ASP.NET里轻松实现缩略图
- 在ASP.NET里轻松实现缩略图
- 在ASP.NET里轻松实现缩略图
- 在ASP.NET里轻松实现缩略图
- 在ASP.NET里轻松实现缩略图
- asp.net实现缩略图
- 在ASP.NET中轻松实现加密
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- 在虚拟主机上用asp.net轻松实现urlrewrite
- asp.net简易图片压缩,缩略图实现
- 用C#轻松地在DOTNET中实现缩略图
- 在ASP.NET中实现多文件上传
- 在服务器端得到可编辑Iframe的HTML源代码
- 用ASP.NET加密Cookie数据
- 一个可逆加密的例子
- 为DataGrid添加CheckBox控件
- 在ASP.NET里轻松实现缩略图
- 为DataGrid添加自动编号功能
- ubb代码转化html代码
- java连接oracle,取io文件内容,子串替换(原作)!
- IP层协议安全结构(IPsec)--网络大典
- 格式化DataGrid的例子【将数据源中的0,1值或者逻辑值转换成实际的文字】
- 为DataGrid添加确认删除的对话框
- 创建自滚动的DataGrid
- 利用HtmlGenericControl类,动态改变Title文字