IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

disposer d'un textarea en VbScript pur ?


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Mars 2013
    Messages
    120
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 120
    Par défaut disposer d'un textarea en VbScript pur ?
    Bonjour,

    On me demande de créer en VbScript un utilitaire permettant de remplacer une ligne par une autre - voire un paragraphe complet - dans des fichiers externe.

    Actuellement j'utilise InpuBox... pour coller une ligne Texte source et une ligne cible associées à la fonction Replace.

    Le problème est que cette chaine ne peut pas comporter de saut de ligne...

    Existe-t-il une possibilité de disposer d'une boite de saisie (ou copie) textarea pour remplacer un paragraphe complet avec des sauts de ligne par un autre en fichier *.vbs pur (sans HTML) ?

    Merci par avance !

  2. #2
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 844
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 844
    Par défaut

    Pouvez-vous nous poster votre code et pour voir mieux les choses

  3. #3
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Mars 2013
    Messages
    120
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 120
    Par défaut
    Bonsoir,

    Bien sur je peux coder les chaines Source / cible directement... mais j'aimerai le faire via des boites de saisie... même en présence de retours chariots.

    Voici le code en cause pour la collecte des chaines à remplacer et en pièce jointe le codage complet.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    ' Texte a remplacer...
    StrOld = InputBox("Texte à Chercher : ","Recherche ...", "")
     
    	If StrOld = "" Then
    	Wscript.Quit
    	End If
     
    ' La chaine voulue à la place de StrOld
    StrNew = InputBox("Remplacer : " & vbCrLf & StrOld & vbCrLf & vbCrLf & "Par :","Replace", "")
     
    ' Information...
    Wscript.Echo "Remplacer : " & vbCrLf & StrOld & vbCrLf & vbCrLf &"Par :" & vbCrLf & StrNew & vbCrLf & vbCrLf & "dans tous les sous-dossiers de :" & vbCrLf & targetPath
    1000 mercis par avance de vos suggestions...

  4. #4
    Rédacteur
    Avatar de omen999
    Profil pro
    Inscrit en
    Février 2006
    Messages
    1 302
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 1 302
    Par défaut
    bonjour,
    le vbs est nativement très pauvre en terme d'interface graphique avec l'utilisateur (2 fonctions MsgBox et InputBox et dans un contexte WSH Popup et Echo)
    des solutions ont été proposées dans des articles de ce forum :

    http://www.developpez.net/forums/d71...l-application/
    http://www.developpez.net/forums/d10...ript-portable/

    mais la complexité de l'écriture rebute souvent le scripteur occasionnel qui n'a généralement pas le temps de passer plusieurs heures pour se familiariser avec ces techniques

    pour gérer ces sauts de ligne, il y a une méthode + rustique qui consiste à choisir un caractère arbitraire pour les représenter au stade de la saisie
    un exemple avec le caractère $ qui est facilement accessible au clavier :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    StrOld = InputBox("Texte à Chercher : ","Recherche ...les sauts de ligne = caractère $", "")
     
    If StrOld = "" Then Wscript.Quit
    StrOld = Replace(StrOld,"$",vbCrLf)
    ' La chaine voulue à la place de StrOld
    StrNew = InputBox("Remplacer : " & vbCrLf & StrOld & vbCrLf & vbCrLf & "Par :","Remplace...les sauts de ligne = caractère $", "")
    StrNew = Replace(StrNew,"$",vbCrLf)
     
    ' Information...
    Wscript.Echo "Remplacer : " & vbCrLf & StrOld & vbCrLf & vbCrLf &"Par :" & vbCrLf & StrNew & vbCrLf & vbCrLf & "dans tous les sous-dossiers de :"
    nomen omen, nemo non omen - Consultez la FAQ VBScript et les cours et tutoriels VBScript
    le plus terrible lorsqu'une voiture renverse un piéton, c'est que ce sont les freins qui hurlent. (ramón)
    pas de questions techniques par mp

  5. #5
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Mars 2013
    Messages
    120
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 120
    Par défaut
    Bonjour,

    Merci pour ces liens que je vais consulter avec attention, mais je voulais éviter de code un fichier HTA ou HTML pour la compatibilité souvent limité à Internet Explorer... et d'ailleurs remise en cause depuis la version 10 pour des interfaces antérieures. Je pensais pouvoir faire appel à des API Windows comme avec le vrai Visual Basic Pro... La réponse est peut être dans vos liens...

    J'avais bien pensé à coder comme vous le proposez, mais reste à définir un code qui sera à coup sur inutilisé... (Modif à la volée de code HTML présent sur un serveur intranet...)

    Mais reste un inconvénient majeur avec cette solution : On se prive d'un copier / Coller de paragraphe complet non retravaillé... Autant placer les textes directement dans le code VBS, mais là il ne faut pas un utilisateur lambda... car il faut gérer les chr(34) et sauts de ligne.

    Néanmoins un vif merci pour votre intervention... et bonne fêtes de fin d'année !

    EDIT : xGUICOM dont j'ignorais l'existence retient toute mon attention ! je vais étudier la Doc avec la plus grande attention...

  6. #6
    Rédacteur
    Avatar de omen999
    Profil pro
    Inscrit en
    Février 2006
    Messages
    1 302
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 1 302
    Par défaut
    mais je voulais éviter de code un fichier HTA ou HTML pour la compatibilité souvent limité à Internet Explorer... et d'ailleurs remise en cause depuis la version 10 pour des interfaces antérieures
    tu prêches un converti

    xGUICOM dont j'ignorais l'existence retient toute mon attention !
    si tu as des notions de prog native win32, c'est nickel
    nomen omen, nemo non omen - Consultez la FAQ VBScript et les cours et tutoriels VBScript
    le plus terrible lorsqu'une voiture renverse un piéton, c'est que ce sont les freins qui hurlent. (ramón)
    pas de questions techniques par mp

  7. #7
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Mars 2013
    Messages
    120
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2013
    Messages : 120
    Par défaut
    Citation Envoyé par omen999 Voir le message
    si tu as des notions de prog native win32, c'est nickel
    Bah je vais prendre un coup de jeune après 35 ans de programmation diverses... (Cobol, GFA Basic sous Atari, HTML, JavaScript, Visual Basic Application et le vrai 6 Pro...)

    Dommage simplement que dans votre doc il n'y ai pas un lien sur les bases de cette prog native. Je vais fouiller sous Google. C'est d'ailleurs peut être ce que j'utilisais avec Visual Basic 6 Pro (mon langage préféré mais exe dépendant de ocx...) et l'appel à des API Windows...

    Ce type de codage sous Windows 3.1 respectant le livre Blanc de l'époque fonctionne toujours y compris sous Windows 8.1 ... Seul l'aspect visuel a vieilli

    Encore merci !

  8. #8
    Rédacteur
    Avatar de omen999
    Profil pro
    Inscrit en
    Février 2006
    Messages
    1 302
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 1 302
    Par défaut
    Dommage simplement que dans votre doc il n'y ai pas un lien sur les bases de cette prog native
    http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx
    nomen omen, nemo non omen - Consultez la FAQ VBScript et les cours et tutoriels VBScript
    le plus terrible lorsqu'une voiture renverse un piéton, c'est que ce sont les freins qui hurlent. (ramón)
    pas de questions techniques par mp

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Une doc VBScript complète et compacte
    Par jérôme dans le forum ASP
    Réponses: 5
    Dernier message: 13/03/2013, 09h46
  2. liste déroulante en ASP vbscript
    Par leeloo076 dans le forum ASP
    Réponses: 9
    Dernier message: 17/03/2004, 16h42
  3. attribution de texte dynamique à un textarea
    Par stephane eyskens dans le forum Flash
    Réponses: 6
    Dernier message: 01/10/2003, 13h52
  4. ASP,JavaScript,VBScript
    Par Zazeglu dans le forum ASP
    Réponses: 6
    Dernier message: 01/09/2003, 10h56
  5. [TP]Portage d'un encodeur MP3 Fortran en pur Pascal...
    Par Christophe Fantoni dans le forum Turbo Pascal
    Réponses: 11
    Dernier message: 04/07/2003, 17h34

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo