Salve, ho il seguente codice che mi da' l'ouput a video di una immagine, ora, vorrei che questa immagine venga uploadata sul server e sovrascriva la vecchia...chi mi da una mano veloce ? grazie:

dim bm as BitMap
try
Response.Clear()
bm= New Bitmap(Request.MapPath("/public/"&inputNome.value))
Dim encParams As EncoderParameters = New EncoderParameters()
'0 = minima qualità (immagine molto "sgranata")
'100 = massima qualità (immagine "perfetta")
Dim compressione As Integer = 70
dim encParam as New EncoderParameter(Imaging.Encoder.Quality, compressione)
encParams.Param(0) = encParam
Dim imageCodecs() As ImageCodecInfo = ImageCodecInfo.GetImageEncoders()
Dim imageCodec As ImageCodecInfo = Nothing
Dim i As Integer
For i = 0 to imageCodecs.Length- 1
If imageCodecs(i).MimeType="image/jpeg" Then
imageCodec = imageCodecs(i)
Exit For
End If
Next

'invio a video
Response.ContentType="image/jpeg"
bm.Save(Response.OutputStream, imageCodec, encParams)
inputFile.PostedFile.SaveAs( Server.MapPath("/public/pippo2.jpg") )
catch
Response.Write ("Impossibile visualizzare l'immagine!")
finally
if not bm is nothing then bm.Dispose()
end try