Chemin de dossier

ralf19b3 Messages postés 77 Date d'inscription dimanche 5 janvier 2003 Statut Membre Dernière intervention 5 janvier 2004 - 10 nov. 2003 à 22:34
ralf19b3 Messages postés 77 Date d'inscription dimanche 5 janvier 2003 Statut Membre Dernière intervention 5 janvier 2004 - 10 nov. 2003 à 22:57
Voila g recuperer un chemin de dossier mais g tout les repertoire depuis la racine du disque dur, je souhaiterait juste avoir le dernier dossier CADsans l'arboressence

3 réponses

cs_phil23 Messages postés 79 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 14 juillet 2005 1
10 nov. 2003 à 22:45
Si c'est VB6 tu peux faire comme ça

Dim MonChemin As String
Dim DernierDossier As String
MonChemin = "C:\Program Files\Microsoft Visual Studio\Common\Graphics\Bitmaps\Assorted"
DernierDossier = Mid(MonChemin, InStrRev(MonChemin, "") + 1)
MsgBox DernierDossier

Si c'est VB5 tu dois utiliser InStr et faire une boucle pour trouver le dernier \
0
cs_phil23 Messages postés 79 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 14 juillet 2005 1
10 nov. 2003 à 22:50
et pour .net

Dim MonChemin As String = "C:\Program Files\Microsoft Visual Studio\Common\Graphics\Bitmaps\Assorted"
Dim DernierDossier As String
DernierDossier = MonChemin.Substring(MonChemin.LastIndexOf("") + 1)
MessageBox.Show(DernierDossier)
0
ralf19b3 Messages postés 77 Date d'inscription dimanche 5 janvier 2003 Statut Membre Dernière intervention 5 janvier 2004
10 nov. 2003 à 22:57
merci Phil23 v allez tester ca de suite, sinon tant que j'y suis conné tu un methode pour compresser un dossier ou son contenue
0
Rejoignez-nous