RELATEED CONSULTING
相关咨询
选择下列产品马上在线沟通
服务时间:9:30-18:00
你可能遇到了下面的问题
关闭右侧工具栏
asp.net生成缩略图
  • 作者:xiaoxiao
  • 发表时间:2020-12-23 10:36
  • 来源:未知

当我们要上传图片的时候,往往需要生成缩略图,以往我们要使用第三方控件才能完成。在asp.net中用下面方法轻松搞定 <script language="VB" runat="server"> Sub Page_Load(sender As Object, e As EventArgs) Dim image,aNewImage As System.Drawing.Image dim width,height,newwidth,newheight as integer Dim callb As System.Drawing.Image.GetThumbnailImageAbort '生成缩略图 image=System.Drawing.Image.FromFile(Server.MapPath("classpic/"+"rs1.jpg")) width=image.Width height=image.height if width>height then newwidth=110 newheight=image.height/image.Width*newwidth else newheight=110 newwidth=image.Width/image.height*newheight end if aNewImage=image.GetThumbnailImage(newwidth,newheight,callb,new System.IntPtr()) aNewImage.Save(Server.MapPath("smallpic/"+"rs1.gif")) image.Dispose() End Sub </script>