Hur gör man så att det blir länkar till expressen och få med klockslaget i detta scriptet?
Jag vet att jag har sett ett sådant script här men kan inte hitta det.
Set XMLDoc = CreateObject("MSXML2.DOMDocument")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "http://expressen.se/expressen/jsp/xml.jsp?page=10"
If XMLDoc.parseError.errorCode = 0 Then
%>
<b>Rubriker:</b><p>
<%
Set nodeLst = XMLDoc.getElementsByTagName("headline")
For i = 0 To nodeLst.length - 1
response.write nodeLst.Item(i).text & "<br>"
next
else
Response.write XMLDoc.parseError.reason
End If
Märkte att DN's nyheter var mer lätt hämtat.
Har lyckat hämta ut nyheterna men nu så tar koden med dom två första <title> taggarna. Kan man på något enkelt sätt bara ta o hoppa över dom när man loopar ut dom och bara hämta 5 nyheter?
Set XMLDoc = CreateObject("MSXML2.DOMDocument")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "http://www.dn.se/DNet/jsp/polopoly.jsp?d=1399"
If XMLDoc.parseError.errorCode = 0 Then
%>
<b>Rubriker:</b><p>
<%
Set nodeLst = XMLDoc.getElementsByTagName("title")
Set nodeLst2 = XMLDoc.getElementsByTagName("link")
For i = 0 To nodeLst.length - 1
response.write nodeLst.Item(i).text & "<br>"
response.write nodeLst2.Item(i).text & "<br><br>"
next
else
Response.write XMLDoc.parseError.reason
End If
%>
Löste problemet med att slippa loopa ut dom två första.
For i = 0 To nodeLst.length - 1
If nodeLst.Item(i).text<>"Dagens Nyheter" Then
response.write "<a href='"& nodeLst2.Item(i).text & "'>"& nodeLst.Item(i).text & "</a><br>"
End If
next
Men hur gör jag för att t.ex. bara loopa dom 10 första istället för alla?
Detta borde vara årets tråd, nio inlägg, du har skrivit åtta själv!
Du har dessutom kommit fram till lösningen också!
För denna tråd borde du vinna någon form av wF-pris! :i
Jag nominerar dig till årets medlem i klassen "Själv är bäste dräng" alternativt "Man ska alltid prova sina idéer".
Eller kanske helt enkelt "Årets Tråd"?!
Hahahaha ja det tog sin lilla tid innan poletten ramlade ner.
Så jag vill bara tacka alla som inte hjälpte mig så jag kunde klura ut vad koden gjorde och fixa det själv. :)
