Ejemplo n.º 1
0
    public bool formato_rut()
    {
        bool tempformato_rut = false;

        //VALIDAR RUT
        int i = 0;
        //Dim X As Integer
        int total      = 0;
        int totaltotal = 0;
        int por        = 0;
        int rut        = 0;
        int guion      = 0;
        //Dim nrut As Integer
        int  posicion = 0;
        int  valor    = 0;
        bool verdad   = false;

        if (txt_dv.Text == "k")
        {
            txt_dv.Text = "K";
        }

        i          = 1;
        total      = 0;
        totaltotal = 0;

        rut      = txt_rut.Text.Length;
        posicion = rut;
        por      = 2;


        //RECORRER EL R.U.T.
        for (i = 1; i <= rut; i++)
        {
            if (por == 8)
            {
                por = 2;
            }

            total      = Convert.ToInt32(por * Simulate.Val(txt_rut.Text.Substring(posicion - 1, 1)));
            posicion   = posicion - 1;
            totaltotal = totaltotal + total;
            por        = por + 1;
        }

        valor = totaltotal % 11;
        guion = Convert.ToInt32(Math.Floor((double)(11 - valor)));
        if (guion == Simulate.Val(txt_dv.Text.Substring(0, 1)) || guion == 10 && (txt_dv.Text.Substring(0, 1)) == "K" || guion == 11 && (txt_dv.Text.Substring(0, 1)) == "0" || guion == 10 && (txt_dv.Text.Substring(0, 1)) == "K")
        {
            verdad          = true;
            tempformato_rut = verdad;
            //If MsgBox("Rut valido ¿Desea Ingresar otro?", vbQuestion + vbYesNo, "Ingresar Otro") = vbYes Then
            //    txt_rut.Text = ""
            //    txt_dv.Text = ""

            //Else

            //End If
        }
        else
        {
            //MsgBox(" El R.U.T. ingresado NO es Valido", vbCritical, "Error.....")
            verdad          = false;
            tempformato_rut = verdad;
            //Response.Write("<script>")
            //Response.Write("alert('El formato del RUT es incorrecto!');")
            //Response.Write("</script>")
            //txt_rut.Text = ""
            txt_rut.Focus();
        }

        return(tempformato_rut);
    }