Hello

I have recently found some DNN enhancement tips found here:

http://blogs.snapsis.com/default,date,2006-07-25.aspx

I was considering using the admin.css  (see below) tip to help speed up my site.

<script runat="server">
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init

if Request.IsAuthenticated then
    'add a link for the css file to the head section
    Dim oLink as HtmlGenericControl = New HtmlGenericControl("link")
    oLink.Attributes("rel") = "stylesheet"
    oLink.Attributes("type") = "text/css"
    oLink.Attributes("href") = SkinPath & "admin.css"

    Dim oCSS As Control = Me.Page.FindControl("CSS")
    If Not oCSS is Nothing Then
       oCSS.Controls.AddAt(0, oLink)
    End if
  End if
End Sub
</script>

However, on one or two skin/pages I would also like to add some javascript to the page head (see below)

<script runat="server">
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'add a script reference for Javascript to the head section
Dim oLink As New HtmlGenericControl("script")
oLink.Attributes("language") = "javascript"
oLink.Attributes("type") = "text/javascript"
oLink.Attributes("src") = SkinPath & "MyJavascript.js"
Dim oCSS As Control = Me.Page.FindControl("CSS")
If Not oCSS is Nothing Then
oCSS.Controls.AddAt(0, oLink)
End if

End Sub
</script>

I was wondering if I could insert both scripts onto the same page?  If so, do I need to insert each code seperately, or in order to save repition is it possible to merge the code and how?

Thanks

Regards

Lynn

Hi John

Thanks for your very instructive reply.

Regards

Lynn