Java - Pasar código en un ASP a JSP

 
Vista:

Pasar código en un ASP a JSP

Publicado por Arwen (1 intervención) el 12/08/2008 07:49:01
Por favor, me podéis ayudar a pasar este código en en un ASP a un JSP??? Es el siguiente y os lo agradezco infinito:

Function generaDatoAhora(MODELO)
dim codigo
dim numero
dim DC
dim dato
upperlimit = 75000000.0
lowerlimit = 50000000.0
Randomize
dato= Int((upperlimit - lowerlimit + 1)*Rnd() + lowerlimit)
dim par
dim a,i,p
dim NUMDOC
NUMDOC=MODELO
dim miPeriodito
miPeriodito = periodo

dato= NUMDOC & miPeriodito & dato
dim NumCodBar
NumCodBar = dato
DC=complemento7(Ccur(dato))
dato= dato & " " & DC
generaDAtoAhora = dato

End Function

Public Function complemento7(t)
dim d,c,a,r,resultado
dim dc(11)
d = Fix(t/7)
d=d * 7
c=t-d
resultado= 7 - c
if resultado = 7 then
complemento7 = 0
else
complemento7 = resultado
end if

End Function

Public Function periodo
dim anyo
anyo = Year(Now)
dim decada
decada = Int(anyo/10)
dim per
per = Abs((anyo-(decada*10))-7)
periodo = per
End Function

Muchísimas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder