<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.setProperty "ServerHTTPRequest", True
objXML.Load("https://216.150.76.26/media_coverage.xml")
'objXML.Load (Server.MapPath("media_coverage.xml"))
If objXML.parseError.errorCode = 0 Then
'Response.Write "Error Parsing XML"
'Response.Write "Rason :" & objXML.parseError.reason & "Error Line: " & objXML.parseError.line
End If
'Get ALL the Elements by the tag name item
Set items = objXML.getElementsByTagName("item")
%>
Gulf Energy Maritime - Media
