none
más servervalidate con controles dinámicos RRS feed

  • Pregunta

  • Hola de nuevo:

    Tengo un customvalidator dinámico

                        cv = New CustomValidator
                        tc2.Controls.Add(cv)
                        ''cv.ValidationGroup = "publicar"
                        cv.Display = ValidatorDisplay.None
                        cv.ID = "cvfichero2" & intnumero
                        cv.ControlToValidate = "fufichero" & intnumero
    

    Quisiera que me hiciese el siguiente servervalidator que tengo de un control estático

        Sub Comprobar_existe_fichero(ByVal s As Object, ByVal args As ServerValidateEventArgs) Handles cvfichero1.ServerValidate
            If fufichero.HasFile Then
                Dim intobra As Integer = ddlclasesobras.SelectedValue, strcarpeta As String
                strcarpeta = Choose(intobra, "Anuncios", "Aplicaciones", "Articulos", "Canciones", "Cuadros", "Cuentos", "Cursos", "Diapositivas", "Documentales", "Estudios", "Eventos", "Fotos", "Negocios", "Novelas", "Peliculas", "Poemas")
                Dim strfichero As String, strextension As String, fi As FileInfo
                strfichero = fufichero.PostedFile.FileName
                strextension = Path.GetExtension(strfichero).ToLower
                strfichero = Left(strfichero, InStrRev(strfichero, ".") - 1)
                strfichero = Left(strfichero, 21) & strextension
                fi = New FileInfo(Server.MapPath(strcarpeta & "_privado/" & strfichero))
                If Not fi.Exists Then
                    args.IsValid = True
                Else
                    Dim strficheroborrar As String
                    If InStr(lblfichero.Text, " (") > 0 Then
                        strficheroborrar = Left(lblfichero.Text, InStr(lblfichero.Text, " (") - 1)
                        If strficheroborrar <> strfichero Then
                            args.IsValid = False
                        Else
                            args.IsValid = True
                        End If
                    Else
                        args.IsValid = False
                    End If
                End If
            Else
                If lblficheroobligatorio.Visible Then args.IsValid = False
            End If
        End Sub
    

    Cambiaría el nombre del fichero, que ahora sé que lo cojo de s, y el lblficheroobligatorio.visible, que cambiaría al lblobligatorio & intnumero

    ¿cómo se puede hacer? no hay un cv.servervalidate, como cv.ClientValidationFunction

    Muchísimas gracias

    sábado, 6 de julio de 2019 14:57