da asp a word

[hugheshi]

faccio una select, estraggo i dati e vorrei stampare su word .
quando vado stampare su word mi appare una pagina bianca .

[hugheshi]

posto il codice :

<%@LANGUAGE="VBSCRIPT"%>
<%
corso=request.querystring("corso")
edizioni=request.querystring("edizioni")CNN=Application("CNN")

set conn=Server.CreateObject("ADODB.Connection")
conn.open CNN

set rs=Server.CreateObject("ADODB.RecordSet")

qry="SELECT * FROM iscritti  WHERE corso = '" & corso & "' AND edizioni ='"&edizioni&"' ;"

rs.Open qry,conn
record = 1
if rs.eof then

%>
non ci sono dati 

<%
else
%>
<% response.ContentType = "application/vnd.ms-word" 
response.AddHeader "content-disposition", "inline; filename=scheda.doc"

 %> 
<%=formatdatetime(now,2)%>
<table width="95%" border="1">
  <tr> 
    <td colspan="4" bgcolor="#FF0000"> <div align="center"></div></td>
    <td width="24%"><div align="center">[img]../files/insegna.gif[/img]</div></td>
    <td width="16%" bgcolor="#FF0000"></td>
    <td width="24%" bgcolor="#FF0000"> <div align="center"></div></td>
  </tr>
  <tr> 
    <td colspan="7"><p align="center"> 
      <h2 align="center"><font color="#FF0000" size="5" face="Verdana, Arial, Helvetica, sans-serif">FOGLIO 
        PRESENZE IN FORMAZIONE</font></h2>
      <p align="center"></p></td>
  </tr>
  <tr> 
    <td colspan="7"><h5><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif">TITOLO 
        DELLA FORMAZIONE :<%=rs.fields("corso")%></font></h5></td>
  </tr>
  <tr>
    <td width="10%"></td>
    <td width="10%">

<font face="Verdana, Arial, Helvetica, sans-serif">Formatore</font></p></td>
    <td colspan="3">

<font face="Verdana, Arial, Helvetica, sans-serif">__________________________________________</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">Funzione:</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">___________________</font></p></td>
  </tr>
  <tr>
    <td></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">Edizione </font></p></td>
    <td colspan="2">

<font face="Verdana, Arial, Helvetica, sans-serif"></font><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("edizioni")%></font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">ora inizio:__________________</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">ora fine :</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">___________________</font></p></td>
  </tr>
  <tr>
    <td></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">Luogo</font></p></td>
    <td colspan="3">

<font face="Verdana, Arial, Helvetica, sans-serif">__________________________________________</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">tot .ore</font></p></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("ore")%></font></p></td>
  </tr>
  <tr> 
    <td colspan="7">

<font face="Verdana, Arial, Helvetica, sans-serif">partecipanti</font></p></td>
  </tr>
  <tr>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">n&deg;</font></p></td>
    <td height="24">

<font face="Verdana, Arial, Helvetica, sans-serif">nome</font></p></td>
    <td width="8%">

<font face="Verdana, Arial, Helvetica, sans-serif">cognome</font></p></td>
    <td width="18%">

<font face="Verdana, Arial, Helvetica, sans-serif">iper</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">settore</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">funzione</font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">firma</font></p></td>
  </tr>
  <%
	while not rs.EOF 
	%>
  <tr>
    <td><% Response.Write ""&record&""%></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("nome")%></font></p></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("cognome")%></font></p></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("iper")%></font></p></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("settore")%></font></p></td>
    <td>

<font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><%=rs.fields("ruolo")%></font></p></td>
    <td>

<font face="Verdana, Arial, Helvetica, sans-serif">___________________</font></p></td>
  </tr>
  <%

	rs.MoveNext
	wend
	%>
</table>


<%
end if

rs.close
set rs=nothing

conn.close
set conn=nothing
 Response.Flush 
   Response.End
%>