Ordbok
Här hittar du Ord som Ordarna vill förklara.
<%
sql = "SELECT LEFT(ordbok_ord, 1) AS bokstav FROM ordbok GROUP BY LEFT(ordbok_ord, 1) ORDER BY bokstav"
rs.open sql, conn, 1, 3
%>
Ord som börjar på:
<% do while not rs.eof %>"><%=rs("bokstav") %>
<% rs.movenext
if not rs.eof then%>
|
<% end if
loop
rs.close %>
<%
bokstav = request("bokstav")
if bokstav <> emtpy then
sql = "select ordbok.*, users.namn, users.slug from ordbok left join users on users.id = ordbok.ordbok_user_id where ordbok_ord LIKE '" & bokstav & "%' order by ordbok.ordbok_ord"
rs.open sql, conn, 1, 3
do while not rs.eof %>
<%=rs("ordbok_ord") %>
<%=replace(rs("ordbok_besk"), chr(10), "
") %>
<% rs.movenext
loop
rs.close
else
%>
Välj en bokstav ovan.
<%
end if
%>
<% if session("filuserid") <> empty then 'inloggad ordare
%>
Lägg till/redigera Ord i Ordboken
Ord du har inlagda:
<%
sql = "select * from ordbok where ordbok_user_id = " & session("filuserid") & " order by ordbok_ord"
rs.open sql, conn, 1, 3
do while not rs.eof
%>
<%=rs("ordbok_ord") %> [
" class=link_on_white>redigera |
" class=link_on_white>ta bort]
<%
rs.movenext
loop
antal_ordbok = rs.recordcount
rs.close
%>
(Du kan bara ha tio Ord inlagda i ordboken)
<% end if %>
<% conn.close %>