我在学ASP动态网站程序，正好找到了良精公司的企业网站源码下载，可惜是试用版，里面很多功能被限制了，现在缺少一个Admin_htmlconfig.asp文件，希望各位高手提供下这个文件，也希望能指点下我，在下不胜感激！！！
页面是
http://admin.
后台是
http://admin.  账号和密码都是：admin
静态页面生成出现
ADODB.Stream 错误 '800a0bbc'

写入文件失败。

/LJV49/admin/Admin_htmlconfig.asp，行 27
请高手帮我解决下

[ 本帖最后由 火灵圣火 于 2010-10-31 11:08 编辑 ]

http://admin.这个站点空间是你自己的吗？？

是否有相应权限呢？

不是我的站点空间，我有一个类似的www.
也是出现那个问题，好像的写入权限的问题，但是我服务器上的权限都打开了，是不是良精给的那个文件出了问题
Admin_htmlconfig.asp  的代码是这样的：
<!--#include file="CheckAdmin.asp"-->
<%
if Instr(session("AdminPurview"),"|34,")=0 then
  response.write ("<br><br><div align=""center""><font style=""color:red; font-size:9pt; "")>您没有管理该模块的权限！</font></div>")
  response.end
end if
hps=50
Function htmll(mulu,htmlmulu,FileName,filefrom,htmla,htmlb,htmlc,htmld)
if mulu="" then mulu="/"
if htmlmulu="" then htmlmulu="/"
mulu=replace(SysRootDir&mulu, "//", "/")
htmlmulu=replace(SysRootDir&htmlmulu, "//", "/")
FilePath=Server.MapPath(mulu)&"\"&FileName
Do_Url="http://"
Do_Url=Do_Url&Request.ServerVariables(name)&htmlmulu&filefrom
Do_Url=Do_Url&"?"&htmla&htmlb&"&"&htmlc&htmld
strUrl=Do_Url
set objXmlHttp=Server.createObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
binFileData=objXmlHttp.responseBody
Set objXmlHttp=Nothing
set objAdoStream=Server.CreateObject("Adodb." & "Stream")
objAdoStream.Type=1
objAdoStream.Open()
objAdoStream.Write(binFileData)
objAdoStream.SaveToFile FilePath,2
objAdoStream.Close()
set objAdoStream=nothing
End Function
%>

请多多指教这代码中出了什么问题

不知道你的代码具体是哪个，你可以先放道本地端测试一下，如果没有问题，在放到服务器上！

我检查出来了 就是上面这个文件中出了问题，但是我不知道怎么写，哪位高手帮个忙测试下，我把源码文件发给你