Ver Mensaje Individual
  #39 (permalink)  
Antiguo 19/12/2004, 00:58
Avatar de lexus
lexus
 
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 22 años, 4 meses
Puntos: 4
Formatear numero

esta funcion sirve para colocar ceros a la izquierda de un numero, funcion ideal para sistemas de facturacion por ejemplo nos deja un numero por ejemplo 14 a 00014

Código:
function FormatoNum(num,digitos)
largo = Len(Cstr(num))
dif = digitos - largo
if dif < 0 then exit function
if largo < digitos Then
x = String(dif,"0") & Cstr(num)
else
x = Cstr(num)
end if
FormatoNum = x
End Function
Le pasas como primer parámetro el numero y luego la cantidad de digitos
EJ:
response.write FormatoNum(14,4)' devolvera 0014
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com