VB 2008 - Errore su eliminazione file

lunedì 27 luglio 2015 - 16.25
Tag Elenco Tags  VB.NET  |  .NET 3.5  |  Windows 7  |  Visual Studio 2008

mdnet76 Profilo | Newbie

Ciao a tutti, all'interno di un programma che sto sviluppando ho implemtato del codice per eliminare una cartella e tutti i file contenuti, del quale pubblico il codice ma purtroppo mi genera sempre un errore che allego.

'Elimino il record dalla tabella
If MessageBox.Show("Eliminare l'elemento selezionato ?", "Registro lavori", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then

'Libero la picturebox in modo da poter elimimare la cartella e il file
PictureBox1.Image.Dispose()

'Elimino la cartella che contiene i file di Preview
Dim PathPreview
txtID.Text = DataGridView1.CurrentRow.Cells(0).Value
PathPreview = "c:\Preview\" & txtID.Text & "\"
My.Computer.FileSystem.DeleteDirectory(PathPreview , FileIO.UIOption.AllDialogs, FileIO.RecycleOption.DeletePermanently)

Catch ex As OleDbException
MsgBox(ex.Message, MsgBoxStyle.Critical, "Oledb Error")
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "General Error")
End Try
Else
Exit Sub
End If


L'errore che mi genera è il seguente:


418x280 18Kb

ysdemarc Profilo | Expert

Ciao non credo che PictureBox1.Image.Dispose() faccia quello che tu desideri.

Purtroppo così anche gli oggetti Bitmap e affini.

Prova a dare alla Picturebox piuttosto che il file fisico una copia dell'immagine magari aprendo il file con questa routine (per comodità scrivo in c#):

Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra
Vincenzo
Programmatore sbilenco

mdnet Profilo | Newbie

Grazie infinite del suggerimento, ho risolto.
Grazie 1000
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5