Page 1 of 1

alguien sabe como se genera un numero de serie

Posted: Sat Jun 10, 2006 2:57 am
by Gerardo Farfan
y cuales son sus caracteristicas.

de antemano muchas gracias

Posted: Sat Jun 10, 2006 7:48 am
by Antonio Linares
Gerardo,

Puedes usar la función nRandom( <nRango> ) --> nValue de FW, y luego pasar el valor a hexadecimal con DecToHex( nValue ). Si quieres luego le intercalas algún "-" y tendrás un número de serie bastante aceptable.

lo necesito

Posted: Sun Jun 11, 2006 6:42 pm
by leandro
Antonio como estas. de casualidad no tienes un ejemplo un poco mas didactico sobre como generar el numero de serie.

De antemano gracias

Posted: Wed Jun 14, 2006 1:35 am
by Gerardo Farfan
gracias antonio

Posted: Wed Jun 14, 2006 7:01 am
by Antonio Linares
Leandro,

Code: Select all | Expand

function Main()

   local nValor1 := nRandom( 1000000 )
   local nValor2 := nRandom( 1000000 )
   local cSerie  := DecToHex( nValor1 ) + "-" + DecToHex( nValor2 )
   
   MsgInfo( cSerie )

return nil

GRACIAS

Posted: Wed Jun 14, 2006 3:32 pm
by leandro
Antonio muchas gracias