[VB.NET] Comment modifier le head et le body d'une page aspx

Version imprimable

12/12/2005, 14h35
Immobilis

[VB.NET] Comment modifier le head et le body d'une page aspx

Salut,
Je souhaite modifier le <HEAD> de ma page pour y mettre du javascript.
Je suis allé voir la FAQ et ai tenté d'adapter le code.Comment modifier le head et le body d'une page aspx?
Je reçois l'erreur suivante:

Citation:

Cannot get inner content of myHeader because the contents are not literal

De plus, on dirait qu'il a du mal à conserver l'attribut "runat=server".

Qqn a-t-il une solution?

Merci
12/12/2005, 14h38
neguib

Salut Immobilis
si tu catch quelle est la ligne de code qui lève l'exception :?:
12/12/2005, 14h48
Immobilis

Salut neguib,

Celle ci:

Citation:

header.InnerHtml = header.InnerHtml + "<script language=""javascript"">function myfct{alert('Hello');}</script>"

Merci
12/12/2005, 14h50
neguib

ok et pourquoi tu n'utilises pas plutôt le InnerHtml :?:
Edit: ok tu as modifié je viens de le voir bon je regardes de mon côté et je te dis quoi

Alors j'ai fait ceci
Code:

1 2 3 4 5 6 7 8 Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init InitializeComponent() Me.head = CType(FindControl("head"), HtmlGenericControl) Me.head.InnerHtml += "<script language=""javascript"">function fctjavascript{alert('Hello');}</script>" Me.body = CType(FindControl("body"), HtmlGenericControl) Me.body.Attributes("onclick") = "fctjavascript()" End Sub
Donc après execution, j'ai verifier le code de la page et tout à bien été ajouté. Cela est donc reglé apparemment avec le transtypage si tu confirme, je verrais à revoir l'article de la Faq ok :wink:

Dans mon web form, je déclare:

Code:

<HEAD id="myHeader" runat=server>

dans le code behind

Code:

Protected myHeader As HtmlGenericControl

Puis,

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: This method call is required by the Web Form Designer
        'Do not modify it using the code editor.
        InitializeComponent()
        Try
            Me.myHeader = CType(FindControl("myHeader"), HtmlGenericControl)
            Me.myHeader.InnerHtml += "<script language=""javascript"">function fctjavascript{alert('Hello');}</script>"
 
        Catch ex As Exception
            Response.Write(ex.Message)
 
        End Try
 
    End Sub

Mais, j'ai tjrs la mm erreur.
Dans la mesure où "myHeader est déclaré comme "HtmlGenericControl" est-il utile de le convertir?

A+

12/12/2005, 16h34
neguib

Citation:

Envoyé par Immobilis

Dans la mesure où "myHeader est déclaré comme "HtmlGenericControl" est-il utile de le convertir?
A+

ce n'est pas header qui est transtyper mais bien le resultat de la fonction FindControl qui elle renvoit un Web.UI.Control
Mais le code peut être dans le Page_Load chez moi çà fonctionne toujours
Mon seul souci effectivement c'est de garder le runat=server dans le Head
Apparemment j'y arrive en fermant le designer avant generation quelconque
12/12/2005, 16h52
Immobilis

Il y a des post sur le net à propos, voici deux liens.

http://www.c-sharpcorner.com/Code/20...SP.NETForm.asp

http://www.dotnet247.com/247referenc...27/135691.aspx

Ce dernier fait référence à l'attribut runat=3D"server". Cela te dit-il qqch?

A+
12/12/2005, 17h00
neguib

Citation:

Envoyé par Immobilis

Il y a des post sur le net à propos, voici deux liens.

http://www.c-sharpcorner.com/Code/20...SP.NETForm.asp

http://www.dotnet247.com/247referenc...27/135691.aspx

Ce dernier fait référence à l'attribut runat=3D"server". Cela te dit-il qqch?

A+

:?: désolé, faudrait qu'une pointure vienne à notre rescousse
12/12/2005, 17h04
Immobilis

C'est qui la cavalerie?
:lol:
En tous les cas, chez moi, ça change pas.
Il detecte 6 autres objets dans le controle <HEAD>:
1 <TITLE>
4 <META>
1 <LINK>
Cela pourrait-il être le pb?

Je viens de mp Neo51 qui est l'auteur de la FAQ.

A+

