Domanda Visual Studio 2019 vb.net Verifica l'esistenza di un file.

Pacifico437

Utente abituale
17 Novembre 2015
625
16
82
Bari
Office 2010
5
Gent.mi,

in un programma, gradirei effettuare una verifica se un file con l'estensione .Txt esiste o meno.
I codici che ho testato mi hanno dato un risultato negativo e gradirei un vostro gradito suggerimento.
Con il seguente codice, ho creato regolarmente una cartella:

Visual Basic:
My.Computer.FileSystem.CreateDirectory(Environment.CurrentDirectory + "\Prova")
con il seguente codice dovrei verificare se il file esiste nella cartella creata o meno

Visual Basic:
If System.IO.Directory.Exists(percorso + "\Primo.txt") = True Then
     MsgBox("Esiste") 
  Else
     MsgBox("Il file non esiste")
  End If
o
> Dim File As String = percorso + "\Primo.txt"
      If IO.File.Exists(percorso & File) = True Then
         MsgBox("Il file esiste")
      Else
         MsgBox("Il file non esiste")
end if
Anticipatamente ringrazio, saluto.
Domenico
 

patel

Utente assiduo
25 Marzo 2016
1.374
38
74
Livorno
2010
3
dove e come hai valorizzato percorso ?
io farei
Codice:
dim percorso as string = Environment.CurrentDirectory + "\Prova"
My.Computer.FileSystem.CreateDirectory(percorso)
If System.IO.Directory.Exists(percorso + "\Primo.txt") = True Then
     MsgBox("Esiste")
Else
     MsgBox("Il file non esiste")
End If
 

Pacifico437

Utente abituale
17 Novembre 2015
625
16
82
Bari
Office 2010
5
Gent.mo Patel,
ringrazio della gentilezza e disponibilità.
Non funziona. Il file ESISTE o NON ESISTE esce sempre "Il file non esiste".
mentre con il seguente codice funziona:

Visual Basic:
 Dim Nome As String
        Nome = (Environment.CurrentDirectory + "\Prova\Primo.txt")
        If File.Exists(Nome) Then
            MsgBox("Esiste")
        Else
            MsgBox("Non esiste")
        End If
Il codice l'ho inserito nell'evento Load del Form.
Essendo un nuovo argomento, dovrei aprire una nuova discussione ed essendo banale approfitto e se ritieni opportuno accetto il suggerimento.
In un Form ho una Label dove viene visualizzata la data odierna.
Considerando che la data varia giornalmente, gradirei che sia sempre al centro del Form.
Ho provato con la funzione "Location" senza riuscire.
Nell'augurare una buona giornata, saluto.
Domenico.
 

patel

Utente assiduo
25 Marzo 2016
1.374
38
74
Livorno
2010
3
in questi casi fai prima a cercare su google
 

Pacifico437

Utente abituale
17 Novembre 2015
625
16
82
Bari
Office 2010
5
Gent.mo Patel,
il Forum è l'ultima tappa ed è mia abitudine fare le dovute ricerche.
Questa volta è stata un eccezione considerando, la banalità della richiesta e la risposta del problema riguarda ai codici l'ho inserita.
Comunque non ha nessuna importanza.
Ringrazio della cortesia e disponibilità, saluto.
Domenmico.
 

Sostieni ForumExcel

Aiutaci a sostenere le spese e a mantenere online la community attraverso una libera donazione!