<% Set rs = Server.CreateObject("ADODB.RecordSet") varletra=request ("letra") q = "SELECT * FROM glosario WHERE palabra LIKE '"&varletra&"%' ORDER By palabra" rs.Open q, "DSN=baselocales;" %>

Secciones
· Hoteles
· Restaurantes
· Otros
· Eventos
· Distancias
· Cultura
· Costumbres
· Lugares
· Glosario

Resultado de su búsqueda alfabética

<%hayreg=1 %> <%while (NOT rs.EOF)%>

<%=rs("palabra")%>

<%=rs("define")%>

<%hayreg=0%> <%rs.MoveNext wend%>