Problème de déclaration

Bonjour à tous,
j'ai un problème et j'arrive pas à resoudre puisque je suis débutant dans vbs scripts.

mon besoin c'est comment déclarer une ligne contient 6 chaine type string et chaque chaine contient 30 caractères c'est à dire longueur len(string) =30.
De façon itérative apres chaque 30caractères le système passe au deuxième variable.

j'ai besoin de votre aide. En attendant votre retour et merci infinement.

11 réponses

  1. Contributeur
    bonjour,
    moi j'essaierais ceci:
    dim ligne as string
    dim chaines(6) as string
    1. Merci pour votre réponse,
      je lis à partir d'un fichier texte , et ma ligne est séparée par des virgules.
      Ca marche ??
  2. This is my code like :

    Set oFso=CreateObject("Scripting.FileSystemObject")
    Set listFile = oFso.OpenTextFile("c:\banque\CCPCMA.txt", ForReading)
    Set fecriture = oFso.OpenTextFile ("C:\banque\AFB120.txt",ForWriting, true,ModeAscii)
    i = 0
    j = 0
    Do While Not listFile.AtEndOfStream
    MOT(i) = listFile.ReadLine
    wscript.echo MOT(i)
    MOTT = Split(MOT(i),";")

    For j=0 To ubound(MOTT)
    wscript.echo MOTT(j)
    Next

    i = i + 1

    Loop
    1. Contributeur
      as-tu testé ton code?
  3. oui j'ai testé, mais c'était pas mon résultat attendu vraiment !

    en fait, le but ce comment tester les chaines du tableau d'une façon itérative avec un boucle !

    j'arrive pas à faire.
    1. Contributeur
      quel résultat obtiens-tu quel résultat attends-tu?
  4. je veux essayer de bien expliquer alors :
    Par exemple : "08/06/2021;1 899,950;TND;VRST 0521377 EL KOSSOUR;;08/06/2021"

    cette ligne je cherche comment la déclarer avec vb script d'une façon itérative avec les boucles sachant que chaque chaine doit etre de longueur 30 maximum et par conséquant cette ligne est composée par 6 chaines.
    Je veux tester par exemple à chaque ligne de fichier si les 6 chaines sont vides ou non pour appliquer à chaque string une opération etc..
    1. Contributeur
      pour cette ligne, que fait ton programme, quel résultat affiche-t-il?
    2. Contributeur
      @Dalilales six bonnes chaînes?
      tes boucles fonctionnent donc bien, non?
    3. @yg_beBonjour, J'ai 4 lignes similaires de la ligne envoyée précédemment,
      à chaque fois je vais extraire les dates dans les extrémités.
      comment le faire avec un boucle et merci beaucoup
    4. Contributeur
      peut-être:
      wscript.echo MOTT(0)
      wscript.echo MOTT(5)
  5. Salut j'espère que vous allez bien,
    c'est quoi l'instruction de la conversion d'une chaine en un double .
    j"étais coincée.
    je veux transformer cette chaine par exmple ("189.250") en un double 189.250
    1. Contributeur
      peut-être:
      dim dd as double
      dd = cdbl("189.250")
  6. j'ai essayé mais il m'a donné comme erreur ! type incompatibe
    1. Contributeur
      et ainsi?
      dim dd as double
      dd = cdbl("189,250")  
  7. oui c bon, mais pourquoi il m'a pas affiché mes 3 chiffres après le virgules:
    m'a affiché 189,25

    et merci infinement
    1. Contributeur
      tu peux utiliser format pour préciser comment un nombre doit s'afficher.
  8. Bonjour,
    comment déclarer une chaine vide STR de taille fixe de 38 caractères.
    et puis cette chaine STR va étre remplie par une chaine donnée à partir de mon fichier lue(par exemple la chaine contient 25 caractères) ,
    Donc je veux garder STR de longueur 38 et contient la chaine du fichier,
    (c'est à dire je veux garder STR de len 38 et le reste des espaces 13 caractères).

    l'objectif c'est écrire dans un fichier deux chaines concatinées (STR & DATE)
    et je veux voir que la chaine Date débutera à partir de la position 39 .
    Est ce que c'est faisable avec VBsEdit .

    merci d'avance
    1. Contributeur
      Je pense que le plus simple, c'est, au moment d'écrire dans le fichier, d'ajouter 13 espaces entre STR et DATE.
  9. C'est ne pas utile dans mon cas,
    mais y a pas une structure de positionner une chaine de telle pos et l'ecrire vers un fichieur output
    1. Contributeur
      Je pense que le plus simple est d'ajouter des espaces à la fin.
  10. Bonjour ,
    j'ai cherché comment récuperer le chemin du fichier de l'utilisateur (il exécute de l'invite de commande) dans mon script vb (VBsEdit).

    merci d'avance .