<%
baslik="Enstrümanlar"
%>
<%
harfarray = Array("A","B","C","Ç","D","E","F","G","H","I","İ","J","K","L","M","N","O","Ö","P","Q","R","S","Ş","T","U","Ü","V","W","X","Y","Z")
for i = 0 to uBound(harfarray)
%>
<%=harfarray(i)%>
<%
next
for i = 0 to uBound(harfarray)
%>
<%=harfarray(i)%>
<%
ssql = "select DISTINCT ADI FROM ENSTRUMANLAR WHERE ADI LIKE '" & harfarray(i) & "%' order by ADI ASC"
set rs = dbconnection.execute(ssql)
while not rs.eof
ssql2 = "select * FROM ENSTRUMANLAR WHERE ADI ='" & rs("ADI") & "'"
set rs2 = dbconnection.execute(ssql2)
%>
"> <%=RS2("ADI")%>
<%
rs.movenext
wend
next
%>