recuperation du chemin d'un fichier

Question

alor voila je voudrais recuperer le chemin d'un fichier le probléme c'est ke ce chemint est appelé a changer (l'application va étre installer un peu partout )donc je sais pas comment faire pour recupéré le chemin relatif du fichier ke je veux(ce fichier je suis senser le copier et le coller dans un otre dossier) merci de votre aide

crenaud76 · Answer

Si le fichier se trouve dans le répertoire de ton appli, tu peux utiliser App.Path

Christophe

olixelle · Answer

t pas en train de faire un troyen toi ?

sinon, 2 soluces:
1: tu mets un fichier toujours au mm endroit qui référence le second
2: tu enregistres le chemin dans la base de registre
3: tu fais une recherche sur tout le disk :)

cs_CanisLupus · Answer

Salut, pour trouver le chemin complet d'un fichier, oriente-toi vers l'api GetFullPathName.
Exemple pomp&#233; sur allapi.net :

Private Declare Function GetFullPathName Lib "kernel32" Alias "GetFullPathNameA" (ByVal lpFileName As String, ByVal nBufferLength As Long, ByVal lpBuffer As String, ByVal lpFilePart As String) As Long
Private Sub Form_Load()
    'KPD-Team 2000
    'URL: http://www.allapi.net/
    'E-Mail: [mailto:KPDTeam@Allapi.net KPDTeam@Allapi.net]
    Dim Buffer As String, Ret As Long
    'create a buffer
    Buffer = Space(255)
    'copy the current directory to the buffer and append 'notepad.exe'
    Ret = GetFullPathName("notepad.exe", 255, Buffer, "")
    'remove the unnecessary chr$(0)'s
    Buffer = Left(Buffer, Ret)
    'show the result
    MsgBox Buffer
End Sub

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

dexterovitch · Answer

merci les gars je vais de ce pas tester ce ke vous m'avez donner je vous tien au courant du resultat (eeh non je fait pas un troyen je suis sur projet d'automatisation de processus pour un de nos client!!)

Recuperation du chemin d'un fichier

4 réponses

Discussions similaires