Artiklar:

<%sql = "SELECT * FROM Artiklar WHERE aktiv" set rs = BnetConnection.Execute(sql)%>
<%if Selected then%>
<%=rs_selected("Topic")%>
<% dim strText strText = rs_selected("text") strText = replace(strText,VbCrLf,"
") %> <% =strText%>

<%end if%>