Discussion :

[djelloharmel]

Bonjour
j'ai ce bout de code qui ne marche pas

ASP.NET

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<div runat="server" id="div_transf" style="background-color:black;color:white;font-weight:bold"></div>

VN.NET

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim bStr As String = "Si vous avez un souci d_utilisation de GIP, ayez le reflexe de venir fouiller ici d_abord avant d_appeler le support informatique. Si vous n_avez pas trouvé la solution, posez votre préoccupation en cliquant sur le bouton ''Posez votre préoccupation''. " & vbCrLf & "- Si votre problème est technique, le service informatique se chargera dans un bref délai de vous satisfaire." & vbCrLf & "- Si votre préoccupation est fonctionnelle, le gestionnaire du magasin vous répondra."
        div_transf.InnerText = Replace(bStr, "" & vbCrLf & "", "<br/>")

Et j'aimerais avoir un texte comme ceci

Si vous avez un souci d_utilisation de GIP, ayez le reflexe de venir fouiller ici d_abord avant d_appeler le support informatique. Si vous n_avez pas trouvé la solution, posez votre préoccupation en cliquant sur le bouton ''Posez votre préoccupation''.
- Si votre problème est technique, le service informatique se chargera dans un bref délai de vous satisfaire.
- Si votre préoccupation est fonctionnelle, le gestionnaire du magasin vous répondra.

Je n'y arrive pas après plusieurs fouilles

[djelloharmel]

J'ai vu qu'il est mieux d'écrire dans une balise <p>

en asp.net

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<p runat="server" id="p_transf" style="background-color:black;color:white;font-weight:bold"></p>

en vb.net

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim bStr As String = "Si vous avez un souci d_utilisation de GIP, ayez le reflexe de venir fouiller ici d_abord avant d_appeler le support informatique. Si vous n_avez pas trouvé la solution, posez votre préoccupation en cliquant sur le bouton ''Posez votre préoccupation''. " & vbCrLf & "- Si votre problème est technique, le service informatique se chargera dans un bref délai de vous satisfaire." & vbCrLf & "- Si votre préoccupation est fonctionnelle, le gestionnaire du magasin vous répondra."
        p_transf.InnerText = Replace(bStr, "" & vbCrLf & "", "<br/>")

J'obtiens ce texte:

Si vous avez un souci d_utilisation de GIP, ayez le reflexe de venir fouiller ici d_abord avant d_appeler le support informatique. Si vous n_avez pas trouvé la solution, posez votre préoccupation en cliquant sur le bouton ''Posez votre préoccupation''.<br/>- Si votre problème est technique, le service informatique se chargera dans un bref délai de vous satisfaire.<br/>- Si votre préoccupation est fonctionnelle, le gestionnaire du magasin vous répondra.

au lieu de

Si vous avez un souci d_utilisation de GIP, ayez le reflexe de venir fouiller ici d_abord avant d_appeler le support informatique. Si vous n_avez pas trouvé la solution, posez votre préoccupation en cliquant sur le bouton ''Posez votre préoccupation''.
- Si votre problème est technique, le service informatique se chargera dans un bref délai de vous satisfaire.
- Si votre préoccupation est fonctionnelle, le gestionnaire du magasin vous répondra.

Idem quand je mets "\n", "\r", "\r\n" à la place de "<br/>"

Il y a-t-il une technique particulière de remplacement des retours à la ligne en mode texte à ceux en mode html?

[ProgElecT]

Salut

Peut être innerHTML plutôt que InnerText.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

p_transf.innerHTML = Replace(bStr, "" & vbCrLf & "", "<br/>")

innerText pour un <div>, pour un <p> il faudra un TextContent (texte pur pas de balisages) ou justement un innerHTML pour définir le contenu HTML, donc le texte plus le balisage.

[djelloharmel]

Merci ProgElecT
C'est exactement ce que je cherchais.
Je connaissais cette propriété mais je ne l'avais jamais utilisé