---
title: "Få med texten XMLDoc?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/113089-få-med-texten-xmldoc"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bosse168"
published: "2004-10-07T12:33:47.000Z"
updated: "2004-10-07T12:54:50.000Z"
replies: 1
views: 221
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/113089-få-med-texten-xmldoc"
---

# Få med texten XMLDoc?

## #1 — Bosse168, 2004-10-07T12:33Z

Jag skulle vilja ha med texten som tillhör rubriken, någon som vet hur detta ska gå till? ;)

```
Const TOP = 20

Set XMLDoc = CreateObject("MSXML2.DOMDocument.4.0")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "http://expressen.se/expressen/jsp/xml.jsp?page=10"
If XMLDoc.parseError.errorCode = 0 Then

	Set articles =	XMLDoc.selectNodes("page/article[position() <= " & TOP & "]")
	For Each articleNode in articles

		response.write "[" & FormatDateTime(articleNode.getAttribute("updated"), 4) & "] <a href=nyheter_klick.asp?id=4&url=http://www.expressen.se/index.jsp?a=" & articleNode.getAttribute("id") & " target=""_blank"">" & articleNode.selectSingleNode("headline").text & "</a><br>" & vbCrLf

	Next

Else
	Response.Write "Error: " & XMLDoc.parseError.reason
End If
```

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

## #2 — jawbreaker, 2004-10-07T12:54Z

```
articleNode.selectSingleNode("ingress").text
```

eller

```
articleNode.selectSingleNode("prelead").text
```

kanske kan vara något att klämma in på lämpligt ställe?

Typ

```
Const TOP = 20

Set XMLDoc = CreateObject("MSXML2.DOMDocument.4.0")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "http://expressen.se/expressen/jsp/xml.jsp?page=10"
If XMLDoc.parseError.errorCode = 0 Then

	Set articles =	XMLDoc.selectNodes("page/article[position() <= " & TOP & "]")
	For Each articleNode in articles

		response.write "[" & FormatDateTime(articleNode.getAttribute("updated"), 4) & "] <a href=nyheter_klick.asp?id=4&url=http://www.expressen.se/index.jsp?a=" & articleNode.getAttribute("id") & " target=""_blank"">" & articleNode.selectSingleNode("headline").text & "</a><br>" & articleNode.selectSingleNode("ingress").text & "<br><br>" & vbCrLf

	Next

Else
	Response.Write "Error: " & XMLDoc.parseError.reason
End If
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/113089-få-med-texten-xmldoc