 |
 |
 |
 |
|
|
 |
Home | Forum | Tutorials | Articoli | Tips&Tricks | Scripts | Newsletter | Autori | Store | Hosting | E-Corsi | Libri |  |
COMMUNITY -
Login
| Utenti on-line: 0 |
| Ospiti on-line: 114 |
ASPCode.it - Store
Convertitore Lire/Euro
di Marco Sinigaglia
di Marco Sinigaglia
Data di pubblicazione: 19/07/2001
Voto della community: n.g.
(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
%>
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).
AspIn.com
Utilità
Link
 |
Utenti connessi: 114
|
 |
 |
|
 |
Copyright © 2001-2012 ASPCode.it
- Riproduzione vietata - v. 3.0
- Capitani Paolo - P.IVA: 03300740408
- Contact
|
 |