quote:

---

Originally posted by Mrx

Any way to allow the "quick reply" at the bottom of a forum page to be used with an anonymous user?

---

quote:

---

Originally posted by Mrx

Any way to have guests to not show active forums(ones that have new posts etc). Only seems like a minor fault but I'd rather not have guest users able to know which posts have been viewed by other guests.

---

if strPrivateForums = "1" and mLev < 4 then
	strSql = strSql & " AND F.FORUM_ID IN (" & allAllowedForums & ") "
end if

if strPrivateForums = "1" and mLev < 4 then
	strSql = strSql & " AND F.FORUM_ID IN (" & allAllowedForums & ") "
end if
if mLev < 4 then
	strSql = strSql & "AND M.M_NAME <> '" & strAnonyName & "' " & _
		"AND MEMBERS_1.M_NAME <> '" & strAnonyName & "' "
end if
strSql = strSql & "AND F.F_TYPE = 0 " & _

quote:

---

and... i'm also not sure is it appropriate to do such modification.

---

if lastDate = "" then
	MyActivePeriod = "30"
	lastDate = DateToStr(DateAdd("d",-30,StrToDate(beginDate)))
end if

if lastDate = "" then
	dim LastMyTopicDays
	sql = "SELECT T_DATE FROM " & strTablePrefix & "TOPICS "
	sql = sql & "WHERE T_AUTHOR = " & MemID & " ORDER BY T_DATE DESC"
	set rsLastTopic = my_Conn.Execute(TopSQL(sql,1))

	if Not rsLastTopic.EOF then LastMyTopicDays = DateDiff("d",StrToDate(rsLastTopic("T_DATE")),Now())
	rsLastTopic.close
	set rsLastTopic = nothing
	if LastMyTopicDays > 30 then
		MyActivePeriod = LastMyTopicDays
		lastDate = DateToStr(DateAdd("d",-(LastMyTopicDays),StrToDate(beginDate)))
	else
		MyActivePeriod = "30"
		lastDate = DateToStr(DateAdd("d",-30,StrToDate(beginDate)))
	end if
end if

quote:

---

Originally posted by Mrx
Hmmmmm. I dont actually see the point in having 'guest' or logged off members to have active/inactive topics. From what I gather, if I viewed a post and wasnt logged on, anyone else who viewed that post later, who was not logged on would not see that post as 'new' or 'active'. Is this correct?

---