<%response.write "<div align=right><font face=arial, verdana color=#003366 size=3>" & objRs("dbPREVENE") & "</font></div>
"%>
formatcurrency ? ma ndò ?
mi restituisce errore![]()
<%response.write "<div align=right><font face=arial, verdana color=#003366 size=3>" & objRs("dbPREVENE") & "</font></div>
"%>
formatcurrency ? ma ndò ?
mi restituisce errore![]()
"Non cercare di piegare il cucchiaio ma cerca di fare la cosa più saggia.....
...pensa che il cucchiaio non esiste,allora vedrai che è la tua MENTE a piegarsi"
[list=1][*]Posta l'errore.. aiutiamo ma non abbiamo ancora le sfere[*]Posta il codice completo della pagina[/list=1]
Vash
Personal Home Page
<%
Dim titolo,titolo1,titolo2
Set objConn = Server.CreateObject("ADODB.Connection")
cString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\database\usato.mdb")
objConn.Open cString
Set objRs = Server.CreateObject("ADODB.Recordset")
titolo = request.QueryString("titolo")
titolo1 = request.QueryString("titolo1")
titolo2 = request.QueryString("titolo2")
set objRs = objConn.Execute("SELECT * from usato where lCODMAR = " & titolo & " AND lKMPERCI <= " & titolo1 & " AND sDISVEN = 'S' order by " & titolo2 & " ASC ")
if objRs.eof then
response.write "La ricerca non ha prodotto nessun risultato."
else
Do while NOT objRs.EOF
%>
<table cellspacing="0" cellpadding="0" align=center width=100% height=170 valign=MIDDLE>
<tr>
<td valign=middle align=center width=70% height=170 background="sottodesc.jpg">
<%response.write "
<font face=arial, verdana color=#003366 size=3>" & objRs("SMMA") & "</font>
"%>
<%response.write "Periodo Immatricolazione : Anno " & objRs("sPERIMM") & "
"%>
<%response.write "Km Indicati: Km. " & objRs("lKMPERCI") & "
"%>
<%response.write "Disponibilità : " & objRs("sDISVEN") & ""%>
<%response.write "<div align=right><font face=arial, verdana color=#003366 size=3>" & objRs("dbPREVENE") & "</font></div>
"%>
<%response.write "<td valign=middle align=center width=30% height=170 background='sottogif.jpg'>"%>
<%response.write "[img]& objRs([/img]"%>
<%response.write "</td>"%>
<%response.write "</tr>" %>
<%objRs.Movenext
Loop
end if
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
il campo dbPREVEN è un campo prezzo..e mi viene restituito nel formato 00000 invece che in euro..
nn so dove mettere il formatcurrency :master:
"Non cercare di piegare il cucchiaio ma cerca di fare la cosa più saggia.....
...pensa che il cucchiaio non esiste,allora vedrai che è la tua MENTE a piegarsi"
che asino
<%response.write "<div align=right><font face=arial, verdana color=#003366 size=3>" & formatCurrency(objRs("dbPREVENE")) & "</font></div>
"%>
![]()
"Non cercare di piegare il cucchiaio ma cerca di fare la cosa più saggia.....
...pensa che il cucchiaio non esiste,allora vedrai che è la tua MENTE a piegarsi"