<%
set rs=server.createobject("ADODB.recordset")
strsql="select * from word where id="&trim(request("id"))
rs.open strsql,conn,1,1
response.contenttype="application/x-msword"
Response.AddHeader "Content-Disposition", "attachment;filename=11.doc"
response.binarywrite rs("word").getChunk(2000000)
rs.close