莱切斯特城 利物浦:Asp生成Xml文件后显示错误..

这是asp生成xml代码：
=========================================

<!--#include file="conn.asp"-->
<%
Dim sSQL
dim rs
dim sCrLf
dim sXmlClear
dim sRssHead
dim sRssEnd
sCrLf = chr(13)&chr(10) '回车+换行
sXmlClear=""
sXmlClear = sXmlClear & "<?xml version='1.0' encoding='GB2312'?>" & sCrLf
sRssHead = "<rss version='2.0'>" & sCrLf
sRssHead = sRssHead & "<channel>" & sCrLf
sRssHead = sRssHead & "<title> Hi </title>" & sCrLf
sRssHead = sRssHead & "<description>Look</description>" & sCrLf
sRssHead = sRssHead & "<link>See It</link>" & sCrLf
sRssHead = sRssHead & "<language>zh-cn</language>" & sCrLf
sRssHead = sRssHead & "<docs>Why100000.COM News Center</docs>" & sCrLf
sRssHead = sRssHead & "<generator>Rss Generator By www.Why100000.COM</generator>" & sCrLf
sRssEnd = "</channel></rss>"
Response.CharSet="gb2312" '数据集
Response.ContentType="text/xml" '数据流格式定义
'输出：
Response.write sXmlClear
Response.write sRssHead

OpenData
sSQL="select * from c_news"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sSQL, Conn,1,1
if not (rs.eof and rs.bof) then
do while not rs.eof
response.write "<item>" & sCrLf
response.write "<title> " & rs("c_title") & " </title>" & sCrLf
response.write "<link> " & "http://www.why100000.com/_news/show_a_new.asp?autoid="; & rs("c_content") & " </link>" & sCrLf
response.write "<author> " & rs("c_relation") & " </author>" & sCrLf
response.write "<pubDate> " & rs("c_time") & " </pubDate>" & sCrLf
response.write "</item>" & sCrLf & sCrLf
rs.movenext
loop
end if
rs.close
set rs=nothing
Response.write sRssEnd
body=sXmlClear&sRssHead&sRssEnd
writexml "A.xml",body

function writexml(filename,bodytext)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(Server.MapPath(filename),true)
fout.WriteLine bodytext
fout.close
end function
%>

==============================错误信息：

无法显示 XML 页。
使用 样式表无法查看 XML 输入。请更正错误然后单击 刷新按钮，或以后重试。

--------------------------------------------------------------------------------

文本内容中发现无效字符。处理资源 'http://localhost:8080/Program/News/RSS.asp' 时出错。第 1 行，位置: 2

搞不懂，请执教..............
==============================这是右击RSS.asp页后的源代码

<?xml version='1.0' encoding='GB2312'?>
<rss version='2.0'>
<channel>
<title> Hi </title>
<description>Look</description>
<link>See It</link>
<language>zh-cn</language>
<docs>Why100000.COM News Center</docs>
<generator>Rss Generator By www.Why100000.COM</generator>
</channel></rss>