Grazie adesso è più chiaro...
Un'ulteriore domanda:
esportando in excel il contenuto della tabella access i records con valore true si stampano come 0 e quelli con valore false si stampano come -1.
Come posso ovviare per avere anche in excel true e false ?
il codice che uso per esportare è questo:
codice:
Dim FileName
FileName="Libretto.xls"
Response.Buffer = true
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "content-disposition", "inline; filename=" & FileName
path="../mdb/db.mdb"
Dim DBConn
Set DBConn=Server.CreateObject("ADODB.Connection")
Dim rs
set rs=Server.CreateObject("ADODB.Recordset")
strConn="Provider = Microsoft.Jet.OLEDB.4.0;"
strConn= strConn & "Data Source =" & Server.MapPath(path)
DBConn.Open strConn
cod = request.form("Id")
Set rs = DBConn.Execute("SELECT * FROM TAB where ID in ("&cod&") order by id asc")
Response.write "<table border=1>"
Response.Write("<tr>")
Response.Write("<th bgcolor='#FF9900'>...</th>")
Response.write "</tr>"
Response.write "<tr>"
Response.Write("<td>")
Response.write rs.GetString(,,"</td><td>","</td></tr><tr><td>","")
Response.write "</td></tr></table></center>"
Set rs=Nothing
DBConn.Close
Set DBConn= Nothing
Response.flush
Response.end