repertoire et sous repertoire et fichier yextRésolu

Question

bonjour a vous tous,

je cherche sur le forum depuis pas mal de temps
quelques lignes de code sous vb6 et je ne trouve pas;

comment créer un repertoire sous c: puis sous se repertoire un sous repertoire et enfin ouvrir le sous repertoire pour y mettre un fichier txtr.
exemple : c:\repertoire\sousrepertoire\fichier.txt

encore merci a tous ce qui mon déja aidé et pour les aides à venir

bye a tous

pcpunch · Accepted Answer

Pourtant ça doit ce trouver ici !!!


'Si il n'existe pas alors on les crées

If Dir("c:\repertoire", vbDirectory) = vbNullString Then MkDir "c:\repertoire"

If Dir("c:\repertoire\sous repertoire", vbDirectory) = vbNullString Then MkDir "c:\repertoire\sous repertoire"

'copie du fichier
FileCopy "c:\xxx\source.txt", "c:\repertoire\sous repertoire\destination.txt"


++

Scalpweb · Answer

Si le fichier texte n'existe pas tu peux le créer avec :

Open "C:\repertoire\sousrepertoire\destination.txt" for output as #1
Close#1

Repertoire et sous repertoire et fichier yext

2 réponses

Discussions similaires