Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > it.comp.lang.visual-basic > #19837
| Newsgroups | it.comp.lang.visual-basic |
|---|---|
| Date | 2020-10-16 06:50 -0700 |
| References | <e18a0fb9-cc04-4db5-a377-8765472b433en@googlegroups.com> <rl7hfp$1uh$1@gioia.aioe.org> <7fe6ce61-aa35-4324-856f-f10f4e05da28n@googlegroups.com> |
| Message-ID | <ff5fbc46-434a-4170-8027-93133c3f5ba3n@googlegroups.com> (permalink) |
| Subject | Re: Scorrere listbox ed eliminare files |
| From | Marco75 <marcoporzi75@gmail.com> |
Il giorno venerdì 16 ottobre 2020 alle 15:38:58 UTC+2 Marco75 ha scritto: > Il giorno venerdì 2 ottobre 2020 alle 17:37:33 UTC+2 Paperino ha scritto: > > Marco75 ha scritto: > > > ciao, > > > ho la necessità di eliminare dei files da una cartella. > > > tali file corrispondono a quelli presenti in una listbox per cui devo scorrere la listbox ed eliminare i file (nome file e item listbox sono identici). > > > ho provato con questo codice ma i file non vengono eliminati: > > > > > > For Each i As String In listbox1.Items.ToString > > > > > > Dim FileToDelete As String > > > FileToDelete = "C:\Cartella di test" & i > > metti qui un debug.print filetodelete e vedi cosa esce. > > Penso che scoprirai che ti sei scordato il backslash > > fra il nome della cartella e il nome del file ;-) > > > If System.IO.File.Exists(FileToDelete) = True Then > > > System.IO.File.Delete(FileToDelete) > > > End If > > > > > > Next > > Bye, G. > ciao, > sono tornato allo sviluppo dell'applicazione, ora ti posto tutto il codice. > in pratica scorro la listbox e devo cancellare da 2 cartelle i files corrispondenti a quanto letto in listbox > Fino a poco fa funzionava, ho fatto una modifica poi cancellata e ora mi dice che il processo non può accedere al file perchè in uso da un altro processo! > > ecco il codice (modifico il nome dei percorsi perchè molto lunghi): > > > 'Scorro la lista delle fow chart selezionate per eliminare il relativo file nella cartella > For a As Integer = 0 To LbFlowChartSelezionateMacina.Items.Count - 1 > > Dim FlowChartText1 As String > > > FlowChartText1 = LbFlowChartSelezionateMacina.Items(a).ToString > > > 'Rimuovo la Flow-Chart dalla cartella lista flow chart ed eventualmente dalla cartella flow chart remota > Dim FileToDelete1 As String > Dim FileToDelete3 As String > > FileToDelete1 = "\\Server\Cartella\1" & FlowChartText1 > FileToDelete3 = "\\Server\Cartella2" & FlowChartText1 > If System.IO.File.Exists(FileToDelete1) = True Then > System.IO.File.Delete(FileToDelete1) > End If > > If System.IO.File.Exists(FileToDelete3) = True Then > System.IO.File.Delete(FileToDelete3) > End If > > > > Next > > l'errore mi compare qui: > If System.IO.File.Exists(FileToDelete1) = True Then > System.IO.File.Delete(FileToDelete1)<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< > End If > > magari esiste un codice più semplice e snello per fare ciò che chiedo... > ho comunque anche un errore quando ho un file ( ad esempio test.pdf) presente sia nella cartella 1 che nella cartella 2 > > devo eliminarli entrambi se presenti > grazie > Marco ho sbagliato a scrivere i percorsi... FileToDelete1 = "\\Server\Cartella1\" & FlowChartText1 FileToDelete3 = "\\Server\Cartella2\" & FlowChartText1
Back to it.comp.lang.visual-basic | Previous | Next — Previous in thread | Next in thread | Find similar
Scorrere listbox ed eliminare files Marco75 <marcoporzi75@gmail.com> - 2020-10-02 03:48 -0700
Re: Scorrere listbox ed eliminare files Paperino <non_te@lo.dico.invalid> - 2020-10-02 17:37 +0200
Re: Scorrere listbox ed eliminare files Marco75 <marcoporzi75@gmail.com> - 2020-10-05 23:17 -0700
Re: Scorrere listbox ed eliminare files Marco75 <marcoporzi75@gmail.com> - 2020-10-16 06:38 -0700
Re: Scorrere listbox ed eliminare files Marco75 <marcoporzi75@gmail.com> - 2020-10-16 06:50 -0700
Re: Scorrere listbox ed eliminare files Marco75 <marcoporzi75@gmail.com> - 2020-10-20 07:23 -0700
Re: Scorrere listbox ed eliminare files Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2020-10-20 21:15 +0200
csiph-web