<% Option Explicit Dim sql,rsUsers,count,username,cellbgcolor username = Request.Cookies("pb_username") %> <% sql = "SELECT username FROM users ORDER BY username" Set rsUsers = Server.CreateObject("ADODB.Recordset") rsUsers.Open sql, conn, 3, 3 %> Tilbage til start | log ind | <%if username <> "" then Response.Write("log ud | ") end if%>Ny bruger | Hjælp | Sidste emne | Søg

---

Tempel Dating's Debat forum

Søgeform
Søgeord
af bruger	Alle <% do until rsUsers.EOF Response.Write("" & rsUsers("username") & "" & vbcrlf) rsUsers.Movenext loop %>

<% rsUsers.close set rsUsers = nothing conn.close set conn = nothing %>