ASP - union select en ASP

Las siguientes instrucciones funcionan bien pero no me hace la union de la segunda tabla, hay algun error?
Me muestran los datos de la primera tabla.
Si me pueden ayudar, gracias

<%
Dim conexion, registros, basedatos
basedatos = Server.MapPath("base.mdb")
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & basedatos & ";"
Set registros = conexion.Execute("SELECT PARR.NOMC as basilicas, PARR.DIRT as direccion, PARR.CPT as codpostal, PARR.LOCT as localidad FROM PARR WHERE PARR.CALI = 'BA' UNION ALL SELECT IGLESIAS.IGLESIA as basilicas, IGLESIAS.DIRECCION as direccion, IGLESIAS.CODPOST as codpostal, IGLESIAS.LOCALIDAD as localidad FROM IGLESIAS WHERE IGLESIAS.DENOMINA='Bas¡lica' ORDER BY basilicas")
Do While Not registros.EOF
%>
<TR>
<TD BGCOLOR="#FFFFCC"><B><%= registros.Fields("basilicas").Value %></B></TD>
<TD BGCOLOR="#FFFFCC"><B><%= registros.Fields("direccion").Value %></B></TD>
<TD BGCOLOR="#FFFFCC"><B><%= registros.Fields("codpostal").Value %></B></TD>
<TD BGCOLOR="#FFFFCC"><B><%= registros.Fields("localidad").Value %></B></TD>
</TR>

Ya intentaste correr esta misma sentencia en Access directamente, no desde ASP ni VB, ni nada, solo en Access.

Si funciona en Access, quiere decir que ASP tiene problemas para interpretar tu script, pero si falla, puedes depurarlo.