RSS-sjov

Jeg har rodet lidt med en simpel RSS-parser i ASP til at hive links fra del.icio.us ind her på siden. Resultatet kan indtil videre ses på HTPC-siden, og koden kommer her:

<%

set xml = createObject("Msxml.DOMDocument")
xml.async = false
xml.setProperty "ServerHTTPRequest", true
xml.load("http://del.icio.us/rss/jonasbc/htpc")

set itemNodes = xml.selectNodes("//item/*")
 
dim title

For each item in itemNodes
   if item.tagName = "title" then
      response.write "<br>"
      title = item.text
   elseif item.tagName = "link" then
      response.write "<a href='" & 
      item.text & "'>" & title & "</a><br>"
   elseif item.tagName = "description" then
      response.write item.text & "<br>"
   end if
next

set itemNodes = nothing

%>

Kommentarer

Send en kommentar

Populære opslag fra denne blog

Valgfristelser

Er det bare mig, eller er Foghs blog bemærkelsesværdig tom denne tid? Man må beundre manden for at kunne modstå fristelsen for at starte et indlæg på en måde, som de færreste har mulighed for. "Jeg har netop udskrevet folketingsvalg..."
Læs mere
Jeg var på jagt i morges! Ikke sådan ude i en skov eller noget men herhjemme på udkig efter én eller anden dims, der sagde et højt "bip" ca. hvert andet minut. Lyden begyndte kl. lidt over 8, og efter en times tid var jeg ved at være helt skør i hovedet over ikke at kunne finde ud af, hvor lyden kom fra. Derfor begynde jeg at rode rundt i huset og fik indskrænket mit jagt-område til vores garderobe/stryge/male/opbevarings-rum. Det var i sig selv skidt, da vi derinde har en masse kasser stående med julepynt, vinterjakker, ringbind osv., der ikke rigtig hører til nogen steder. Ved at flytte alle kasserne rundt omkring i rummet fik jeg indkredset den kasse, hvor dimsen befandt sig, og begyndte at rode den igennem. Det viste sig at være en røgalarm, der af én eller anden grund var endt i en kasse med lamper(!?). Således fik jeg en særdeles irriterende start på en eller rolig og fredelig lørdag.
Læs mere

Mandags-programmering

Hvis du nogensinde står overfor at skulle lave add-in'er med en menubar til Microsoft Office -programmer som Word , har jeg er lille tip: Husk at sætte tag -property'en på alle knap-objekter i din menubar: Dim newButton As Microsoft.Office.Core.CommandBarButton newButton = CType(commandBarControls.Add( _ Microsoft.Office.Core.MsoControlType.msoControlButton), _ Microsoft.Office.Core.CommandBarButton) newButton.Caption = "Min knap" newButton.Tag = "Grr..." 'underlig løsning Ellers fungerer menubaren ikke, når der er flere dokumenter åbne på samme tid! Jeg har efterhånden rodet med dette i nogle dage, og hverken eksempler på MSDN eller den sparsomme dokumentation nævner noget som helst om dette. Heldigvis fandt jeg (som sædvanlig) svaret på Google Groups . Det er nogle gange som om de bevidst gør det utroligt svært at lade nogle meget simple funktioner... Og så ender man med at rode med det på en mandag. Puha!
Læs mere