"
end if
%>
<%=rsp1("nombre")%>
<%
dim sqlT
if Request.QueryString("letra") ="" then
sqlT="select id,nombre,direccion, poblacion from tiendas where provincia=" & rsp1("id") & " order by nombre"
else
sqlT="select id,nombre,direccion, poblacion from tiendas where nombre like '" & Request.QueryString("letra") & "%' order by nombre"
end if
'Response.Write sqlT
dim rsT
set rsT=cn.Execute(sqlT)
%>
|
<%
if i=2 then
Response.Write "
"
end if
rsp1.movenext
wend
else
if Request.QueryString("letra") ="" then
sqlT="select id,nombre,direccion, poblacion from tiendas where provincia=" & rsp1("id") & " order by nombre"
else
sqlT="select id,nombre,direccion, poblacion from tiendas where nombre like '" & Request.QueryString("letra") & "%' order by nombre"
end if
'Response.Write sqlT
set rsT=cn.Execute(sqlT)
%>