Création de repertoire ? petit probleme !personne ne sait ?

Marsh Posté le 31-07-2002 à 20:42:08

J'aimerais créer un repertoir
comme celui
c:\tata\coucouc\chacha
imaginons que c:\tata\coucouc\chachase trouve dans text2.text
quand je fais
MKDIR text2.text
il ne me crée que le premier repertoire sois tata
comment faire pour créer tout les repertoires
MErci
:bounce:

Message édité par remixgame le 31-07-2002 à 21:50:11

Marsh Posté le 31-07-2002 à 20:42:08

Marsh Posté le 31-07-2002 à 22:20:50

personne n'est donc capable de repondre ?

Marsh Posté le 01-08-2002 à 09:02:21

il faut travailler sur ta chaine de caractéres, a savoir détecter les "/". Je m'explique. Un chemin est fait de telle facçon :

[racine]:\{nom_1}\{nom_2}\{nom_3}

autrement dis les noms si tu remarque sont compris entre deux "\". tu détecte donc la 1er fois la racine "[lecteur]:\", pour détecter si le chemin saisie est valide !

Code :

left(text1.text,4)

enuite du détecte la position en partant de gauche, du premier caractére "\", en l'occurence, c'est 3. Ce chiffre sera toujours le même !

ensuite avec la fonction MID, tu va prendre chaque caratère et tu va les passer dans une condition. A savoir !

Code :

for i = 1 to len(text1.text)
a = mid(text1.text,i,1)
if b = "\" OR i = len(text1.text) then c = c + 1
if b <> "\" then
b = b + a
end if
if c = 2 then
MKDIR(b)
b = ""
c = 0
end if
next i

je ne sais pas si tu as compris le code. Pour faire simple, tu

Détecte les caratères "\"
Dés que tu en trouve 1 "c" = 1.
En attendant les caractéres sont enregsitrer dans une autre variable "b"
Dés que tu trouve un deuxiéme "\", c passe alors à 2
le compteur "b", s'arrette.
Tu créer alors ton répertoire, dont le nom sera b
Tu remets les variables à 0 et "". NE pas oublier, sinon, erreur !!!

le code pendant ce temps continue et s'arretera tous seul, avec la création du dernier répetoire...Aprés tu peux l'adapter à savoir détecter s'il existe sur le disque,ect...

PS : ATTENTION A L'INITIALISATION DES VARIABLES QUE JE N'AI PAS MISE C DOIT EGALE A 0 ET UNIQUEMENT.

Message édité par macray le 01-08-2002 à 09:06:32

---------------
;) Bienvenue sur le site...:) http://perso.wanadoo.fr/rapport

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *