ciao a tutti, ho il seguente problema:
ho una pagina dalla quale estraggo i dati da una tabella di un db access in cui ho diversi campi tra cui uno di tipo data.
Quando li visualizzo però la data me la mette in formato anglosassone e non italiano; come posso fare a risolvere questo problema?.
Vi fornisco il codice della pagina asp:
<%
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("../Database/db.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * From ddt_finale"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
%>
<body bgcolor="#CCCCCC">
<table width="1040" border="0" height="205" align="left">
<tr>
<td>
<%
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("../Database/db.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM dati_esercizio"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
%>
</p>
<table width="1035" border="0">
<tr>
<td colspan="20">
<p align="center"><%=rs(1)%> di: <%=rs(2)%>
Res: <%=rs(3)%> - <%=rs(4)%>
Part. I.V.A.: <%=rs(5)%>
Cod. Fisc: <%=rs(6)%>
Ubic. Es. <%=rs(7)%> Via: <%=rs(8)%>
Luogo Conservazione Documenti Fiscali:
<%=rs(9)%> - Via <%=rs(10)%>
<%=rs(11)%> <%=rs(12)%>
<%=rs(13)%> <%=rs(14)%></p>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="1041" border="0" align="left">
<tr>
<td>
<p align="center"><font size="5" color="#CC0000">Premere sul Link per
Visualizare il D.d.T. in Dettaglio:</font> </p>
<table border="1" align="center" bordercolor="#000000" width="795">
<tr bgcolor="#FF9966">
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Id</font>
</center>
</td>
<td bgcolor="#FFCC99">
<div align="center"><font color="#000000" size="2">Data:</font></div>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Numero d.d.t:</font>
</center>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Cliente:</font>
</center>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Cognome \ Nome Titolare:</font>
</center>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Città:</font>
</center>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">P.Iva:</font>
</center>
</td>
<td bgcolor="#FFCC99">
<center>
<font color="#000000" size="2">Cod. Fisc.:</font>
</center>
</td>
<td bgcolor="#CCCCCC" bordercolor="#CCCCCC"><font color="#000000" size="2"></font></td>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("../Database/db.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * From ddt_finale Order by Id Desc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#00FF99"
intSfondo="#CCCCCC"
else
intVolta="1"
intTesto="#FFFF99"
intSfondo="#FFFFCC"
end if
%>
<tr bgcolor="<%=intSfondo%>">
<td>
<div align="center">
<% =rs(0) %>
</div>
</td>
<td>
<div align="center">
<% =rs(14) %>
</div>
</td>
<td>
<div align="center"><font size="2">
<% =rs(2) %>
\
<% =rs(1) %>
</font></div>
</td>
<td>
<div align="center">
<% =rs(3) %>
-
<% =rs(4) %>
</div>
</td>
<td>
<div align="center">
<% =rs(5) %>
-
<% =rs(6) %>
-
<% =rs(7) %>
</div>
</td>
<td>
<div align="center">
<% =rs(9) %>
</div>
</td>
<td>
<div align="center">
<% =rs(12) %>
</div>
</td>
<td>
<div align="center">
<% =rs(13) %>
</div>
</td>
<td bordercolor="#000000">
<p align="center"><font size="2"><font size="3">Visualizza</font></font></p>
</td>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
</table>
<p align="center"> <a href="javascript:;"onClick="javascript:window.clos e()">
<input type="button" name="Chiudi" value="Chiudi Pagina">
</a></p>
</td>
</tr>
</table>
</p>
grazie per la collaborazione
Rispondi quotando
