Dim cstype As Type = Me.GetType()
            Me.ClientScript.RegisterClientScriptInclude(Me.GetType, "StampaReport", "Funzioni_Comuni_JScript.js")

            If Not Page.ClientScript.IsStartupScriptRegistered("Report") Then
                Dim cstext As New StringBuilder()
                Dim strPagina As String = String.Format("gruppi_lavoro_dett.aspx?COD_GLAV={0}", _
                                                        DGV_GRUPPOLAVORO.SelectedDataKey.Values.Item(0))

                cstext.Append("<script type=text/javascript>StampaReport('" & strPagina & "');</")
                cstext.Append("script>")
                Page.ClientScript.RegisterStartupScript(cstype, "Report", cstext.ToString(), False)
            End If