Burgie Baltimore Sailing Club
 

Updated -

<% Response.Buffer = True Dim objXMLHTTP, xml, sMyString Set xml = Server.CreateObject("Microsoft.XMLHTTP") xml.Open "GET", "http://www.met.ie/forecasts/sea-area.asp", False xml.Send sMyString = xml.responseText sMyString = Replace(sMyString, "", "
", "") sMyString = Replace(sMyString, "", "
") Response.Write sMyString Set xml = Nothing %>

 

") sMyString = Replace(sMyString, "