Récupérer le contenu html d'un contrôle

Bonjour à tous.

Je me heurte à un petit souci pour finaliser mon outils. Je fabrique du contenu pour le mettre dans un DIV et je voudrais récupérer la chaine HTML qui qui se met dedans. Je tente de le faire avec la propriété InnerHtml mais ça me sort une exception et je n'arrive pas à comprendre si c'est parce que je le fais trop tôt ou parce je l'emploi mal.
Je vous présente mon code behind

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init   'Code pour afficher la rotation Dim LParam(0) As SqlParameter LParam(0) = New SqlParameter("", 0) Dim dt As DataTable = RetournerTableP("SELECT * FROM RotationDeLaSemaine ORDER BY Position_Perso", LParam) For Each dr As DataRow In dt.Rows Dim divPerso As New HtmlControls.HtmlGenericControl Dim imgPerso As New Image With imgPerso .AlternateText = dr.Item("Nom_Heros") .ImageUrl = "http://esport.ozouf.com/PersoRotation/Perso" & dr.Item("Id_Heros") & ".png" .CssClass = "imgPerso" End With Dim txtPerso As New Label txtPerso.Text = dr.Item("Nom_Heros") & "<br>" & dr.Item("Type_Heros") & "<br>" & dr.Item("Univers") & "<br>" & dr.Item("Texte") & "<br>Dernière sortie le : " & dr.Item("DerniereSortieP") & "<br>Il est sorti " & dr.Item("NB") & " fois depuis le début des rotations<br>" With divPerso .Controls.Add(imgPerso) .Controls.Add(txtPerso) End With divGlobalRotation.Controls.Add(divPerso) Next Dim strRotation As String = divGlobalRotation.InnerHtml.ToString txtChaineRotation.Text = strRotation     End Sub

---

Dans ma page j'ai un DIV que je rempli et le résultat est correct, ça me fait ce que je veux. Maintenant je voudrais afficher dans une TextBox la chaine contenu dans ce DIV (les deux dernières lignes de mon code).
Donc je me demande si je fais bien la récupération de la chaine ou si je le fais trop tôt, à savoir dans le Init ?

Merci pour votre aide.

Vu l'évènement le div n'a surement pas encore généré le code client, tu pourrais le récupérer dans un événement plus loin (PreRender par exemple) ou bien utiliser la méthode render du contrôle...

Merci pour ton aide.
J'ai tenté dans un événement plus loin et j'ai le message d'erreur suivant :

Code:

---

1 2 3 4 5 6 7 8

Protected Sub Page_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRender txtChaineRotation.Text = divGlobalRotation.InnerHtml.ToString End Sub   Protected Sub Page_PreRenderComplete(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRenderComplete txtChaineRotation.Text = divGlobalRotation.InnerHtml.ToString End Sub

---

J'ai testé l'un après l'autre et pas les deux en même temps, bien sûr.

Citation:

---

Impossible d'obtenir le contenu interne de divGlobalRotation, car le contenu n'est pas de type littéral.

---

Ensuite je suis parti sur ton autre proposition mais je crois que je maitrise pas du tout ce que j'ai lu dans la documentation

Code:

---

1 2 3 4

Dim divRender As HtmlTextWriter divGlobalRotation.RenderControl(divRender) txtChaineRotation.Text = divRender.InnerWriter.ToString

---

J'ai un message d'erreur le divRender en argument de la deuxième ligne :

Citation:

---

La référence d'objet n'est pas définie à une instance d'un objet.

---

J'en déduis que je dois mal instancié l'objet mais je n'arrive pas à comprendre comment on fait et ce même en relisant la documentation. L'exemple qu'ils donnent n'est pas très clair, ils font des Sub de partout.

Encore merci pour ton aide.

Je répond en c# car je ne connais pas la syntaxe en vb.net :

Pour instancier le HtmlTextWriter

Code:

---

1 2	StringWriter w = new StringWriter(); HtmlTextWriter h = new HtmlTextWriter(w);

---

Merci beaucoup, ça marche nickel.

Voici le code final pour ceux qui le voudrait tout cuit :

Code:

---

1 2 3 4 5 6

Dim swRotation As New StringWriter Dim htwRotation As New HtmlTextWriter(swRotation) divGlobalRotation.RenderControl(htwRotation) txtChaineRotation.Text = htwRotation.InnerWriter.ToString

---

Et grâce à ça je récupère la chaine HTML incluant le DIV qui contient tout ce que j'ai créé.

Merci beaucoup, grâce à ton aide mon outil est terminé et je peux copier coller mes chaines dans mes articles.

Une excellente journée à toi

Citation:

---

Envoyé par zooffy

Merci beaucoup, ça marche nickel.

Voici le code final pour ceux qui le voudrait tout cuit :

Code:

---

1 2 3 4 5 6

Dim swRotation As New StringWriter Dim htwRotation As New HtmlTextWriter(swRotation) divGlobalRotation.RenderControl(htwRotation) txtChaineRotation.Text = htwRotation.InnerWriter.ToString

---

Et grâce à ça je récupère la chaine HTML incluant le DIV qui contient tout ce que j'ai créé.

Merci beaucoup, grâce à votre aide mon outil est terminé et je peux copier coller mes chaines dans mes articles.

Une excellente journée à vous

---

Super que ca marche, un petit vote pour ma réponse aurait été sympa :p

ça tellement longtemps que j'ai déserté ce forum que je ne connais pas tous les nouveaux outils, désolé, mais j'ai cliqué sur ta réponse, c'est ça qu'il faut faire ?

Mais ça sert à quoi ce truc ?

Citation:

---

Envoyé par zooffy

mais j'ai cliqué sur ta réponse, c'est ça qu'il faut faire ?

Mais ça sert à quoi ce truc ?

---

Oui il faut cliquer sur le petit pouce vert a droite en-dessous du post. Cela permet de "recompenser" l'auteur de la reponse en lui donnant un point. De meme, en marquant la discussion comme resolue tu recompenses l'ensemble des participants.

Pour plus d'info : Le grand mode d'emploi du forum, à lire si vous souhaitez tout savoir !