Rechercher un fichier sur le disque

Angers le 02/10/00

Mon soucis est le suivant:

je cherche faire un application skinable.Je veux donc charger un image dans le fond de mon application.Pour cela j'utilise la commande loadpicture mais est il possible aprés avoir écrit le chemin d'accés "en dur dans le code" de mettre le nom du fichier de l'image "à la volé". Il faut donc pouvoir ressortir le nom du fichier et le concatener dans la commande loadpicture.

Comment peut ton retrouver le fichier et son nom

Merci pour votre réponse

A++ :-)

MAY THE FORCE BE WITH YOU

si tu est en vb6, tu es béni:
CompleteFile="C:TempImage.bmp"
Filename = Mid$(CompleteFile,InstrRev(CompleteFile,"")+1)



-------------------------------
Réponse au message :
-------------------------------

Angers le 02/10/00

Mon soucis est le suivant:

je cherche faire un application skinable.Je veux donc charger un image dans le fond de mon application.Pour cela j'utilise la commande loadpicture mais est il possible aprés avoir écrit le chemin d'accés "en dur dans le code" de mettre le nom du fichier de l'image "à la volé". Il faut donc pouvoir ressortir le nom du fichier et le concatener dans la commande loadpicture.

Comment peut ton retrouver le fichier et son nom

Merci pour votre réponse

A++ :-)

MAY THE FORCE BE WITH YOU
-------------------------------

Dan sla partie déclaration:
dim fs
dim trouve as boolean

Si le nom du fichie r(nomfichier) est la concaténation de deux variables (nom1+nom2+extension

Recherchons ce fichier sur le disque
Set fs=CreateObject("Scripting.FilesSystemObject")
trouve=fs.FolderExists(nomfichier)

If trouve=true then
..............('exemple load fichier image
else
.....
end if