Ciao, grazie per l' aiuto ma non ci son riuscito, ho usato questo suggerimento
codice:
<%
Response.ContentType = "application/vnd.ms-excel"
Dim cn : Set cn = Server.CreateObject("ADODB.Connection")
Dim strConn
strConn = "driver={Microsoft Access Driver (.mdb)};dbq="&_
server.MapPath("IL_NOME_DEL_NOSTRO_DATABASE.mdb")'OPZIONALE
---->&";PWD=LA TUA PASSWORD"
Dim sql
sql ="SELECT FROM TABELLA"
cn.open strConn
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, , , adCmdText %>
<TABLE BORDER=1>
<TR>
<%
col = 2
For c = 0 to rs.Fields.Count - 1
%>
<TD BGCOLOR=RED><% = rs(c).Name %></TD>
<% Next %>
</TR>
<%
Do While Not rs.EOF
%>
<TR>
<% For c = 0 to rs.Fields.Count - 1
%>
<TD VALIGN=TOP ><% = rs(c) %></TD>
<% Next %>
</TR>
<%
rs.MoveNext
col = col + 1
Loop
rs.Close
%>
lo connetto al mio db lo mando in esequzione e mi apre una finestra per il download e non funziona perche non esiste la pagina ed altre cose. Cosa posso fare?