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