GDI不能保存的问题
如下两个按钮,第一个完全正常,能够显示图片,第二个上传后报错
但是两个按钮的效果在本机都能完好显示
小弟刚来,只有20分,不好意思
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'建立一个图片
Dim bmp As New System.Drawing.Bitmap(136, 32, Drawing.Imaging.PixelFormat.Format32bppArgb)
Dim grh As System.Drawing.Graphics
grh = System.Drawing.Graphics.FromImage(bmp)
grh.Clear(Drawing.Color.LightSkyBlue)
Dim imgx As String
imgx = "./ico/3.ico"
Dim ic As New System.Drawing.Bitmap(Server.MapPath(imgx))
'叠加
grh.DrawImage(ic, New System.Drawing.RectangleF(0, 0, 32, 32))
'输出
bmp.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg)
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
'建立一个图片
Dim bmp As New System.Drawing.Bitmap(136, 32, Drawing.Imaging.PixelFormat.Format32bppArgb)
Dim grh As System.Drawing.Graphics
grh = System.Drawing.Graphics.FromImage(bmp)
grh.Clear(Drawing.Color.LightSkyBlue)
Dim imgx As String
imgx = "./ico/3.ico"
Dim ic As New System.Drawing.Bitmap(Server.MapPath(imgx))
'叠加
grh.DrawImage(ic, New System.Drawing.RectangleF(0, 0, 32, 32))
'保存
bmp.Save(Server.MapPath("testimg.jpg"), System.Drawing.Imaging.ImageFormat.Jpeg)
End Sub