Ciao a tutti... vi sottopongo il mio problema nella speranza di trovare una soluzione...
Il mio scopo è effettuare la sovrascrittura di un file immagine precaricato in una picturebox.
Vi scrivo il codice:
Allora, premetto che il file PIPPO.JPG è gia stato caricato nella picturebox tramite la SUB SETIMAGE
Il problema è ke pur facendo il "imgFotoAcquisto.Image = Nothing" a lui non gli frega nulla e nel momento in cui arriva a "IO.File.Copy(FileName, prcImgAcq, True)" mi dice ke il file è in uso da un'altro processo. Come faccio io a dirgli ke non deve piu usare il vecchio file..
EVENTO BOTTONE [
filename = OpenFileDialog.FileName
Dim ext As String
setImage(FileName, imgFotoAcquisto, lblImgAcq, btnAddImageAcquisto)
imgFotoAcquisto.Image = Nothing
ext = FileName.Substring(FileName.Length() - 4, 4)
prcImgAcq = "PIPPO.JPG"
sql = "UPDATE tabTestataBonsai SET imgAcquisto='" & prcImgAcq & "' WHERE Codice=" & codiceBonsai
ExeUpdate(sql)
IO.File.Copy(FileName, prcImgAcq, True)
setImage(prcImgAcq, imgFotoAcquisto, lblImgAcq, btnAddImageAcquisto)
]
SETIMAGE:
Private Sub setImage(ByVal perc As String, ByVal img As PictureBox, ByVal lbl As Label, ByVal btn As Button)
Try
Dim image As System.Drawing.Image
image = Drawing.Image.FromFile(perc)
img.Image = image
lbl.Visible = False
btn.Visible = False
Catch ex As Exception
lbl.Visible = True
btn.Visible = True
End Try
End Sub
Non so se sono stato chiaro, cmq se qlc non è chiaro chiedete...
GRAZIE A TUTTI
ciao
Chrono
Rispondi quotando
