Ciao a tutti eccomi di nuovo!!!

Dunque, non riesco a far fare ad una sub quello che voglio io!!! E' grave,è?!?!?!

Ho una sub crea un file di excel
.....
response.buffer = true
Response.Clear
response.ContentType = "application/vnd.ms-excel"
response.AddHeader ("content-disposition", "attachment;filename=Logs.xls")
.....
dim prow
Dim strConn as string = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("../../caaf.mdb")
Dim Conn as New OleDbConnection(strConn)
Conn.Open()

Dim sqlLog as string="SELECT * FROM T_Log Where......."

DIM adLog AS new OleDbDataAdapter(sqllog, conn)
DIM dsLog AS New DataSet()
adLog.Fill(dsLog, "tab")

Response.Write("<table border=1 bordercolor=lightsteelblue cellspacing=0 align=center>")
Response.Write("<tr><td>IdLog</td><td>Data</td><td>Cognome</td><td>Nome</td><td>Ip</td><td>Referer</td><td>Area</td><td>Azione</td><td>Valore</td><td>Valore Precedente</td></tr>")
if dsLog.Tables("tab").Rows.Count>0 then
For Each pRow In dsLog.Tables("tab").Rows
Response.Write("<tr><td>" & pRow("IdLog").ToString() & "</td><td>" & pRow("Data").ToString() & "</td><td>" & pRow("Cognome").ToString() & "</td><td>" & pRow("Nome").ToString() & "</td><td>" & pRow("Ip").ToString() & "</td><td>" & pRow("Referer").ToString() & "</td><td>" & pRow("Area").ToString() & "</td><td>" & pRow("Azione").ToString() & "</td><td>" & pRow("Valore").ToString() & "</td><td>" & pRow("ValorePrecedente").ToString() & "</td></tr>")
next
end if
Response.Write("</table>")

response.flush
response.end

conn.close
ora io vorrei che quando mi ha chiesto di salvare o di aprire il file, rendesse un panel invisibile. Solo che crea il file e tutto ma ignora totalmente qualsiasi altro comando anche un response.redirect!

Come posso fare?

Grazie,
Elisa