Conversione in euro.

[paolae]

Buongiorno a tutto il forum,

Qualcuno così gentile, potremme spiegarmi con un esempio, come si fa a impostare una formula in asp di conversione Dinar (RSD-SERBO) in euro? però aggiornata in tempo reale.

Tipo come si fa in excel, importando i dati dal web.

Grazie

[paolae]

Aiutino???

[paolae]

Nessuno mi aiuta???

Ho visto un po' in rete...ma non ho trovato nessun tipo di guida o script in asp...ma sempre e solo in Excel

[saucer]

Questo problema non è prettamente ASP.

La funzione ASP dovrebbe essere qualcosa del tipo :

Euro = QuantitaRSD*CoefficienteAggiornato

il problema principale pero' è recuperare il CoefficienteAggiornato da qualche parte ( sito web, webservices.... ) e quindi con l'ASP non c'entra moltissimo...

[paolae]

Ah capisco, grazie saucer per la risposta.
E se invece volessi fare solo la conversione? e magari aggiornare il tasso ogni 15 giorni?

allora la formuletta è semplicissima

Euro in Dinar (RSD-SERBO)

10*118

SQL = "Select (((campo_prezzo_dinar) *10)*118) from Dati2"

Qualcosa del genere?

[saucer]

sql = "Select ((campo_prezzo_dinar*tassoconversione)*quantita) as importo from valuta where nomevaluta = 'RSD' "

Qualcosa del genere credo... non conoscendo da dove prendi i dati, tassoconversione potrà essere una variabile ( e quindi dovrai modificare l'sql per adattarla ) e quantita sarà l'importo da convertire ( ed anche in tal caso l'sql la modifichi per leggere il contenuto variabile ).

[paolae]

I campi del database sono:

fornitore,articolo,descrizione,prezzo,prezzo_dinar i

La tabella dove estraggo i dati è strutturata cosi:

fornitore, articolo, descrizione, prezzo, prezzo_dinari (da dinar in euro)

Alfabit    1chswt  switchRete   40     (pz convertito in euro)

[optime]

certo che il nome delle colonne è fuorviante. in "prezzo" io metterei il prezzo in valuta locale, poi in "prezzo_euro" il prezzo in euro.

per il fattore di conversione, puoi metterlo in una tabella del deb e aggiornarlo ogni volta che puoi (magari con un altro script via webservice)

[saucer]

Ma tale opzione di "conversione" non puoi farla quando devi mostrare a video il valore?

Essendo la conversione da Eur-> Altra valuta una cosa che cambia in continuazione, dovresti fare una procedura che prenda il valore di conversione da qualche parte ( in una visione semplicistica, ad esempio su un file txt sul server ) e a quel punto prendi il valore del db "prezzo" e lo moltiplichi per il valore di conversione ed il risultato a quello di quantità da ordinare.

[paolae]

Ti posto la pagina saucer:

<%  
Set DBConn = Server.CreateObject("ADODB.Connection")
DBConn.open"Driver={Microsoft Access Driver (*.mdb)}; dbq=" &  server.MapPath("/db/miodb.mdb")

Set objRs = Server.createObject("ADODB.Recordset")
        
Dim objRS,DBConn 

RecordsPerPagina = 5 

page = Request("page") 

if page="" then page=1 

strSQL = "SELECT * FROM tabella order by ID DESC" 

objRS.open strSQL, DBConn, 1 


objRS.PageSize = RecordsPerPagina 

objRS.AbsolutePage = page 

If objRS.Eof=True or objRS.Bof=True then 

Response.Write "

Nessun risultato trovato</P>" 

Else 

Response.Write ("") 

For i=1 to RecordsPerPagina 

if Not objRS.EOF then 

%>

      <table width="100%" border="0" cellspacing="1" cellpadding="5" id="table1">
        <tr> 
        
          <td bgcolor="#3E3EFF" width="5%">
			<font face="Verdana" size="2" color="#FFFFFF">fornitore</font></td><td bgcolor="#3E3EFF" align="center" width="30%">
			<font face="Verdana" size="2" color="#FFFFFF">articolo</font></td><td bgcolor="#3E3EFF" align="center" width="30%">
			<font face="Verdana" size="2" color="#FFFFFF">descrizione</font></td><td bgcolor="#3E3EFF" align="center" width="30%">
			<font face="Verdana" size="2" color="#FFFFFF">prezzo</font></td><td bgcolor="#3E3EFF" align="center" width="30%">
			<font face="Verdana" size="2" color="#FFFFFF">prezzo_dinari</font></td><td bgcolor="#008000" align="center" width="30%">
        </tr>
        <tr>
          <td bgcolor="#B0FFFF" width="30%" align="center"><font face="Verdana" size="2"><%response.write(objRs("fornitore"))%></font></td>
          <td bgcolor="#B0FFFF" width="30%" align="center"><font face="Verdana" size="2"><%response.write(objRs("articolo"))%></font></td>
          <td bgcolor="#B0FFFF" width="30%" align="center"><font face="Verdana" size="2"><%response.write(objRs("descrizione"))%></font></td>
          <td bgcolor="#B0FFFF" width="30%" align="center"><font face="Verdana" size="2"><%response.write(objRs("prezzo"))%></font></td>
          <td bgcolor="#B0FFFF" width="30%" align="center"><font face="Verdana" size="2"><%response.write(objRs("prezzo_dinari"))%></font></td>

        </tr> 
       </table>
</a></p>


<%
objRS.MoveNext 

end if 

Next 

Response.Write ("</table></center>") 

End if 

Response.Write "

<font face= Verdana size=2>Pagine:</font></p> " 

For pag=1 to objRS.PageCount 

Response.Write "<font face= Verdana size=2><A href='miapagina.asp?page=" & pag & "'>" 

Response.Write pag 

Response.Write "</A> " 

Next 

Response.Write "</P>" 

objRS.Close 

Set objRS=Nothing 

DBConn.Close 

Set DBConn=Nothing 

%>

Potresti aiutarmi come impostare la query?