Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1639 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  débutant: trouver une chaîne dans une ligne, en remplacer une autre

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

débutant: trouver une chaîne dans une ligne, en remplacer une autre

n°1615868
canardtich​aud
PSN : canardnono
Posté le 27-09-2007 à 10:28:50  profilanswer
 

Bonjour à tous, je suis dans un IF qui checke les lignes d'un fichier  et les insert dans une base SQL :
 
les lignes sont de ce type :
 
role1#login1#complete_name#info1#info2#date_crea#date_maj
role#login2#complete_name#info1#info2#date_crea#date_maj
role1#login3#complete_name#info1#info2#date_crea#date_maj
role2#login1#complete_name#info1#info2#date_crea#date_maj
role1#login4#complete_name#info1#info2#date_crea#date_maj
etc.....
 
je veux traiter les lignes de ce fichier en disant pour chaque ligne, si le role={ça ça ou ça} ou si role =*ca* alors efface date_maj
sinon si role ={ça ça ou ça} ou *ça* alors efface date_crea
 
ça donnerait :
 
role1#login1#complete_name#info1#info2#date_crea
role#login2#complete_name#info1#info2#date_crea#date_maj
role1#login3#complete_name#info1#info2#date_crea#date_maj
role2#login1#complete_name#info1#info2#date_maj
role1#login4#complete_name#info1#info2#date_crea#date_maj
 
Parce qu'en fait un login peut avoir plusieurs roles et qu'on ne veut pas afficher toutes les dates de maj ni toutes celles de creation du role
 
Voilà..je sais que c'est compliqué, merci d'avance !


---------------
[>_] Microsoft 'PoSH'  addicted
mood
Publicité
Posté le 27-09-2007 à 10:28:50  profilanswer
 

n°1615887
tegu
Posté le 27-09-2007 à 11:07:14  profilanswer
 

Je ne vois pas ce qui te semble compliqué.
Il s'agit juste de faire des tests avec des If Then ou un Select Case ou toute structure adaptée et d'utiliser la fonction replace()

n°1615897
canardtich​aud
PSN : canardnono
Posté le 27-09-2007 à 11:33:36  profilanswer
 

Pour un débutant en développement, ça l'est !
 
Merci pour ce début Tegu !

n°1616140
pyrof
Posté le 27-09-2007 à 16:26:13  profilanswer
 

Bonjour,
 
Voici un bout de programme

Sub xx()
tmp = "role1#login1#complete_name#info1#info2#date_crea#date_maj "
 
tmp1 = Split(tmp, "#" )
Select Case Replace(tmp1(0), "role", "" )
    Case "1"
        MsgBox "Action 1"
    Case "2"
        MsgBox "Action 2"
End Select
End Sub

n°1616147
canardtich​aud
PSN : canardnono
Posté le 27-09-2007 à 16:30:35  profilanswer
 

Merci à vous 2 !!


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  débutant: trouver une chaîne dans une ligne, en remplacer une autre

 

Sujets relatifs
Dernière ligne d'un GridView[Debutant] Plusieurs TABLE l'une en dessous de l'autre
selection de ligne 1 jusqu'a variable[RESOLU] Débutant VB - Ouvrir une image sous VB6
Trouver un élément dans un tableau, facile pour qui s'y connait !Supprimer ligne fichier
supprimer ligne d'excel par VBA[PHP][REGEX]réduire le texte d'un lien dans une chaine
Requête select sur une chaine sans tenir compte des espaces[FLASH] Preloader en ligne de fonctionne pa
Plus de sujets relatifs à : débutant: trouver une chaîne dans une ligne, en remplacer une autre


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR