problemas al mostrar desde un buscador

[ken-obi]

wenas > a todos,

tengo un pequeño buscador de palabras clave en mi web,
el problema es el siguiente:

tengo una BD que contiene 3 tablas (noticias, actividades, articulos)
tengo un formulario que te da la opcion a buscar por noticias o actividades o articulos y bien, me los muestra correcto... PERO cuando muestro todos de golpe con UNION SELECT * me muestra LO QUE LE DA LA GANA y no se como arreglarlo.
Porcierto todos los campos de las tablas son identicas no el contenido pero si el nombre de los campos.

aqui os pego el codigo:

formulario.asp
<form method="GET" action="resultados.asp">
<input name="texto" type="text">
<select name="cate" id="cate">
<option value="1" selected>Cualquiera</option>
<option value="2">Noticias</option>
<option value="3">Actividades</option>
<option value="4">Articulos</option>
</select>

resultado.asp
Dim subi

cate = request.querystring("cate")

if cate="1" then
subi= "SELECT * FROM noticias UNION SELECT * FROM articulos UNION SELECT * FROM actividades"
elseif cate="2" then
subi="SELECT * FROM not"
elseif cate="3" then
subi="SELECT * FROM actividades"
elseif cate="4" then
subi="SELECT * FROM articulos"
end if
strsql = subi& "where UCase(tit) like '%" & UCase(Request("tit")) & "%' AND UCase(artic) like '%" & UCase(Request("artic")) & "%' AND UCase(tex) like '%" & UCase(Request("tex")) & "%' order by "& orden & " "&alf

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("noticias.mdb")

' creo el RecordSet y defino la cantidad de registros a mostrar
Set RS = Server.CreateObject("ADODB.Recordset")
RS.PageSize = mostrar
RS.CacheSize = mostrar

' Abro la tabla...
RS.Open strSQL, oConn,3,1

GRACIAS DE ANTEMANO