VB6 - Elencare file presenti sul desktop

[Rickycast]

La ragione per cui mi occorre elencare i File presenti sul desktop è che devo inviare a diversi utenti (Venditori) un File.mdb per aggiornare i dati di un programma con cui compilano gli ordini. I dati da aggiornare possono anche essere personali e quindi il File che invio è del genere: "AggiornaGiovanni.mdb, AggiornaPiero.mdb" ecc.. Ho anche indicato agli utilizzatori di scaricare il File sul Desktop, per comodità.
Nel Programma nel quale deve essere effettuato l'aggiornamento posso ovviamente utilizzare una "filelistbox" che punta al desktop ma mi piacerebbe di più se il File in questione potesse essere individuato automaticamente dal programma ed utilizzato di conseguenza. Naturalmente la ricerca dovrebbe essere fatta tenendo conto che "left(File ,8)="Aggiorna" ed eventualmente che "Right(File, 4)=".mdb".
Non ho trovato nulla che mi sia d'aiuto e non so da che parte cominciare.
Qualcuno può aiutarmi?
Grazie

[oregon]

Anche se non condivido tutto il ragionamento, la questione si riduce ad usare la Environ per ottenere il valore di USERPROFILE a cui aggiungerai \Desktop. Questo sarà il path in cui cercherai il file, magari con la semplice funzione Dir.

[Rickycast]

Del genere Path = Environ$("USERPROFILE") & "\Desktop\" ??

Ma poi come uso la funzione Dir?

[Rickycast]

Soprattutto, come faccio a riferirmi ad un File del quale conosco con certezza solo i primi n caratteri (Aggiorna)?

[oregon]

Soprattutto, come faccio a riferirmi ad un File del quale conosco con certezza solo i primi n caratteri (Aggiorna)?

Leggi la documentazione della funzione Dir ...

[Rickycast]

Grazie per le informazioni; ho letto la documentazione della funzione Dir e poi ho risolto in questo modo:

    Dim MyFile

    MyFile = Dir(Environ$("USERPROFILE") & "\Desktop\*.mdb")

    Do While Len(MyFile) > 0

        If Left(MyFile, 8) = "Aggiorna" Then
            MsgBox MyFile      ' oppure qualsiasi altra procedura 
            Exit Sub
        End If

    MyFile = Dir
    Loop

Per cortesia fammi sapere se ho scritto qualche stupidagine o come tu miglioreresti lo script.

Grazie

[oregon]

Puoi anche usare

"\Desktop\Aggiorna*.mdb"

nel nome del file ed evitare la Left ...

[Rickycast]

Ancora grazie.