Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1496 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Cherche à créer un ficher avec 6400 noms (numéro.numéro.jpg)

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Cherche à créer un ficher avec 6400 noms (numéro.numéro.jpg)

n°2167389
pascal83
Posté le 09-12-2012 à 18:22:49  profilanswer
 

Bonjour je cherche à créer un ficher matrice.txt
Qui comporterait  6400 noms de fichier (format : num.num.JPG)
Nom au format X(point)Y(point)JPG
Avec X allant de par exemple 95139 à 95226  
Et Y de 136609 à 136696 soit 64000 noms.
Je dois faire cela avec d’autre valeur aussi !
Je pensais utiliser Qbasic tout simplement, mais j’ai des soucies, il me met des espaces entre les (point) dans mes nom de fichiers, et il n’en faut pas.
 
Mon bout de programme (cela fait 20 ans que j’ai pas programmé !) :(  
 
X1=95139
X2=95226
Z1=136609
Z2=136400
X=X1  
Z=Z1
OPEN "matrices.txt" FOR OUTPUT A$ #1
DO
PRINT #1, X ; CHR$(46); Z;".JPG"
X=X+1
IF X=X2 THEN Z=Z+1 : X=X1
IF Z=Z2 THEN CLOSE #1 : END
LOOP
 
Voila ci quelqu’un peut de donner l’astuce pour supprimer les espaces entre les points. :hello:  
Nb : il faut que cela soit écrit comme cela 95139.136609.JPG
Je suis preneur de toute autre solution pour créer ce fichier  ;)  
Merci d’avance
Pascal

mood
Publicité
Posté le 09-12-2012 à 18:22:49  profilanswer
 

n°2167392
Arl Guhr
Posté le 09-12-2012 à 19:07:13  profilanswer
 

PRINT #1, X & "." & Z & ".JPG"
 
"simplement" ?
 
ou plutot
PRINT #1, X + "." + Z + ".JPG"
 
De ce que je lis ici sur le Qbasic.
http://westcompsci.pima.edu/cis100/basic-15.html


Message édité par Arl Guhr le 09-12-2012 à 19:11:38
n°2167397
pascal83
Posté le 09-12-2012 à 20:10:38  profilanswer
 

Bonsoir, cela ne fonctionne pas, ce n’est pas pris en compte, erreur de syntaxe, mais cela vient du logiciel Qbasic 4.5 qui est vieillot !
Quel logiciel basic utilisé (pas de Visual basic, je n’y comprends rien)
Merci
Pascal

n°2167414
kiki29
Posté le 10-12-2012 à 09:10:26  profilanswer
 

Salut, pas de bras pas de chocolat .... sinon voir http://warin.developpez.com/access/fichiers/


Message édité par kiki29 le 10-12-2012 à 10:37:16

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
n°2167426
Marc L
Posté le 10-12-2012 à 11:23:44  profilanswer
 

 
               Bonjour !   Je n'ai plus mon vieux QBasic sous le coude mais normalement comme exposé par Art Guhr,
               l'un de ses codes devraient fonctionner ...
 
               Sinon au pire ce serait réglé en utilisant la fonction TRIM :
 

Code :
  1.   PRINT #1, TRIM$(X) & "." & TRIM$(Z) & ".jpg"

n°2167503
Arl Guhr
Posté le 10-12-2012 à 23:13:32  profilanswer
 

En fait, je pense que la fonction "print" ajoute les espaces tout seul quand tu lui passes les bouts de chaines séparés par des ;
Donc qu'il faudrai faire sois même la concatenation avant d'utiliser le "print" pour n'avoir qu'un seul morceau dont il faut faire le print.
 
P-e qu'il faut passer par une variable intermédiaire genre
 
blabla =  X & "." & Z & ".JPG"  
PRINT #1, blabla  
 
à toi d'ecrire ça en qbasic ;)
les & ou + sont des concatenations. Je ne connais pas comment tu dois les ecrires.
 
Si tu as excel sous la main, tu peux faire du VBA.
Si tu as visual basic, tu peux faire du VB.
 
Pour info : J'ai rien pour faire du qbasic ici


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Cherche à créer un ficher avec 6400 noms (numéro.numéro.jpg)

 

Sujets relatifs
Chercher/créer logiciel pour rechercher l’absence de fichiersImporter noms feuilles d'un classseur fermé
Créer des fichiers numérotés[VBA] Créer une liste depuis une cellule
Créer une liste numérotée en PHPCréer un répertoire en c++
Créer un site Internet avec un design de qualiténewbie cherche de l'aide pour concevoir un projet
créer un "pop-up interne" dans une page html[Jeune passionné d'informatique] Comment créer un jeu ?
Plus de sujets relatifs à : Cherche à créer un ficher avec 6400 noms (numéro.numéro.jpg)


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR