Posso selezionare con un FolderBrowserDialog1 una cartella di destinazione, ma effettuo un controllo che l' accesso sia autorizzato cercando di copiarci un file.
Ebbene, qualsiasi cartella seleziono, anche fosse la "Windows" o "C:\Program Files (x86)"... non ottengo MAI nessuna eccezione.
codice:Try 'copio solo per verificare che sia possibile... Debug.Print(FolderBrowserDialog1.SelectedPath) If File.Exists(Application.StartupPath & "\Data\Flag.txt") Then File.Copy(Application.StartupPath & "\Data\Flag.txt", _ FolderBrowserDialog1.SelectedPath & "\Flag.txt", True) End If Sleep(100) 'If File.Exists(FolderBrowserDialog1.SelectedPath & "\Flag.txt") Then ' Debug.Print("Ok, il file esiste, lo cancello") ' File.Delete(FolderBrowserDialog1.SelectedPath & "\Flag.txt") 'Else ' Throw New UnauthorizedAccessException("UnauthorizedAccessException") 'End If Catch uae As UnauthorizedAccessException Debug.Print(uae.ToString) FrmMessBox.PictureBox1.Image = SystemIcons.Error.ToBitmap FrmMessBox.lblMessaggio.Text = uae.Message & vbCrLf & My.Resources.Messages.ChangeFolder FrmMessBox.ShowDialog() Catch ex As Exception Debug.Print(ex.ToString) FrmMessBox.PictureBox1.Image = SystemIcons.Error.ToBitmap FrmMessBox.lblMessaggio.Text = ex.Message & vbCrLf & My.Resources.Messages.ChangeFolder FrmMessBox.ShowDialog() End Try
allora ho aggiunto il codice che al momento è commentato... e ottengo SEMPRE il messaggio:
"Ok, il file esiste, lo cancello"
PECCATO CHE SE COMMENTO NUOVAMENTE e vado a vedere se il file esiste... il file non esiste affatto!![]()
Il che è anche ovvio, visto che in certe cartelle non ci posso scrivere: ma perché lo vede (che non c' è!) e non ottengo eccezioni?


Rispondi quotando