ASP的程序，弄了个生成HTML的功能，本来好好的，前段时间因为更换了域名，所以在代码里将域名更换，这下好了，出现了这个错误，但奇怪的是，一共需要生成六种页面，而只有其中的生成两个页面出现此错误，其他正常。

[local]1[/local]

msxml3.dll 错误 '80070005'拒绝访问。/Saveshtml/include/function.asp，行 358

 '*************************************************
'函数名：GetWebFile
'作  用：获取WEB文件并保存到本地
'参  数：FileName 网站下的相对文件包/文件名称，WebUrl ,RefererUrl
'返回值：
'**************************************************
function SaveWebFile(FileName,WebFileUrl,RefererUrl)
if RefererUrl="" then RefererUrl=WebFileUrl

 if instr(FileName,":")=0 then FileName=server.MapPath(FileName) 

 set Retrieval=server.createobject("MSXML2.XMLHTTP")

 Retrieval.Open "Get",WebFileUrl, false

 Retrieval.setRequestHeader "Referer",RefererUrl 

 Retrieval.Send() *****/这里是第358行

 GetRemoteData = Retrieval.ResponseBody
   set Ads=server.createobject("Adodb.Stream")
   Ads.Type = 1
   Ads.Open()
   Ads.Write(GetRemoteData)
   Ads.SaveToFile FileName,2 
   Ads.Cancel()
   Ads.Close()
End  function

function BytesToBstr(body,Cset)
    Set obj = Server.CreateObject("adodb.stream")
    obj.Type = 1
    obj.Mode =3
    obj.Open
    obj.Write body
    obj.Position = 0
    obj.Type = 2
    obj.Charset = Cset
    BytesToBstr=obj.ReadText 
End  function
%>

求大神帮助，万分感谢，用的是阿里云的IIS服务器.