That's easy. Open the active.asp file. In the 'Select Case ActiveSince' code you can add the following: <pre id=code><font face=courier size=2 id=code>Select Case ActiveSince Case "LastVisit" lastDate = "" Case "LastHour" lastDate = DateToStr(DateAdd("h",-1,strForumTimeAdjust)) <font color=red>Case "Last2Hours" lastDate = DateToStr(DateAdd("h",-2,strForumTimeAdjust)) Case "Last6Hours" lastDate = DateToStr(DateAdd("h",-6,strForumTimeAdjust))</font id=red> Case "LastDay" lastDate = DateToStr(DateAdd("d",-1,strForumTimeAdjust)) Case "LastWeek" lastDate = DateToStr(DateAdd("ww",-1,strForumTimeAdjust)) Case "LastMonth" lastDate = DateToStr(DateAdd("m",-1,strForumTimeAdjust)) Case Else lastDate = "" End Select</font id=code></pre id=code> And in the Select drop down box code you can add the following: <pre id=code><font face=courier size=2 id=code><select name="ShowSinceDateTime" size="1" onchange="SetLastDate();"> <option value="LastVisit" <% if ActiveSince = "LastVisit" or ActiveSince = "" then Response.Write(" SELECTED")%>> Last Visit on <%= ChkDate(Session(strCookieURL & "last_here_date")) %> <% =ChkTime(Session(strCookieURL & "last_here_date")) %> </option> <option value="LastHour" <% if ActiveSince = "LastHour" then Response.Write(" SELECTED")%>> Last Hour</option> <font color=red><option value="Last2Hours" <% if ActiveSince = "Last2Hours" then Response.Write(" SELECTED")%>> Last 2 Hours</option> <option value="Last6Hours" <% if ActiveSince = "Last6Hours" then Response.Write(" SELECTED")%>> Last 6 Hours</option></font id=red> <option value="LastDay" <% if ActiveSince = "LastDay" then Response.Write(" SELECTED")%>> One Day ago</option> <option value="LastWeek" <% if ActiveSince = "LastWeek" then Response.Write(" SELECTED")%>> One Week ago</option> <option value="LastMonth" <% if ActiveSince = "LastMonth" then Response.Write(" SELECTED")%>> Last Month</option> </select></font id=code></pre id=code>
<center><font color=green>*----*----*----*----*----*----*----*----* <font size=2>"If you're headed in the wrong direction, God allows U-turns."</font id=size2> *----*----*----*----*----*----*----*----*</font id=green></center>
Here at the forum ? If so, that is strange, because I used to have active.asp bookmarked and now have active2.asp bookmarked.... (it is my default entrypoint to the site)
<b>Pierre Gorissen</b>
<font color=blue><font size=1>If I only had a little humility, I would be perfect.</font id=blue></font id=size1> <font size=1><font color=black>Ted Turner</font id=size1></font id=black>
Thoughtof another choice for the menu, how about last_post date.
reasoning, half way through logging on this morning, my modem crapped out, this reset my last logon to a couple of minutes ago. So I figured a last_post would be a good choice, since in my cause they are usually similar, and woulldn't get wiped if I get hung up.
<font color=blue>'Resistance is futile'</font id=blue>
I just noticed a small bug, if you click the mark topics as read icon, the screen refrshes, giving yo a blank screen, however the drop down box still says whatever it was set to before, it should really be set to last visit.
<font color=blue>'Resistance is futile'</font id=blue>
Add this line to the code: <pre id=code><font face=courier size=2 id=code> if Request.Form("AllRead") = "Y" then Session(strCookieURL & "last_here_date") = ReadLastHereDate(Request.Cookies(strCookieURL & "User")("Name")) Session(strCookieURL & "last_here_date") = ReadLastHereDate(Request.Cookies(strCookieURL & "User")("Name")) lastDate = Session(strCookieURL & "last_here_date") <b> ActiveSince = ""</b> end if </font id=code></pre id=code>
I changed it here at the site and in the download-file
<b>Pierre Gorissen</b>
<font color=blue><font size=1>If I only had a little humility, I would be perfect.</font id=blue></font id=size1> <font size=1><font color=black>Ted Turner</font id=size1></font id=black>
Agreed, however this mod could be usefull in another way... If it were to be used as a default forum in such a manner that the admin could post required reading: about the use of the forum ie: All users posting new code please comment your code, this would be usefull for many of your members who are using translated versions, and overwriting their files cause a great deal additional work.
As you can see the possibilities are tremendous!
Sorry about that, a little lost here i was referring to the slash mod, guess i had a few windows open and posted here. The mod slash 2 does what i was referring to.
<BLOCKQUOTE id=quote><font size=1 face="Verdana, Arial, Helvetica" id=quote>quote:<hr height=1 noshade id=quote> Agreed, however this mod could be usefull in another way... If it were to be used as a default forum in such a manner that the admin could post required reading: about the use of the forum ie: All users posting new code please comment your code, this would be usefull for many of your members who are using translated versions, and overwriting their files cause a great deal additional work.
As you can see the possibilities are tremendous! <hr height=1 noshade id=quote></BLOCKQUOTE id=quote></font id=quote><font face="Verdana, Arial, Helvetica" size=2 id=quote>
André I don't think I really understand what you mean with this in regard to the tweak for Active.asp... <img src=icon_smile_question.gif border=0 align=middle>
<b>Pierre Gorissen</b>
<font color=blue><font size=1>If I only had a little humility, I would be perfect.</font id=blue></font id=size1> <font size=1><font color=black>Ted Turner</font id=size1></font id=black>
Topic Locked
Posted - 03 December 2000 : 23:12:27
