---
title: "Hämta sporttabell!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/87434-hämta-sporttabell"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "mibbe"
published: "2003-10-01T20:47:33.000Z"
updated: "2003-10-01T22:06:30.000Z"
replies: 4
views: 415
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/87434-hämta-sporttabell"
---

# Hämta sporttabell!

## #1 — mibbe, 2003-10-01T20:47Z

Skulle vilja hämta sporttabellen (hela sidan) på <http://www.vibf.se/auto_gen/50.html> finns det någon enkelt script el. kommando för det? Liknande php-diton enligt nedan;

```
<?

echo "[";

$sida = "http://www.vibf.se/auto_gen/50.html";

include($sida); 

echo "]";

?>
```

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

## #2 — Jesper T, 2003-10-01T21:33Z

Det klart smidigaste är om du kan lägga in sidan i en iframe i din sida, annars så kan du testa detta:

```
<%
 Dim objXMLHTTP, xml
 Set objXML = Server.CreateObject("Microsoft.XMLHTTP")
 objXML.Open "GET", "http://www.vibf.se/auto_gen/50.html", False
 objXML.Send
 Response.Write objXML.responseText
 Set objXML = Nothing
%>
```

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

## #3 — mibbe, 2003-10-01T21:54Z

Den funkar så till vida att den hämtar och visar och jag kan lägga till en css-fil och det är precis som jag vill ha det. MEN.. å, ä och ö syns inte och så blir det lite andra förskjutningar. 

Titta på <http://www.ibklidkoping.com/p88/serien0304p88.asp> och originalet <http://www.vibf.se/auto_gen/50.html>

 :l

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

## #4 — Jesper T, 2003-10-01T21:57Z

Här kanske: <http://www.webforum.nu/showthread.php?s=&forumid=22&threadid=13932>

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

## #5 — mibbe, 2003-10-01T22:06Z

Jesper T: Tusen tack för hjälpen. Nedanstående kod hittade jag i tråden du gav mig. :):)

```

<%

function BinToText(varBinData, intDataSizeInBytes)
  const adFldLong = 128
  const adVarChar = 200
  set objRS = Server.CreateObject("ADODB.Recordset")
  
  objRS.Fields.Append "txt", adVarChar, intDataSizeInBytes, adFldLong
  objRS.Open
  
  objRS.AddNew
  objRS.Fields("txt").AppendChunk(varBinData)
  tmp = objRS("txt").Value
  objRS.Close
  BinToText = tmp
end function

Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET", "http://www.vibf.se/auto_gen/50.html", False

objHTTP.setRequestHeader "Content-type","text/html"

objHTTP.Send

strHTML = BinToText(objHTTP.responseBody,35000)

Set objHTTP = Nothing

response.write strHTML
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/87434-hämta-sporttabell