Je sais pas je te mets tout ce que j'ai fait et qui fonctionne à toi de voir

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm1.aspx.vb" Inherits="TestInnerHtml.WebForm1"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//FR">
<html>
 <head id="head" runat="server">
  <title>WebForm1</title>
  <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
  <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
  <meta name="vs_defaultClientScript" content="JavaScript">
  <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
 </head>
 <body id="body" runat="server" ms_positioning="GridLayout">
  <form id="Form1" method="post" runat="server">
  </form>
 </body>
</html>

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Public Class WebForm1
 Inherits System.Web.UI.Page
 <System.Diagnostics.DebuggerStepThrough()> _
 Private Sub InitializeComponent()
 End Sub
 Protected WithEvents body As HtmlGenericControl
 Protected WithEvents head As HtmlGenericControl
 Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
  InitializeComponent()
 End Sub
 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  Try
    Me.head = CType(Me.FindControl("head"), HtmlGenericControl)
    Me.head.InnerHtml += "<script language=""javascript"">function fctjavascript{alert('Hello');}</script>"
    Me.body = CType(Me.FindControl("body"), HtmlGenericControl)
    Me.body.Attributes("onclick") = "fctjavascript()"
    Response.Write("çà marche!")
  Catch ex As Exception
    Response.Write(ex.Message)
  End Try
 End Sub
End Class

resultat

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//FR">
<html>
 <head id="head">
  <title>WebForm1</title>
  <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
  <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
  <meta name="vs_defaultClientScript" content="JavaScript">
  <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
  <script language="javascript">function fctjavascript{alert('Hello');}</script></head>
 <body id="body" ms_positioning="GridLayout" onclick="fctjavascript()">
   <form name="Form1" method="post" action="WebForm1.aspx" id="Form1">
<input type="hidden" name="__VIEWSTATE" value="blablabla ...=" />
   </form>
 </body>
</html>

12/12/2005, 20h30
Gigottine

Salut,
Je ne sais pas si ca peut changer quelque chose mais moi pour retrouver le control j 'utilise :

Code:

head = Page.FindControl("head")

à la place :

Code:

head= ctype(me.FindControl("head"), HtmlGenericControl)

Et je suis comme vous le runat = "server" disparait comme par magie lors de la compilation de temps en temps 8O
12/12/2005, 21h17
Immobilis

J'ai copié collé ton code et ça marche pas... Sauf pour le body.

Va falloir trouver autre chose. La disparition du runat est peut-être symptomatique.

A+

PS : J'utilise le Framework 2.0. Il existe apparement un controle System.Web.UI.HtmlControls.HtmlHead mais VS2003 ne le reconnait pas.
13/12/2005, 11h24
neo.51

Citation:

Envoyé par Immobilis

PS : J'utilise le Framework 2.0. Il existe apparement un controle System.Web.UI.HtmlControls.HtmlHead mais VS2003 ne le reconnait pas.

tu ne peux pas utiliser le framework .NET 2.0 sous Visual Studio 2003.

La solution de la FAQ a été testé avec VS.NET 2003 et le framework .NET 1.1.
13/12/2005, 11h46
Immobilis

Bon,

Je suis passé sous le Framework 1.1 et ça marche. Excellente compatibilité descendante :!:

Citation:

Envoyé par neo.51

tu ne peux pas utiliser le framework .NET 2.0 sous Visual Studio 2003.

Insaller le Framework 2.0 ne sert à rien alors?
Cela ne permet-il pas d'utiliser des composant du FW mis à jour?

Ou alors il faut se procurer obligatoirement VS2005... BIIIILLL :twisted:

A+

Je sais que le post date un peu mais au cas ou d'autres aient le même problème,
vu que j'ai eu la même erreur même en suivant les indications de la faq et de ce post, voila comment j'arrive à faire (.NET 2.0 avec VS2005):
Code:

1 2 3 4 5 6 7 8 protected HtmlHead head; ... head = (HtmlHead)Page.FindControl("head"); HtmlLink link = new HtmlLink(); link.Attributes.Add("rel", "stylesheet"); link.Attributes.Add("type", "text/css"); link.Attributes.Add("href", "../style/monStyle.css"); head.Controls.Add(link);
et ça marche nickel

(c'est du C# par contre)

ça serait cool de le rajouter dans la faq si ça aide

20/10/2007, 00h24
CUCARACHA

Utilise une variable publique comme en asp3 ça fait des miracles :)
Salut

ça ça marche pas mal...

Code:

<title><%=strTitre%></title>

Il te suffit de déclarer la chaine strTitle en public dans la classe de la page...
Code:

1 2 3 4 5 public strTitle as string Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load strTitle = "Mon titre" End Sub
Ca marche en VB et en C# en version 1.1 et 2.0

++

Laurent