---
title: "Hämta innehåll i en div med XMLHTTP"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/150515-hämta-innehåll-i-en-div-med-xmlhttp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "paddan"
published: "2006-08-24T21:06:02.000Z"
updated: "2006-08-25T23:45:09.000Z"
replies: 4
views: 737
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/150515-hämta-innehåll-i-en-div-med-xmlhttp"
---

# Hämta innehåll i en div med XMLHTTP

## #1 — paddan, 2006-08-24T21:06Z

HEj!
Följande kod hämtar just nu allt från en sida, jag undrar lite hur man får den att bara hämta just innehållet i en \<div med class=tableContainer\>.
Har föröskt lite men får inte dte att fungera.
Några ideer?

```
<%

objGetPage.Send
strHTML=objGetPage.responseText

set re = new regexp
re.global  = true
re.pattern = "<div class=tableContainer[^>]*>(?:.*?)</div>"

set m = re.execute(strHTML)
set re = nothing

Set objGetPage = Nothing

Set objFSO= CreateObject("Scripting.FileSystemObject")
Set objTxt = objFSO.CreateTextFile(Server.MapPath("XMLHTTP ") & "elitserien.txt") 

objTxt.WriteLine strHTML

objTxt.Close
Set objTxt = Nothing
Set objFSO = Nothing
%>
```

 

Mvh paddan

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

## #2 — paddan, 2006-08-25T14:37Z

ingen som har några tips?

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

## #3 — emission, 2006-08-25T18:24Z

Då måste göra något med strHTML, och dessutom plocka ut värdet.

```
<%

objGetPage.Send
strHTML=objGetPage.responseText

set re = new regexp
re.global  = true
re.pattern = "<div class=tableContainer[^>]*>(.*?)</div>"

set m = re.execute(strHTML)
set re = nothing

Set objGetPage = Nothing

if m.count>0 then
   strHTML=m(0).submatches(0)
   Set objFSO= CreateObject("Scripting.FileSystemObject")
   Set objTxt = objFSO.CreateTextFile(Server.MapPath("XMLHTTP ") & "elitserien.txt") 

   objTxt.WriteLine strHTML

   objTxt.Close
   Set objTxt = Nothing
   Set objFSO = Nothing
End If
%>
```

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

## #4 — paddan, 2006-08-25T19:53Z

Följande kod ger ingen textfil, det verkar som om att dne inte går in i if satsen.

```
objGetPage.Send
strHTML=objGetPage.responseText

set re = new regexp
re.global  = true
re.pattern = "<div class=tableContainer[^>]*>(.*?)</div>"

set m = re.execute(strHTML)
set re = nothing

Set objGetPage = Nothing

if m.count>0 then
   strHTML=m(0).submatches(0)
   Set objFSO= CreateObject("Scripting.FileSystemObject")
   Set objTxt = objFSO.CreateTextFile(Server.MapPath("XMLHTTP ") & "elitserien.txt") 

   objTxt.WriteLine strHTML

   objTxt.Close
   Set objTxt = Nothing
   Set objFSO = Nothing
End If
```

 

tar jag bort "if m.count\>0 then" så får jag:
Invalid procedure call or argument
på rad 18 som är:   strHTML=m(0).submatches(0)

/paddan

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

## #5 — emission, 2006-08-25T23:45Z

If-satsen ska vara kvar, men se till att regexp-pattern blir rätt.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/150515-hämta-innehåll-i-en-div-med-xmlhttp