asp - asp.net - aspcode.it

COMMUNITY - Login
 Username:
 
 Password:
 
Voglio registrarmi!
Password dimenticata?
 Utenti on-line: 0
 Ospiti on-line: 4073
ASPCode.it - Store

  > > Tips

Convertitore Lire/Euro
di Marco Sinigaglia

Data di pubblicazione: 19/07/2001        Voto della community: 0,00 (Votanti: 0)

Sempre più spesso abbiamo la necessità di convertire un valore in lire in Euro, ecco una funzione che ci permette di ottenere questa conversione:

<%
Function LireInEuro(ByVal lire)
  Const Euro = 1936.27
  Dim e
  e = FormatCurrency((lire/Euro), 2)
  LireInEuro = e        'restituisce il valore in euro
End Function
%>

La funzione riceve il valore in lire e restituisce il corrispondente in euro lasciando due decimali dopo la virgola; da ricordare che se il valore da convertire è preso da un form questo deve prima essere convertito in un intero (in VBScript ciò può essere fatto tramite la funzione CInt).




Utenti connessi: 4073