Calcolo di convenienza della dilazione di pagamento

Utilità di calcolo
Dilazione di pagamento

Inserisci il prezzo, il tasso di interesse (rendimento di un investimento alternativo o tasso di interesse per il finanziamento attraverso il ricorso al credito), lo sconto, l'eventuale extrasconto e la scadenza del pagamento per la prima ipotesi; sconto e la scadenza del pagamento per la seconda ipotesi.

<% dim prnet if request.form("Prezzonetto") = "" then calcola = 0 messaggio= "Inserisci e seleziona i dati e scegli calcola!" %> <% else messaggio = "" calcola = 1 prnet = request.form("prezzonetto") sconto = request.form("sconto") sconto2 = request.form("sconto2") inter = request.form("int") exsconto= request.form("exsc") pagsol2 = request.form("pag2") pagsol1 = request.form("pag1") scartotempo = request.form("pag2")-request.form("pag1") end if %> <% if calcola = 1 then sol1 = prnet *(1-sconto)*(1-exsconto)*(1+(inter*(scartotempo/360))) sol2 = prnet*(1-sconto2) scon1 = formatnumber(((1- sol1/prnet)*10000)/100 ,2) scon2 = formatnumber(((1- sol2/prnet)*10000)/100 ,2) %> <% else end if %>

Prezzo:

Tasso di interesse:



-
	ipotesi 1	ipotesi2
Sconto applicato:		-	-
Extra Sconto:		-Sconto applicato:
Scadenza Pagamento:		Scadenza Pagamento:
-

<%="Prezzo: " & formatcurrency(prnet)& "" %>



<%=" Ipotesi1: "%>
<%="Sconto Ipotesi1: " & sconto*100 & "%" & ""%>
<%="Prezzo Scontato: " & formatcurrency(prnet*(1-sconto)) & ""%>
<%="Extra sconto concesso dal grossista: " & exsconto*100 & "%"& ""%>
<%="Prezzo con Extra Sconto : " & formatcurrency(prnet(1-sconto)(1-exsconto)) & ""%>
<%="Tasso di interesse bancario: " & inter*100 & "%"& ""%>
<%="Scarto di tempo tra le due ipotesi: " & scartotempo & " giorni" & ""%>
<%="Costo finale dopo " & pagsol2 & " Giorni ipotesi 1= " & formatcurrency(int(sol1))& ""%>

<%="sconto finale dopo " & pagsol2 & " Giorni ipotesi 1= " & scon1& "%" & ""%>



<%=" Ipotesi2: "%>
<%="Sconto Ipotesi2: " & sconto2*100 & "%" & ""%>
<%="Costo finale dopo " & pagsol2 & " Giorni ipotesi 2= " & formatcurrency(int(sol2))& ""%>
-