Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > PHP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-04-2008
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
A ver Emilio, mira a ver si esta función te anda

Código PHP:
function calculaDv($imei)
{
    
$len = strlen($imei);
    
$suma = 0;

    for (
$i = 0; $i < $len; $i++)
    {
        
$producto = $imei{$len - $i - 1} * (2 - ($i &#37; 2));
        
$suma += ($producto % 10) + ($producto - ($producto % 10)) / 10;
    }

    return (
10 - ($suma % 10)) % 10;
} 
No es que lo haya encontrado en ningún lado pero probé con el algoritmo módulo 10 y me ha funcionado en el imei de mi celular y 3 o 4 que he encontrado en internet.

// Saludos

Última edición por roman fecha: 14-04-2008 a las 10:26:37.
Responder Con Cita
  #2  
Antiguo 14-04-2008
Avatar de Emilio
*Emilio* Emilio is offline
Capo
 
Registrado: may 2003
Ubicación: Palma de Mallorca
Posts: 2.639
Poder: 10
Emilio Va por buen camino
Cita:
Empezado por roman Ver Mensaje
A ver Emilio, mira a ver si esta función te anda
Anda de lujo

Pégale un vistazo en funcionamiento http://www.mensajitos.com/calcula_imei.php

¿Todavía te extraña que todo el Club te echase de menos?
__________________
Saludos
Emilio
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Algún algoritmo para calcular el último día de un mes David OOP 3 06-03-2008 18:13:01
Solamente el Ultimo digito Camilo Varios 31 07-11-2007 18:57:38
Comparar un number dígito a dígito kuan-yiu SQL 2 25-06-2007 18:26:47
Modificar un str dígito a dígito fortran Varios 11 22-12-2003 17:44:46
como calcular el digito de control d una cuenta bancaria User_Baja_2 Varios 3 31-05-2003 16:35:16


La franja horaria es GMT +2. Ahora son las 12:48:31.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi