其实写JS的方法是比较常用的，使用也很简单，就好象下面的语句：
Response.Write "document.write("""&Showstr&""");"
Showstr是指你要输出的内容，调用的时候就用下面的句子就好了：
URL+PageName.asp是指页面的路径，下面是一个简单的例子：
<%
'这是一个简单的输出JS的例子
'保存页为showUser.asp
Dim Showstr
Dim rs
Dim conn
'打开数据库建立记录集
set conn=Server.CreateObject("ADODB.connection")
conn.Open MM_conn_STRING
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "select * from T_User",conn,1,1
'输出
While NOT(rs.eof)
Showstr=Showstr&"姓名："&rs("Name")&"
"
rs.MoveNext
Wend
'写JS
Response.Write "document.write("""&Showstr&""");"
'释放资源
rs.Close()
set rs=Nothing
conn.Close
set conn=Nothing
%>
调用的时候，只要在要显示的地方，写上下面的代码就可以了：
