Ciao a tutti!
Avrei bisogno della vostra preziosa consulenza. Sto scrivendo un programma in Vb.net strutturato per caricare alcune immagini in una cartella posta nella directory C. Per fare questo ho creato due buttons, uno con la funzione di caricare il file:
Private Sub BrowserFilePng_Click(sender As Object, e As EventArgs) Handles BrowserFilePng.Click
OpenFileDialog1.Filter = "Image Files (*.png, *.png)|*.png;*.png"
Dim result As DialogResult = OpenFileDialog1.ShowDialog()
End Sub
l'altro di scriverlo nella directory specifica:
Private Sub UploadFileCartellaImmagini_Click(sender As Object, e As EventArgs) Handles UploadFileCartellaImmagini.Click
If My.Computer.FileSystem.DirectoryExists(My.Settings.StellariumPercorsoCartellaFotografie & "Immagini") Then
Dim count As Integer = 0
Dim FilenameName As String()
For Each item As String In OpenFileDialog1.FileNames
FilenameName = item.Split("\"c)
File.Copy(item, My.Settings.StellariumPercorsoCartellaFotografie & "Immagini\"& FilenameName(FilenameName.Length - 1))
System.Math.Max(System.Threading.Interlocked.Increment(count), count - 1)
Next
MessageBox.Show("Hai copiato "& Convert.ToString(count) & " file(s) nella cartella immagini!")
Else
MessageBox.Show("La cartella delle immagini ""Immagini"" non esiste!", "Stellarium Skydome Control:", MessageBoxButtons.OK, MessageBoxIcon.Information)
Exit Sub
End If
End Sub
Il listato funziona correttamente e il/i file/s vengono caricati correttamente. Ora però, vorrei introdurre un controllo per verificare se il file che voglio copiare nella cartella "Immagini"è già presente, questo per evitare l'errore che fa crashare il programma. Come potrei fare?
Grazie infinite a chi potrà aiutarmi!