Foros Club Delphi - RegisterStartupScript no registra el script

Buenas tardes compañeros del club, la verdad que me ha surgido un problema que por poco rompo la pc:mad::o, el ide que estoy usando es el VS2008 team system, con el framework 3.5, el problema radica en el uso de "RegisterStartupScript", ya que deseo registrar un javascript, el asunto es que no funciona, y he hecho el mismo código en dos páginas distintas, en una funciona y en otra no, les dejo algo de código para que puedan enterderme:

El siguiente código es el que no me registra los script

Código:

    Protected Sub btnCreateFolder_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCreateFolder.Click

        If Not Request.Form(txtfolder.UniqueID) Is Nothing AndAlso Request.Form(txtfolder.UniqueID) <> "" Then

            Dim oListParam As New List(Of String)

            oListParam.Add(Session.Item("UserCId"))

            oListParam.Add(Request.Form(txtfolder.UniqueID))



            Select Case oCarpeta.saveReg(oListParam.ToArray, "paAddCarpeta")

                Case "0", "1" : DoSearchFolders()

                    Me.Page.ClientScript.RegisterStartupScript(Me.GetType, "MyScriptFolder", "alert('Se creó la carpeta de forma satisfactoria');", True)

                Case Else : Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "MyScriptFolder", "alert('No se pudo crear la carpeta');", True)

            End Select

        Else

            Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "MyScriptFolder", "alert('No se pudo crear la carpeta');", True)

        End If

    End Sub

Este código de abajo si me registra los scripts.

Las páginas tienen el mismo código y contenido, la diferencia está en estos dos eventos y el nombre de los botones.

Código:

    Protected Sub btnSend_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSend.Click

        Dim szToParam As New List(Of String)

        Dim szTmpCad As String = ""

        Dim szNomAsesor As String = ""

        Dim szMailAsesor As String = ""



        szToParam.Add(oDetConsFin.PreFormatValueSP(Request.QueryString("idcon")))

        szToParam.Add(oDetConsFin.PreFormatValueSP(Request.Form("txtcoment")))

        szToParam.Add(oDetConsFin.PreFormatValueSP(Request.Form(rbVal.UniqueID)))



        Select Case oDetConsFin.saveReg(szToParam.ToArray, "paAddValuation")

            Case "0", "1" : Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "MyScriptVal", "alert('Se registró la valoración de forma satisfactoria'); window.location='ConsFin.aspx';", True) 'redirigir a pagina de consulta enviada

            Case Else : Me.Page.ClientScript.RegisterStartupScript(Me.GetType(), "MyScriptVal", "alert('No se pudo registrar la valoración');", True)

        End Select

    End Sub

¿A que puede deberse este problema?

Gracias de antemano

PD: He realizado un seguimiento paso a paso, y todo está ok, ejecuta todo bien, pero no muestra los mensaje de javascript, en el primer código.

Saludos cordiales.