% team = "Edmonton Oilers" teamrss = "http://sports.yahoo.com/nhl/teams/edm/rss.xml" Sub getXML(sourceFile) dim styleFile dim source, style styleFile = Server.MapPath("news.xsl") set source = Server.CreateObject("Msxml2.DomDocument") source.async = false source.setProperty "ServerHTTPRequest", true source.load CStr(sourceFile) set style = Server.CreateObject("Msxml2.DomDocument") style.async = false style.load styleFile source.transformNodeToObject style, Response set source = nothing set style = nothing End Sub %>

<% = team%> News and Events. <% getXML(teamrss) %> |
Sports News and recent events:
WagerLineSports.com 2006-2008 All Rights Reserved.
| HOME |
Sports News |
| TOP STORIES |
| MLB NEWS |
| NBA NEWS |
| NFL NEWS |
| NHL NEWS |
Sportsbook Odds |
| ALL Sportsbooks |
| Bet Chris Odds |