Tri sur tableau

Signaler
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
-
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
-
 Bonjour à tous....

Dernièrement, sur le topic,
http://www.vbfrance.com/infomsg_TRANSLATION-TOPIC-720974-ASPX-VB6-VBS_721211.aspx#4


je triais un tableau par rapport à une date.


Ex:
Nom du Fichier              LastDateModified



fichier2            02/11/2006 
fichier3            02/12/2006
fichier0            02/10/2006



le résultat était:


fichier3            02/12/2006
fichier2            02/11/2006
fichier0            02/10/2006




Ma question:
Dans le tableau ci-dessous, est-il possible de faire un tri sur array(3):



member1 name_t bib_x PR12
member2 name_o bib_a II22
Member3 name_u bib_a Z12
member4 name_a bib_b MAR1


pour avoir en résultat:
member2 name_o bib_a II22
member4 name_a bib_b MAR1
member1 name_t bib_x PR12
Member3 name_u bib_a ZZ12




Merci pour vos suggestions (VB6 ou vbs).


Vu mes différents posts (ou sources), vous aurez compris que mes questions
portent sur l'extraction de données (fichiers ou bases) pour effectuer
du reporting auprès de "mes" clients (fiche JMO).
Donc,
- faire un tableau trié sur member?;               array(0)
- faire un tableau trié sur name_?;                array(1)
- faire un tableau trié sur xxxx (imprimante)      array(3)


jean-marc


 

1 réponse

Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
26
 Bonjour à tous....

Pour trier sur imprimante, j'ai pensé à
var1 = Asc(Mid("TWDEST=PR12", 8, 1)) + Asc(Mid("TWDEST=PR12", 9, 1)) + Asc(Mid("TWDEST=PR12", 10, 1)) + Asc(Mid("TWDEST=PR12", 11, 1))

var2 = Asc(Mid("TWDEST=PR13", 8, 1)) + Asc(Mid("TWDEST=PR13", 9, 1)) + Asc(Mid("TWDEST=PR13", 10, 1)) + Asc(Mid("TWDEST=PR13", 11, 1))

MsgBox var1 &vbCrLf& var2

Est-ce la bonne solution ???

merci.
jean-marc