1

我正在尝试基于原始图像作为模板创建图像。

a picture > kapak.jpg - resize to 1366x768 > orta.jpg - resize to 848x480

代码正在运行。没有错，但是当我使用时；代码块 2 它锁定了 kapak.jpg 文件

我无法删除或重命名等。即使我关闭浏览器或 vstudio 或全部。没有任何改变，只是重新启动 iis。我什至不能在文件浏览器上删除它。它只是锁定它，不允许任何事情。它是这么说的；w3wp.exe 或 iis express worker 正在使用此文件，因此您无法删除等。访问被拒绝。

我尝试将位图的 dispose 或 =nothing 移动代码块 2 到另一个 sub 没有任何改变。

如果我不使用代码块 2，它会创建并允许我删除或重命名等。

任何建议将不胜感激。如何释放文件？

button_1_click

gelenIMG.ImageUrl = "\dene_2.jpg"

Dim uzatBOYfark As Integer
Dim uzatENfark As Integer
Dim kapakRESIMayar As New Rectangle(0, 0, 1366, 768)

uzatENfark = kapakRESIMayar.Width : uzatBOYfark = kapakRESIMayar.Height

Using orijinalRESIM = Image.FromFile(Server.MapPath(gelenIMG.ImageUrl))
If orijinalRESIM.Width < kapakRESIMayar.Width Then uzatENfark = kapakRESIMayar.Width * (kapakRESIMayar.Width / orijinalRESIM.Width)
If orijinalRESIM.Height < kapakRESIMayar.Height Then uzatBOYfark = kapakRESIMayar.Height * (kapakRESIMayar.Height / orijinalRESIM.Height)

Using kapakZEMINsablon = New Bitmap(kapakRESIMayar.Width, kapakRESIMayar.Height)
Using grp = Graphics.FromImage(kapakZEMINsablon)
grp.Clear(Color.Red)
grp.DrawImage(orijinalRESIM, New Rectangle(0, 0, uzatENfark, uzatBOYfark + 1), kapakRESIMayar, GraphicsUnit.Pixel)
End Using
kapakZEMINsablon.Save(Server.MapPath(geciciRESIMyeri & "\kapak.jpg"), Imaging.ImageFormat.Jpeg)
End Using
End Using
imgKAPAK.ImageUrl = geciciRESIMyeri & "\kapak.jpg"


code block 2:
Dim bitmapORTA As New Bitmap(Image.FromFile(Server.MapPath(imgKAPAK.ImageUrl), True), 848, 480)
bitmapORTA.Save(Server.MapPath(geciciRESIMyeri & "\orta.jpg"), Imaging.ImageFormat.Jpeg)
imgORTA.ImageUrl = geciciRESIMyeri & "\orta.jpg"
4

0 回答 0