FONCTION SPLIT DE VB 6 POUR VB4/5 ET LOTUSSCRIPT

Signaler
Messages postés
171
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
6 mai 2007
-
Messages postés
51
Date d'inscription
vendredi 1 juin 2007
Statut
Membre
Dernière intervention
13 octobre 2012
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/8366-fonction-split-de-vb-6-pour-vb4-5-et-lotusscript

Messages postés
51
Date d'inscription
vendredi 1 juin 2007
Statut
Membre
Dernière intervention
13 octobre 2012

bonjour,
j'ai u probléme
j'exporte des données d'une table acces vers un fichier text
mon problème:
je vous donne mon cas réel j'ai une table d'enregistrement acces contenet: matricule,nom,prenom,sexe,date debut,service,direction
j'ai fait
print# "& rs!matricule & rs!nom & rs!prenom & rs!sexe & rs!sexe & rs! datedebut & rs!service & rs!direction;"
rs.move next

je veux que si je retourne à la ligne meme matricule je fais imprimer les informations:datedebut, service et direction de la deuxieme ligne à la fin du premier ligne.

merci de me repondre
Messages postés
62
Date d'inscription
dimanche 22 octobre 2000
Statut
Membre
Dernière intervention
4 août 2004

Merci pour cette source (pratique quand on retourne sur Access 97.

Ce serait sympa d'avoir l'équivalent de "Join", qui fait le contraire.
Messages postés
291
Date d'inscription
vendredi 21 février 2003
Statut
Membre
Dernière intervention
13 mars 2015

Pour info en vb
Optional sep As String = " ")
Ajout du caractere par defaut (" " caractere blanc ou autre) dans la declaration peu eviter la condition IF a faire un peu plus bas.
Messages postés
478
Date d'inscription
mercredi 7 août 2002
Statut
Membre
Dernière intervention
10 juin 2015

Pour le script vb

dans la déclaration :
Public Function RSSplit(ByVal inp_str As String, _
Optional sep As String = "") As String

et enlever le if ismissing
Messages postés
171
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
6 mai 2007

Bonne intiative que ce code source, franchement c'est cool d'avoir mis ce code, VB5 en force lol.