cs_LordBob
Messages postés2865Date d'inscriptionsamedi 2 novembre 2002StatutMembreDernière intervention11 mai 20099 9 juil. 2003 à 13:32
ouais mais mon prog marche kan meme, meme si il y a un "" de trop mais merci pour avoir réparer le default :)
cs_legion91
Messages postés216Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention15 décembre 2010 9 juil. 2003 à 11:01
avec deux devant dossier
cs_legion91
Messages postés216Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention15 décembre 2010 9 juil. 2003 à 11:00
(avec ton prog sa donne "c:\dossier")
cs_legion91
Messages postés216Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention15 décembre 2010 9 juil. 2003 à 10:58
essai de cree un dossier dans c:, le path indiquer par dir1 est c: donc avec ton prog(puisk tu ajoute "") sa donne c:\dossier on a jamais vu \ pour un emplacement, Donc on va detecter le path(si on peut dire)
Dim a
a = Right$(dir1.path, 1)
If a = "" Then
Dossier = dir1.path
Else
Dossier = dir1.path & ""
End If
Voila la detection est du path est finish.
sebleboss2002
Messages postés189Date d'inscriptionlundi 30 décembre 2002StatutMembreDernière intervention 3 avril 2005 9 juil. 2003 à 10:25
Euh... C'est pas que ce soit gênant de voir ton E mule tourner en fond, mais si des men in black trainaient par là... ;-)
cs_LordBob
Messages postés2865Date d'inscriptionsamedi 2 novembre 2002StatutMembreDernière intervention11 mai 20099 9 juil. 2003 à 10:12
bah en fait c'est à cause d'une question sur le forum que j'ai fait cette source, je me suis dit si une personne en a besion, bah pourquoi pas d'autre, j'ai donc décidé de l'envoyer sur le réseau... mais bon pour moi cette source n'à aucun intérêt, j'ai fait ca en 1 minutes, rien d'exceptionel !!! mais si ca peut aider quelques personnes, alors tant mieux...
bob3000
Messages postés406Date d'inscriptionmardi 7 mai 2002StatutMembreDernière intervention 2 octobre 2004 9 juil. 2003 à 03:46
c pas super mais puisque quil y a des gens ki en on besoin, alors ca peut etre utile :)
9 juil. 2003 à 13:32
9 juil. 2003 à 11:01
9 juil. 2003 à 11:00
9 juil. 2003 à 10:58
Dim a
a = Right$(dir1.path, 1)
If a = "" Then
Dossier = dir1.path
Else
Dossier = dir1.path & ""
End If
Voila la detection est du path est finish.
9 juil. 2003 à 10:25
9 juil. 2003 à 10:12
9 juil. 2003 à 03:46
lol, tu regardais Fast And The Furious?