Cálculo / Validación del IBAN

[ramato79]

Gracias por la aportación.
Solo una cosilla, el codigo del pais en el caso de ser una cuenta IBAN debe tomarse antes de la modificacion de la cuenta

[quote=Angel.Matilla;469275]Ampliando el código anterior que puse, para validar cualquier IBAN que se introduzca o calcular el correspondiente a un número de cuenta. Este es el código:

     Cuenta = cAux;
     if (isalpha(Cuenta.c_str()[0]) && isalpha(Cuenta.c_str()[1]))    // Es IBAN
     {
          if (isalpha(Cuenta.c_str()[2]) || isalpha(Cuenta.c_str()[3]))
               return "";
 
          Pais   = Cuenta.SubString(1, 2);
          Cuenta = Cuenta.SubString(5, Cuenta.Length()) + Cuenta.SubString(1, 2) + "00";
     }
     else
     {
          if (Pais.IsEmpty())
               Pais = "ES";
 
          Cuenta = Cuenta + Pais + "00";
     }