关于ASP的数据采集程序在IIS6.0里测试

本人有一个像数据采集的ASP程序，做好放在自己电脑(FAT32)的IIS6.0里测试正常，但放到其它的服务器(NTFS)不能正常显示，他那台服务器和我的也是win2003里的IIS6.0,试用了很多什么权限设置的都不行。
测试的错误提示是：

Error Code: -2146697209
Error Reason: 系统错误: -2146697209。
Error Line: 0装载XML文件错误！

数据采集程序像这样的
Function LeatherHRXml(strXmlFile, strXslFile)
  Dim objXml, objXsl
  
   
    strXslFile = Server.MapPath(strXslFile)

  
  Set objXml = Server.CreateObject("MSXML2.DOMDocument")
  Set objXsl = Server.CreateObject("MSXML2.DOMDocument")
 
  objXML.Async = False '设定是否要异步传输数据
  If objXml.Load(strXmlFile) Then '读取
    objXsl.Async = False
    objXsl.ValidateonParse = False
    If objXsl.Load(strXslFile) Then
      On Error Resume Next          ' 捕获transformNode方法的错误
      LeatherHRXml = objXml.transformNode(objXsl)
      If objXsl.parseError.errorCode <> 0 Then
        Response.Write "<br><hr>"
        Response.Write "Error Code: " & objXsl.parseError.errorCode
        Response.Write "<br>Error Reason: " & objXsl.parseError.reason
        Response.Write "<br>Error Line: " & objXsl.parseError.line
        LeatherHRXml = "<span class=""alert"">格式化XML文件错误！！</span>"
      End If
    Else
      Response.Write "<br><hr>"
      Response.Write "Error Code: " & objXsl.parseError.errorCode
      Response.Write "<br>Error Reason: " & objXsl.parseError.reason
      Response.Write "<br>Error Line: " & objXsl.parseError.line
      FormatXml = "<span class=""alert"">装载XSL文件错误！</span>"
    End If  
  Else
    Response.Write "<br><hr>"
    Response.Write "Error Code: " & objXml.parseError.errorCode
    Response.Write "<br>Error Reason: " & objXml.parseError.reason
    Response.Write "<br>Error Line: " & objXml.parseError.line
    LeatherHRXml = "<span class=""alert"">装载XML文件错误！</span>"
  End If
  
  Set objXsl = Nothing
  Set objXml = Nothing
End Function

就是用这个，奇怪的是我找了一台XP系统的IIS5.1,在所有任务---权限向导---从模板选择新的安全性设置里可以设置成功，测试正常显示我所要的数据，我觉得程序是没有问题是，就是不知IIS6.0怎样去设置，请高手指点下，谢谢