% Set Conn = Server.CreateObject("ADODB.Connection") Set recSet = Server.CreateObject("ADODB.Recordset") Conn.Open Application("cnnString") Function DateEngToIta (data_eng) aaaa = DatePart("yyyy", data_eng) mm = DatePart("m", data_eng) gg = DatePart ("d", data_eng) DateEngToIta = gg & "/" & mm & "/" & aaaa End Function %>
| ||||||||||||||||||||||||||||||||||||||||||||||