PROBLEME AVEC LES SEPARATEURS DE CHAINES

NickGen Messages postés 17 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 7 avril 2004 - 22 janv. 2003 à 00:52
cs_raff Messages postés 182 Date d'inscription dimanche 18 août 2002 Statut Membre Dernière intervention 5 janvier 2004 - 22 janv. 2003 à 04:33
BONSOIR, Voila, j'ai un problême que je n'arrive pas à résoudre: Mais un exemple pour commencer:
P10001 2 6 4 50 0 0 46: ceci est une ligne d'un fichier texte comprenant un nombre de données fixes séparées par des espaces, je voudrais pouvoir renvoyer chacune de ces données vers une variable. Mon problême est le suivant: seul le nombre de blocs de données est fixe, chaque donnée pouvant contenir de 1 à 20 caractères, chaque bloc est défini par un espace devant et un espace derrière, sauf le premier(pas devant) et le dernier (pas derrière). Mon premier bloc est par exemple : "P10001" le second " 2", le troisième "4" ect... Comment puis-je faire pour récupérer chaque donnée séparément pour les placer dans des variables? J'ai pensé qu'il devait être possible de s'aider du charactère espace séparant chaque bloc...Un peu comme avec la fonction left, right , mid , Mais je n'ai pas trouvé de solutions jusqu'a présent.
Si quelqu'un a une idée? Ou une solution ce serait vraiment sympa...
Merci
Nick

2 réponses

cs_raff Messages postés 182 Date d'inscription dimanche 18 août 2002 Statut Membre Dernière intervention 5 janvier 2004 3
22 janv. 2003 à 04:31
tu n'as qu'à utiliser split...

donc si tu as ceci :

---

dim i as integer
dim x
dim y() as string

x = split("P10001 2 6 4 50 0 0 46")

redim y(0 to Ubound(x) - 1)

for i = 0 to Ubound(x) - 1

y(i) = x(i)

next i

....

et voilà !
0
cs_raff Messages postés 182 Date d'inscription dimanche 18 août 2002 Statut Membre Dernière intervention 5 janvier 2004 3
22 janv. 2003 à 04:33
NNNNNNNNOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOON
0
Rejoignez-nous