codice:
alfabeto = array("A","B","C", ...)

for each lettera in alfabeto
response.write "" & lettera & " "
next

lettera = request.queryString("lettera")

if len(lettera) > 0 then
set conn = ...
conn.open ...
sql = "SELECT * FROM tabella WHERE campo LIKE '" & lettera & "%'"
set rs = conn.execute(sql)

etc etc etc

end if