Undrar hur jag kan hämta en tabell från en annan hemsida ....... Och visa på min sida...... Tacksam för ett kod ex. i ASP.......
Här är tabellen jag vill hämta http://www.innebandy.se/Table.asp?TournamentId=17692
Tackar !!
8 svar · 349 visningar · startad av Dingtuna
Undrar hur jag kan hämta en tabell från en annan hemsida ....... Och visa på min sida...... Tacksam för ett kod ex. i ASP.......
Här är tabellen jag vill hämta http://www.innebandy.se/Table.asp?TournamentId=17692
Tackar !!
Nån som kan förklara vad som händer var ?? Så jag vet vad jag ska ändra ?? :l
Schysst Forum det här !!! :birp
<%
Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
'### Adreseen till sidan.
objHTTP.Open "GET", "http://www.privataaffarer.se/default_frame.asp", False
objHTTP.Send
strHTML=objHTTP.responseText
Set objHTTP = Nothing
Set objRegExp = New regexp
objRegExp.Global = false
objRegExp.IgnoreCase = true
'### Ditt pattern, mönster. den som finns här kommer nu plocka ut allt mellan:
' <font size=5 face=""Arial,Helvetica""><b>
' samt
' </b></font>
'Du får hitta ditt eget mönster.
objRegExp.Pattern = "<font size=5 face=""Arial,Helvetica""><b>.*</b></font>"
Set hittade = objRegExp.Execute(strHTML)
'### Om det mönster du använde inte ska vara med i din utskrift sen så plockas det bort här.
' se till att ändra mönstret här med.
' behöver du inte ta bort något kan du skippa hela denna funktionen.
Function red(strText)
strText = Replace(strText, "<font size=5 face=""Arial,Helvetica""><b> ", " ")
strText = Replace(strText, "</b></font>", " ")
red = strText
End Function
'### Här skrivs alla träffar ut. (Lär väl bara bli en i ditt fall.) Fimpa red() om du inte behöver den.
For each item in hittade
With response
.write("Stockholmsbörsen: ")
.write red(item.value)
End with
Next
%>
Btw. Välkommen till wF!
:e Tackar så Mycket ........ :e
Hej Dingtuna och välkommen till wF. Det är med nostalgiska känslor jag ser din signatur. På utfarten av Dingtuna, höger sida på väg mot Långängarna står en stor gran. Den planterades av min Farmor när jag föddes. Nästa gång jag är uppe i trakterna skall jag kolla läget.
Alltså ........ Jag får inte det riktigt att fungera ? :OO
Jag vill visa hela resultat tabellen på min sida ......
Vad ska jag skriva i min "pattern" ??
Får inte till det riktigt eftersom det finns flera <Td> på sidan...
x( :l
Då får du väll ta med lite mer till höger och till vänster omtabellen då. du kan ha mer än bara <td>