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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [ RESOLU] Suppression de chaînes de caractères

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[ RESOLU] Suppression de chaînes de caractères

n°1500785
slr56
Tout problème a sa solution.
Posté le 09-01-2007 à 15:25:11  profilanswer
 

Salut tout le monde,
dans cette portion de code, je souhaite supprimer des caractères. Les constantes suppr 1 à 7 sont déclarées au préalable. Il n'y a pas d'erreur d'exécution cependant il ne se passe rien. En effet, les caractères que je veux supprimer ne sont pas supprimés!
 

Code :
  1. Set fichier_texte=FSO.OpenTextFile(creation_rep & "\" & id_ip & ".txt",1, true)
  2. st=fichier_texte.ReadAll
  3. replace st,suppr1,""
  4. replace st,suppr2,""
  5. replace st,suppr3,""
  6. replace st,suppr4,""
  7. replace st,suppr5,""
  8. replace st,suppr6,""
  9. replace st,suppr7,""
  10. fichier_texte.CLOSE


 
merci de bien vouloir m'aider  :jap:  :jap:  
 
C'est toujours du VBS  :pt1cable:  Je vais devenir malade à force d'en manger autant!!!!!!!!!! :pt1cable:  :pt1cable:  :D


Message édité par slr56 le 10-01-2007 à 16:11:55
mood
Publicité
Posté le 09-01-2007 à 15:25:11  profilanswer
 

n°1500870
seniorpapo​u
Posté le 09-01-2007 à 17:39:02  profilanswer
 

Bonsoir,
En VBS ne faut-il pas faire un save avant le close?
( Je ne connais pas mais ....)
Cordialement


Message édité par seniorpapou le 10-01-2007 à 06:59:19
n°1501043
kiki29
Posté le 10-01-2007 à 00:59:27  profilanswer
 

Exemple pêché sur TechNet
http://www.microsoft.com/technet/s [...] y0208.mspx


Const ForReading = 1
Const ForWriting = 2
 
Set objFSO = CreateObject("Scripting.FileSystemObject" )
Set objFile = objFSO.OpenTextFile("C:\Scripts\Text.txt", ForReading)
 
strText = objFile.ReadAll
objFile.Close
strNewText = Replace(strText, "Jim ", "James " )
 
Set objFile = objFSO.OpenTextFile("C:\Scripts\Text.txt", ForWriting)
objFile.WriteLine strNewText
objFile.Close


Message édité par kiki29 le 10-01-2007 à 01:25:12
n°1501056
slr56
Tout problème a sa solution.
Posté le 10-01-2007 à 07:42:10  profilanswer
 

Merci beaucoup!!!! Ca marche!!!!!!!!!!!!!!!!!!!!!!!!! C'est exactement ce qu'il me fallait!!! Merci KIKI29!!!
 
Merci quand même Seniorpapou mais le "save" ne fonctionne pas en VBS  :pt1cable:


Message édité par slr56 le 10-01-2007 à 16:11:09

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

  [ RESOLU] Suppression de chaînes de caractères

 

Sujets relatifs
[RESOLU]Problème d'execution : NoClassDefFoundError :([Résolu] Matrice et fonctions
installation Image::Magick 1&1 [résolu=>pas possible chez 1&1][Résolu] Accès à une variable statique
[Résolu] setAttribute et IE7[RESOLU] proposer de telecharger les resultat d'une requete sql
[Help] Les caractères avec accent s'affiche en ? sur mon blog :([Résolu] Pointeurs et fonctions
[résolu][Flash]>>appel d'un .swf avec son AS[Résolu] Envoyer par mail le résultat d'un formulaire fait en html
Plus de sujets relatifs à : [ RESOLU] Suppression de chaînes de caractères


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