Asp classic 从XML中的值创建数组

Asp classic 从XML中的值创建数组,asp-classic,Asp Classic,我想从XML文件中获取值。如何生成m1、m2和m3中的值数组?。你怎么能做到这一点 这是XML <?xml version="1.0"?> <language> <menus> <m1>HomePage</m1> <m2>Contact</m2> <m3>About Us</m3> </menus> </

我想从XML文件中获取值。如何生成
m1
m2
m3
中的值数组?。你怎么能做到这一点

这是XML

<?xml version="1.0"?> 
<language> 
    <menus>
        <m1>HomePage</m1>
        <m2>Contact</m2>
        <m3>About Us</m3>
    </menus>
</language> 

你是说你当前的ASP代码不工作吗?从XML文件中获取值并在ASP中使用它们的一种方法如下所示

<%
Dim menuItems 'Array of menu items

Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
objHTTP.open "GET","http://yourxmlfeed.xml",false
objHTTP.send
XMLData = objHTTP.responseText

' this code takes the raw RSSFeed and loads it into an XML Object
Set xmlFeed = Server.CreateObject("MSXML2.DomDocument.4.0")
xmlFeed.async = false
xmlFeed.LoadXml(XMLData)
Set objHTTP = Nothing

Set objItems = xmlFeed.getElementsByTagName("menus")

Set xmlFeed = Nothing

' loop over all the items in the XML Feed
For x = 0 to objItems.length - 1
    Set objItem = objItems.item(x)
    For Each objChild in objItem.childNodes
        menuItems = menuItems & objChild.text & ","
    Next
Next

response.write DeleteLastComma(menuItems) 'menuItems is your array of menu items

Function DeleteLastComma
    ...function to remove last comma off array
End Function
%>

您是说您当前的ASP代码不起作用吗?从XML文件中获取值并在ASP中使用它们的一种方法如下所示

<%
Dim menuItems 'Array of menu items

Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
objHTTP.open "GET","http://yourxmlfeed.xml",false
objHTTP.send
XMLData = objHTTP.responseText

' this code takes the raw RSSFeed and loads it into an XML Object
Set xmlFeed = Server.CreateObject("MSXML2.DomDocument.4.0")
xmlFeed.async = false
xmlFeed.LoadXml(XMLData)
Set objHTTP = Nothing

Set objItems = xmlFeed.getElementsByTagName("menus")

Set xmlFeed = Nothing

' loop over all the items in the XML Feed
For x = 0 to objItems.length - 1
    Set objItem = objItems.item(x)
    For Each objChild in objItem.childNodes
        menuItems = menuItems & objChild.text & ","
    Next
Next

response.write DeleteLastComma(menuItems) 'menuItems is your array of menu items

Function DeleteLastComma
    ...function to remove last comma off array
End Function
%>

首先,我不得不指出,呈现的xml结构很差。如果
中的每个元素代表一个菜单,那么所有元素都应该具有相同的标记名,例如
。使用1、2和3后缀表示xml设计器对标识符和值之间的差异感到困惑。如果这些值很重要(即,不能依赖文档中的序号位置),则应将这些值作为属性包含:-

<menus>
    <menu position="1">HomePage</menu>  
    <menu position="2">Contact</menu>  
    <menu position="3">About Us</menu>  
</menus>  

首先,我不得不指出,所提供的xml结构很差。如果
中的每个元素代表一个菜单,那么所有元素都应该具有相同的标记名,例如
。使用1、2和3后缀表示xml设计器对标识符和值之间的差异感到困惑。如果这些值很重要(即,不能依赖文档中的序号位置),则应将这些值作为属性包含:-

<menus>
    <menu position="1">HomePage</menu>  
    <menu position="2">Contact</menu>  
    <menu position="3">About Us</menu>  
</menus>  

给定您的代码,
菜单
是否已经是一个数组?我不知道你在这里想做什么。给定你的代码,
菜单
将已经是一个数组了?我不明白你在这里想干什么。