I guess you mean this one
If you want to stop people doing multi posts,
Open up post_info.asp and insert this function at the end, just before the closing
%>
function CanUserPost(fTopicID, fMemberID)
lastAllowedPost = DateToStr(DateAdd("n",-1,strForumTimeAdjust))
strSql = "SELECT MAX(R_DATE) AS LASTPOST FROM " & strTablePrefix & "REPLY WHERE "
strSql = strSql & "TOPIC_ID = " & fTopicID & " AND R_AUTHOR = " & fMemberID
rsTmp = my_conn.execute(strSQL)
if rsTmp("LASTPOST") > lastAllowedPost then
CanUserPost = "no"
else
CanUserPost = "yes"
end if
end function
Next look for this code
'## Forum_SQL
strSql = "INSERT INTO " & strTablePrefix & "REPLY "
imediately above the insert statement, put this line of code
if CanUserPost(Request.Form("TOPIC_ID"), rs("MEMBER_ID")) = "yes" then
now scroll down past the updates for the counts until you find
my_Conn.Execute (strSql)
if Err.description <> "" then
change it be
my_Conn.Execute (strSql)
else
Err.description = "You have already posted, please wait 60 secs before reposting"
end if
if Err.description <> "" then
That should do it
It had been archived
Topic Locked
Posted - 14 March 2001 : 18:36:22
