请问一下 documeng.write语句在什么情况下才能正常显示？
我写的ASP文件如下：

<!-- #include file="top.asp" -->
<%
dim a
dim m
dim array(5)
a="PROVIDER=SQLOLEDB;UID=xxx;PWD=xxx;DATABASE=photo"
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open a
Set m=Server.CreateObject("ADODB.RecordSet")
m.open "select * from ycmusic",conn,3,3
z=m.recordcount
m.movelast
%>
document.write('<table border="0" width="100%" cellspacing="0" cellpadding="0" style="color: #FF99FF" id="table1" height="85">
<tr><td rowspan="2">　</td><td height="17"></td><td rowspan="2">　</td>
</tr> <form name="cmc" method="post" action="cmcl.asp"><tr><td>')
<%
for i=1 to z
%>
document.write('<input type="checkbox" name="<% =i %>" value="ON">')
document.write('<% =m("推荐专辑") %>')
document.write('<br>')
<%
m.moveprevious
next
%>
document.write('</td></tr></table>')
<%
m.close
set m=nothing
set conn=nothing
%>
运行时只看到一堆document.write 请问是什么问题 ？

[此贴子已经被作者于2006-4-22 16:25:11编辑过]

“<%@LANGUAGE="VBSCRIPT"%>
<!-- #include file="top.asp" -->
<%
dim a
dim m
dim array(5)
a="PROVIDER=SQLOLEDB;UID=momo;PWD=3201;DATABASE=photo"
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open a
Set m=Server.CreateObject("ADODB.RecordSet")
m.open "select * from ycmusic",conn,3,3
z=m.recordcount
m.movelast
%>
document.write('<table border="0" width="100%" cellspacing="0" cellpadding="0" style="color: #FF99FF" id="table1" height="85">
<tr><td rowspan="2">　</td><td height="17"></td><td rowspan="2">　</td>
</tr> <form name="cmc" method="post" action="cmcl.asp"><tr><td>')
<%
for i=1 to z
%>
document.write('<input type="checkbox" name="<% =i %>" value="ON">')
document.write('<% =m("推荐专辑") %>')
document.write('<br>')
<%
m.moveprevious
next
%>
document.write('</td></tr></table>')
<%
m.close
set m=nothing
set conn=nothing
%>”