Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Tri [ Archives Visual Basic / Fichier / Disque ] (machto)

mardi 10 juin 2003 à 11:03:33 | Tri

machto

Bonjour,
j'ai un fichier qui contient des enregistrements du type:

12,562,892
25,125,136
8,1034,1131

etc
Je voudrais trier ce fichier par ordre de la 2° donnée.

Y'a-t-il un moyen simple? Merci

M@chto

mardi 10 juin 2003 à 11:27:07 | Re : Tri

UnExPeCtEdSpy

Bonjour

Par exemple...



Function RtElement (Champ as String, Separateur as Boolean, Numero as int) as string
Dim i, NoElt as int
NoElt = 1
For i = 1 To Len(champ)
If Mid(champ, i, 1) = Separateur Then
NoElt = NoElt + 1
Else
If NoElt = Numero Then
RtElement = RtElement & Mid(champ, i, 1)
End If
End If
Next



A+


,.~*`'^~.(^. .^),.~^'`*~.


-------------------------------
Réponse au message :
-------------------------------

> Bonjour,
> j'ai un fichier qui contient des enregistrements du type:
>
> 12,562,892
> 25,125,136
> 8,1034,1131
>
> etc
> Je voudrais trier ce fichier par ordre de la 2° donnée.
>
> Y'a-t-il un moyen simple? Merci
>
> M@chto

mardi 10 juin 2003 à 11:32:07 | Re : Tri

UnExPeCtEdSpy

Ah oui, la fonction c'est pour retourner l'élément que tu veux dans ta ligne, mais finalement ça répond pas a ta question

Toi ce que tu veux c'est un algo de parcours du fichier, avec supression insertion de ligne pour faire un tri dans un fichier comme dans un tableau?


,.~*`'^~.(^. .^),.~^'`*~.


-------------------------------
Réponse au message :
-------------------------------

> Bonjour
>
> Par exemple...
>
>
>

> Function RtElement (Champ as String, Separateur as Boolean, Numero as int) as string
> Dim i, NoElt as int
> NoElt = 1
> For i = 1 To Len(champ)
> If Mid(champ, i, 1) = Separateur Then
> NoElt = NoElt + 1
> Else
> If NoElt = Numero Then
> RtElement = RtElement & Mid(champ, i, 1)
> End If
> End If
> Next
>

>
>
> A+
>
>
> ,.~*`'^~.(^. .^),.~^'`*~.
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Bonjour,
> > j'ai un fichier qui contient des enregistrements du type:
> >
> > 12,562,892
> > 25,125,136
> > 8,1034,1131
> >
> > etc
> > Je voudrais trier ce fichier par ordre de la 2° donnée.
> >
> > Y'a-t-il un moyen simple? Merci
> >
> > M@chto
>

mardi 10 juin 2003 à 18:09:20 | Re : Tri

machto

Bonjour et merci beaucoup.
Entretemps, j'ai trouvé un truc qui a l'aire de marcher pas mal:
- Je charge chaque élément de mon fichier sous forme de String de longueur égale (format£(...))
- J'en fait une chaine en les aditionnant avec mon critère en tête.
- Je charge chaque chaîne dans une listbox où "sorted" est à true.
- Il me reste à les ressortir dans l'ordre et à re-séparer les bouts avec des mid(..) avant re-sauvegarde.

Ca peut intéresser d'autres..

Je vais essayer ton code qui est plus court
Encore merci

M@chto


-------------------------------
Réponse au message :
-------------------------------

> Bonjour
>
> Par exemple...
>
>
>

> Function RtElement (Champ as String, Separateur as Boolean, Numero as int) as string
> Dim i, NoElt as int
> NoElt = 1
> For i = 1 To Len(champ)
> If Mid(champ, i, 1) = Separateur Then
> NoElt = NoElt + 1
> Else
> If NoElt = Numero Then
> RtElement = RtElement & Mid(champ, i, 1)
> End If
> End If
> Next
>

>
>
> A+
>
>
> ,.~*`'^~.(^. .^),.~^'`*~.
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Bonjour,
> > j'ai un fichier qui contient des enregistrements du type:
> >
> > 12,562,892
> > 25,125,136
> > 8,1034,1131
> >
> > etc
> > Je voudrais trier ce fichier par ordre de la 2° donnée.
> >
> > Y'a-t-il un moyen simple? Merci
> >
> > M@chto
>



Cette discussion est classé dans : fichier, tri


Répondre à ce message

Sujets en rapport avec ce message

Tri d'un fichier txt [ par leomalglaive ] Bonjour,je suis newbie en vbs, j'ai donc demandé à un ami de m'aider à faire un p'tit script vbs pour un tri de fichier. Son tri est parfait pour les Tri d'un fichier pour un jeu [ par @ thedentiste @ ] J'aimerai savoir comment peut on trier un fichierc'est pour faire une table des scores avec deux éléments le nom du joueur et le score Merci d'avance@ VBScript tri / supression fichier [ par neokortexx ] Bonjour,voilà, je souhaite dans le cadre de mon travail, implémenter un script qui permettrait de trier/supprimer, tous les fichiers dans un répertoir tri sur colonne excel !! svp !! [ par bili75 ] salut,je désire trier une colonne pour ensuite dupliqué le fichier excel en autant de fichier qu'il y a de valeurs differentes sur la colone.j'ai le c tri de fichier par date [ par killy38 ] Bonjour à tous,Je suis en train de développer un programme, mais je coince sur un truc tout bête : j'ai besoin de traiter tous les fichiers .dat d'un Tri sur fichier texte [ par davth ] Bonjour à tous,Débutant en vb, je souhaite effectuer du tri dans un fichier *.txt. Quelqun pourrait il m'indiquer quelle est la méthode (la plus simpl tri par insertion [ par breton53 ] Je dois évrire la procédure de tri par insertion des données suivantes contenu dans un fichier excel:Nb_villes 5Nb_jours 4Angers 18,5 17,9 18,9 18,1To trier puis sauvegarder un fichier *.txt [ par herve83 ] Bonjour,Afin de trier des lignes dans un fichier *.txt, j'effectue un "tri à bulle". Mais si le tri à bulle que j'ai trouvé fonctionne bien, il renvoi Fichier xml avec plusieurs attributs par ligne [ par fabricioliking ] Bonjours,J'ai un petit soucie concernant l'édition d'un certains type de fichier xml.Voici le type de fichier que j'aimerais générer.Jusqu'a maintenen Probleme : Variable de controle de boucle 'for' incorrecte [ par sanzo666 ] Bonjour, j'ai un petit problème avec un script qui vise à trier dans une liste de doublons les personnes (mise en argument dans le script) en ayant eu


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Appels d'offres

Téléchargements



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,187 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.