vbscript错误800a01a8

Question

Microsoft VBScript runtime error '800a01a8' Object required /umc/geturlandsize.asp, line 33 xml
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<appSettings>
        <add key="ConnectionString" value="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\UpdateManage\db1.mdb;"/>
        <add key="Domain" value="127.0.0.1"/>
        <add key="ProductStore" value="C:\Inetpub\wwwroot\UpdateManage\Data\"/>
        <add key="PhoneBookStore" value="C:\Inetpub\wwwroot\UpdateManage\phonebook\"/>
     </appSettings>
</configuration>set xmlDoc=server.CreateObject("Microsoft.XMLDOM")
set xmlappSettings=server.CreateObject("Microsoft.XMLDOM")
set xmladd=server.CreateObject("Microsoft.XMLDOM")xmlDoc.async="false"
xmlDoc.load(server.MapPath ("\UpdateManage\web.config"))set xmlappSettings = xmldoc.GetElementsByTagName("appSettings").Item(0) 
set xmladd = xmlappSettings.GetElementsByTagName("add") 'line 33 for each x in xmladd 
'Check for the Atrribute Value
if  x.getAttribute("key") ="ConnectionString" then
'Response.write(x.getAttribute("value"))
ConnectionString=x.getAttribute("value")
end if
nextset xmladd = xmlappSettings.GetElementsByTagName("add") 这行出错，但不知为何，请高手指点

Answer 1

set   xmlappSettings   =   xmldoc.GetElementsByTagName( "appSettings ").Item(0)   这句是不是就错了，你的根节点不是configuration 么？为什么第一次取就取appSettings ？

Answer 2

这是VB代码。读XML，我只用JScript写过。是从根读起的，你检查一下，是不是这里错了。