CinesUnidos.com

No te quedes sin entradas, reserva o compra ya por el 0-500-PELICULA, (0212) 6207777 o *CINES desde tu teléfono móvil.

Bienvenido, selecciona una ciudad:
<% Set CityXml = Server.CreateObject("MSXML2.DOMDocument") CityXml.Load(Application("CityXmlFile")) function ForHTML(Str) Str=Replace(Str,"ñ","ñ") Str=Replace(Str,"á","á") Str=Replace(Str,"é","é") Str=Replace(Str,"í","í") Str=Replace(Str,"ó","ó") Str=Replace(Str,"ú","ú") Str=Replace(Str,"¡","¡") ForHTML=Str end function %>

<%for each CityNode in CityXml.SelectNodes("//City") cityid=CityNode.GetAttribute("Id") Set VenueFullXml = Server.CreateObject("MSXML2.DOMDocument") VenueFullXml.Load(Application("VenueFullXmlFile")) totalVenues=VenueFullXml.selectNodes("//VenueList/Venue[@CityId="&cityid&"]").length if totalVenues=1 then venueid=VenueFullXml.selectSingleNode("//VenueList/Venue[@CityId="&cityid&"]").GetAttribute("Id")%> <%=CityNode.text%> <%else%> "><%=CityNode.text%> <%end if%>
<%next%>