Punto informatico Network
Login Esegui login | Non sei registrato? Iscriviti ora (è gratuito!)
Username: Password:
  • Annuncio Pubblicitario

verificare presenza di file nascosti

Il forum per tutti i developer. Leggere attentamente il regolamento di sezione prima di postare.

verificare presenza di file nascosti

Messaggioda KillerPenguin » lun apr 16, 2012 2:51 pm

io utilizzo quest'istruzione per verificare se un file esiste o meno:
Codice: Seleziona tutto
Dim TheFile As String
        Dim Results As String
        TheFile = My.Computer.FileSystem.SpecialDirectories.Temp & "\" & "co*.tmp"
        Results = Dir$(TheFile)

        If Results = "" Then
            MsgBox("no") 'no esiste

        Else

            MsgBox("si") 'esiste
        End If


l'istruzione funziona, però se il file da ricercare è nascosto me lo da come inesistente. Come faccio a fare in modo che il file venga rilevato comunque?

P.S. in questo topic [http://www.MegaLab.it/forum/topic76655.html] ho fatto confusione tra i vari comandi dell'applicazione che sto realizzando.
www.TheKillerPenguin.Altervista.org
Avatar utente
KillerPenguin
Bronze Member
Bronze Member
 
Messaggi: 517
Iscritto il: lun feb 14, 2011 6:37 am

R: verificare presenza di file nascosti

Messaggioda KillerPenguin » lun apr 16, 2012 5:11 pm

Scusate ho dimenticato di scriverlo, parliamo di Visual Basic 2010

Inviato dal mio LG Optimous One
www.TheKillerPenguin.Altervista.org
Avatar utente
KillerPenguin
Bronze Member
Bronze Member
 
Messaggi: 517
Iscritto il: lun feb 14, 2011 6:37 am

Re: verificare presenza di file nascosti

Messaggioda developerwinme » lun apr 16, 2012 5:12 pm

Killer Penguin ha scritto:io utilizzo quest'istruzione per verificare se un file esiste o meno:

Non potresti usare la funziona apposita Io.File.Exists? [uhm]

http://msdn.microsoft.com/it-it/library/system.io.file.exists(VS.80).aspx
PC: ASUS X53S (Intel Core i7-2670QM 2.20 Ghz, RAM 8 GB, NVIDIA GeForce GT520MX, Windows 8 Pro)
Mobile: Nokia Lumia 710 (CPU 1,4 Ghz, RAM 512 MB, Windows Phone 7.8)
--
developerwinme.wordpress.com
Avatar utente
developerwinme
Membro Ufficiale (Gold)
Membro Ufficiale (Gold)
 
Messaggi: 5014
Iscritto il: mar dic 30, 2008 7:00 pm
Località: Como


Re: verificare presenza di file nascosti

Messaggioda KillerPenguin » mar apr 17, 2012 1:56 pm

developerwinme ha scritto:
Killer Penguin ha scritto:io utilizzo quest'istruzione per verificare se un file esiste o meno:

Non potresti usare la funziona apposita Io.File.Exists? [uhm]

http://msdn.microsoft.com/it-it/library/system.io.file.exists(VS.80).aspx


il problema è che questo metodo esige un percorso specifico del file e quindi non mi permette di usare i caratteri Jolly.

comunque credo che era questo che intendevi tu:
Codice: Seleziona tutto
Dim path As String = My.Computer.FileSystem.SpecialDirectories.Temp & "\" & [b]"co*.tmp"[/b]
        If File.Exists(path) Then
            MsgBox("il file esiste")
        Else
            MsgBox("non esiste")
        End If

ovviamente prima ho importato le istruzioni System.IO
www.TheKillerPenguin.Altervista.org
Avatar utente
KillerPenguin
Bronze Member
Bronze Member
 
Messaggi: 517
Iscritto il: lun feb 14, 2011 6:37 am

Re: verificare presenza di file nascosti

Messaggioda developerwinme » mer apr 18, 2012 6:24 am

Il tuo codice dovrebbe andare bene (entrambi gli stralci che hai postato); per correggere il primo dovrebbe bastare che passi alla funzione Dir come secondo parametro il valore che specifica di cercare anche tra i file nascosti (vbHidden). Ulteriori informazioni qui (sezione Parametri e sezioni Impostazioni).

Se hai bisogno di altro, chiedi pure. [^]
PC: ASUS X53S (Intel Core i7-2670QM 2.20 Ghz, RAM 8 GB, NVIDIA GeForce GT520MX, Windows 8 Pro)
Mobile: Nokia Lumia 710 (CPU 1,4 Ghz, RAM 512 MB, Windows Phone 7.8)
--
developerwinme.wordpress.com
Avatar utente
developerwinme
Membro Ufficiale (Gold)
Membro Ufficiale (Gold)
 
Messaggi: 5014
Iscritto il: mar dic 30, 2008 7:00 pm
Località: Como

Re: verificare presenza di file nascosti

Messaggioda KillerPenguin » mer apr 18, 2012 7:10 pm

developerwinme ha scritto:Il tuo codice dovrebbe andare bene (entrambi gli stralci che hai postato); per correggere il primo dovrebbe bastare che passi alla funzione Dir come secondo parametro il valore che specifica di cercare anche tra i file nascosti (vbHidden). Ulteriori informazioni qui (sezione Parametri e sezioni Impostazioni).

Se hai bisogno di altro, chiedi pure. [^]


perfetto! [^] in pratica bastava cambiare questa:
Codice: Seleziona tutto
Results = Dir$(TheFile)


con questa:
Codice: Seleziona tutto
Results = Dir$(TheFile, vbHidden)


Ti ringrazio ancora [grazie]
www.TheKillerPenguin.Altervista.org
Avatar utente
KillerPenguin
Bronze Member
Bronze Member
 
Messaggi: 517
Iscritto il: lun feb 14, 2011 6:37 am

Re: verificare presenza di file nascosti

Messaggioda developerwinme » mer apr 18, 2012 8:51 pm

Assicurati di verificare che, con questa modifica, non vengano elencati solo i file con l'attributo "nascosto". Per il resto, tutto ok così: felice che abbia risolto. [^]
PC: ASUS X53S (Intel Core i7-2670QM 2.20 Ghz, RAM 8 GB, NVIDIA GeForce GT520MX, Windows 8 Pro)
Mobile: Nokia Lumia 710 (CPU 1,4 Ghz, RAM 512 MB, Windows Phone 7.8)
--
developerwinme.wordpress.com
Avatar utente
developerwinme
Membro Ufficiale (Gold)
Membro Ufficiale (Gold)
 
Messaggi: 5014
Iscritto il: mar dic 30, 2008 7:00 pm
Località: Como

R: verificare presenza di file nascosti

Messaggioda KillerPenguin » mer apr 18, 2012 10:41 pm

developerwinme ha scritto:Assicurati di verificare che, con questa modifica, non vengano elencati solo i file con l'attributo "nascosto". Per il resto, tutto ok così: felice che abbia risolto. [^]

Si si, é la prima cosa che ho controllato, vengono elencati sia quelli con l'attributo "nascosto" che quelli "normali".

Inviato dal mio LG Optimous One
www.TheKillerPenguin.Altervista.org
Avatar utente
KillerPenguin
Bronze Member
Bronze Member
 
Messaggi: 517
Iscritto il: lun feb 14, 2011 6:37 am


Torna a Programmazione

Chi c’è in linea

Visitano il forum: Nessuno e 5 ospiti

Powered by phpBB © 2002, 2005, 2007, 2008 phpBB Group
Traduzione Italiana phpBB.it

megalab.it: testata telematica quotidiana registrata al Tribunale di Cosenza n. 22/09 del 13.08.2009, editore Master New Media S.r.l.; © Copyright 2008 Master New Media S.r.l. a socio unico - P.I. 02947530784. GRUPPO EDIZIONI MASTER Spa Tutti i diritti sono riservati. Per la pubblicità: Master Advertising