js如何打印ASP中的变量内容

如何将在asp中定义的aaa这个变量内容在js中打印出来,也就是用js实现和response.write (aaa)
同样的功能<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<script language=javascript>
document.write(aaa)
</script>
</head><body>
<%Dim url,Html
url = "http://news.sina.com.cn/iframe/o/allnews/input/index.htm"
dim Http
set Http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.send()
if Http.readystate=4 then
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write Http.responseBody
objstream.Position = 0
objstream.Type = 2
objstream.Charset = "GB2312"
html = objstream.ReadText
objstream.Close
set objstream = nothing
set http=nothinghtml=Replace(html,"<","&lt;")
html=Replace(html,">","&gt;")
html=Replace(html," ","&nbsp;")
html=Replace(html,vbcrlf,"<br/>")
'response.write ("wer="+html)
dim aaa
aaa=html
response.write (aaa)
end if
 %>
</body>
</html>