使用美国主机空间时ASP生成HTML不成功-酬谢
100元酬解godaddy主机无法生成HTML或者0KB问题本人使用的程序为ASP生成HTML静态的系统，以前在国内的空间一切正常，前几天转为Godaddy的主机后，出现无法生成HTML文件与生成的文
件为0KB，同时也有部分功能可以正常生成，排除文件夹权限问题。
查阅很多碰到类似问题的网友，可能是英文系统对中文的支持不好，具说是要改FSO写法或者用UTE-8编码，但本人不懂ASP程序，特来求助
，好心的兄弟麻烦帮忙解决，本人在广州，请客吃饭或者直接支付劳务费用。喜欢研究ASP的朋友，本人赠送这套集 中英文简繁一体的HTML
系统源码供之研究之用。
QQ：516841231 注明ASP
其中一个生成0KB文件的ASP代码为：
<%@ LANGUAGE = VBScript.Encode %>
<!--#include file="admin.ASP"-->
<!--#include file="INC/HTMLPRODUCT.ASP"-->
<%
dim title
set rs_news=server.createobject("adodb.recordset")
sqltext4="select top 1 * from Bs_Sysdata"
rs_news.open sqltext4,conn,1,1
title=rs_news("BsenCompanyName")
rs_news=nothing
rs_news.close
Response.Write "<Html>"
Response.Write "<Head>"
Response.Write "<Title>管理中心</title>"
Response.Write "<Meta Http-Equiv=""Content-Type"" Content=""Text/Html; CharSet=Gb2312"">"
Response.Write "<Link Type=""Text/Css"" Rel=""StyleSheet"" Href=""Images/style.css"">"
Response.Write "</Head>"
Dim Rs1,Sql1,Moban
Moban=ljcms.ljmsn(13)
Moban1=Moban
set rsRoot=server.createobject("adodb.recordset")
sql="select * From enMenuClass where Depth=0 and ShowOnTop=True order by RootID"
rsRoot.open sql,conn,1,1
strtitle=""
do while not rsRoot.eof
ParentID=rsroot("classID")
strtitle=strtitle&"<li><a href="& rsroot("linkurl") &">"& rsroot("Classname") &"</a>"
strtitle=strtitle&"</strong><ul>"
set rsRoot1=server.createobject("adodb.recordset")
sql1="select * From enMenuClass where Depth=1 and ShowOnTop=True and ParentID="& ParentID &" order by RootID"
rsRoot1.open sql1,conn,1,1
do while not rsRoot1.eof
strtitle=strtitle&"<li><a href="& rsroot1("linkurl")&">"& rsroot1("Classname")&"</a></li>"
RSROOT1.MOVENEXT
LOOP
RSROOT1=NOTHING
RSROOT1.CLOSE
strtitle=strtitle&"</ul>"
strtitle=strtitle&"</li>"
RSROOT.MOVENEXT
LOOP
RSROOT=NOTHING
RSROOT.CLOSE
ljcms.enprocla strsmallclass,strsearch,strClassname,strLogin,strTitle,Title,Moban
Conn.Close
Set Conn=nothing
Response.Write "分类页面成功生成</html>"
%>
附件为部分文件，好心的兄弟请请帮忙看看。
本人不懂ASP代码，此处为其它兄弟提供的资料与方法，主要思路是要用ADODB.Stream 的方法来生成html。
http://bbs.
