<% Set doc = Server.CreateObject("Microsoft.XMLDOM") doc.Async = False doc.Load(Server.MapPath("fisk.xml")) Set rates = doc.SelectNodes("//Fragtrater/*/*") Response.Write "

" For Each r In rates Response.Write "
• " & r.nodeName & "
" Response.Write "
" Set attrs = r.attributes For Each a in attrs Response.Write "
• " & a.name & "=" & a.value & "
" Next Response.Write "
" Next Response.Write "

" Set doc = Nothing %>