---
title: "XML - getElementsByTagName"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/139047-xml-getelementsbytagname"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Snakes"
published: "2005-12-09T10:57:48.000Z"
updated: "2005-12-09T11:19:48.000Z"
replies: 5
views: 345
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/139047-xml-getelementsbytagname"
---

# XML - getElementsByTagName

## #1 — Snakes, 2005-12-09T10:57Z

Denna Funktion ska ta olika Element värden från olika Xml filer!
Det som händer är att vid raden som är markerad med \>\>\> Så blir det fel ifall Elementet inte hittats! Jag har försökt med {If Not TypeName(objLst.item(NodeId).text) = "Nothing"} men det hjälpte inte, då blev det fel i TypeName funktionen!...

Vad är det jag vill? Jo ifall det inte objLst.item(NodeId).text finns så vill jag att den fortsätter iaf!

```
    Function GetXMLNode(GetNode,NodeStr,NodeId,WorkingString)
      If NOT Request("debug") = "" Then
        Response.Write GetNode & " - " & NodeStr & " - " & NodeId & VbCrLf & VbCrLf & VbCrLf & VbCrLf
        Response.Flush
      End If

      Set objXML = CreateObject("Microsoft.XMLDOM")
      objXML.async = False
      objXML.LoadXML WorkingString
      If Not Instr(WorkingString,GetNode) < 1 Then 
        If NodeStr = "" Then
          Set objLst = objXML.getElementsByTagName(GetNode)
>>>     GetXMLNode = objLst.item(NodeId).text
        ElseIf Not NodeStr = "" Then
          Set objLst = objXML.selectSingleNode("//" & GetNode)
          Set objAtb = objLst.Attributes.getNamedItem(NodeStr)
          GetXMLNode = objAtb.value
        End If
      Else
        GetXMLNode = "Saknas"
      End If
      Set objXML = Nothing
      Set objLst = Nothing
      If GetXMLNode = "" Then
        GetXMLNode = "Saknas ej, men ej ifylld"
      End If
    End Function
```

Fel:

```
Microsoft VBScript runtime error '800a01a8' 

Object required: 'objLst.item(...)' 

/functions/productviewinpriceandstock.asp, line 81
```

Line 81 är vid markerad rad ovanför!

Permalänk: https://www.webforum.nu/p/139047

## #2 — @nders, 2005-12-09T11:07Z

```
if not objLst Is Nothing then

....

end if
```

Permalänk: https://www.webforum.nu/p/1726777

## #3 — Snakes, 2005-12-09T11:15Z

Tack för snabbt svar. Men det funkar inte får samma fel!

Permalänk: https://www.webforum.nu/p/1726778

## #4 — @nders, 2005-12-09T11:18Z

My bad. Det är ju självklart *objLst.item(NodeId)* du ska kolla.

Permalänk: https://www.webforum.nu/p/1726780

## #5 — Snakes, 2005-12-09T11:18Z

Detta funkade däremot! Tack så mycket!

```
If Not objLst.item(NodeId) Is Nothing Then
  ...
Else
  ...
End If
```

Permalänk: https://www.webforum.nu/p/1726781

## #6 — @nders, 2005-12-09T11:19Z

Wahr zåå godh! :bire

Permalänk: https://www.webforum.nu/p/1726782

---

Tråden på webben: https://www.webforum.nu/amne/asp/139047-xml-getelementsbytagname