<% 'Copyright 10-4 ApS, this file may only be used if you own a license and have agreed to the license conditions, see http://www.aspfastforum.com/aspfastforum/ for details %> <% dim intThreadID 'Mark entire discussion thread as read. intThreadID = Request.QueryString("t") if not isnumeric(intThreadID) then call RaiseError("Illegal thread id") if not intThreadID>0 then call RaiseError("Illegal thread id") call MarkThreadRead(GetDBCon(), intCurrentUserID, CLng(intThreadID)) if Len(cCHARSET)>0 then Response.CharSet = cCHARSET %> <%= STR_MARK_DISCUSSION_THREAD_AS_READ %>
<%= STR_MARK_DISCUSSION_THREAD_AS_READ %>
<%= STR_MARKED_DISCUSSION_THREAD_READ %>
<%= STR_OK_BUTTON %>
<% call ConnectionClose() %>