Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: General / Classic ASP versions(v3.4.XX)
 My post gets wiped out if I post before I log on.
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

John A. Peters
Starting Member

10 Posts

Posted - 03 April 2006 :  23:02:34  Show Profile
I got this note from a user.

Hi John,

I keep forgetting to log-on before preparing a post, and my post gets wiped out when I go to post it. Someone was going to look into a fix w/ Snitz.

I'm incurable, so must ask if there is any help coming for flakes like me...
Paul

John A. Peters (415) 509-3599 San Francisco, CA

weeweeslap
Senior Member

USA
1077 Posts

Posted - 04 April 2006 :  02:42:13  Show Profile  Visit weeweeslap's Homepage  Send weeweeslap an AOL message  Send weeweeslap a Yahoo! Message
tell him to remember to login before posting or to copy everything he has typed before hitting submit.

coaster crazy
Go to Top of Page

leatherlips
Senior Member

USA
1838 Posts

Posted - 04 April 2006 :  09:31:42  Show Profile  Visit leatherlips's Homepage
You can force them to log in before they post. I have added this to my forum over the weekend thanks to another Snitz forum member. You can check out my forum to see how it works. Just try to add or reply to a topic and you'll see what it does. If you then logged in, it would take you back to the post screen and allow you to post. Here is what he did:

In post.asp:

Find:
%>
<!--#INCLUDE FILE="inc_sha256.asp"-->
<!--#INCLUDE FILE="inc_header.asp" -->
<!--#INCLUDE FILE="inc_subscription.asp"-->
<!--#INCLUDE FILE="inc_func_secure.asp" -->
<!--#INCLUDE FILE="inc_func_member.asp" -->
<!--#INCLUDE FILE="inc_func_posting.asp"-->
<%

Add this underneath:

'#### [Require Login to Post - NJP addon] ##############################################
if mLev = 0 then
Err_Msg = "<li>You must be logged in before you can post to the forums." & _
" <ul><li>If you are a registered member and already have a valid userID and password, please wait 10 seconds to be re-directed to the login page.</li>" & _
" <li>Otherwise click on the register link below to obtain your very own UserID and Password. Registration is Free.</li></ul></li>" & vbNewLine

Response.Write "<p align=""center"" style=""margin-top:20px; margin-bottom:15px;""><font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strHiLiteFontColor & """>There Is A Problem!</font></p>" & vbNewLine & _
"<table align=""center"" border=""0"">" & vbNewLine & _
" <tr>" & vbNewLine & _
" <td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHiLiteFontColor & """><ul>" & Err_Msg & "</ul></font></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
" <tr>" & vbNewLine & _
" <td align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>" & vbNewLine

scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
if Request.QueryString <> "" then
Response.Write " <br /><a href=""login.asp?target=" & lcase(scriptname(ubound(scriptname))) & "?" & Request.QueryString & """><acronym title=""Login Here or Wait to re-directed to the Login Page..."">Login Here</acronym></a> or Wait for Automatic Redirection to Login Page<br />" & vbNewLine & _
"<meta http-equiv=""Refresh"" content=""10; URL=login.asp?target=" & lcase(scriptname(ubound(scriptname))) & "?" & Request.QueryString & """>" & vbNewLine
else
Response.Write " <br /><a href=""login.asp?target=" & lcase(scriptname(ubound(scriptname))) & """><acronym title=""Login Here or Wait to re-directed to the Login Page..."">Login Here</acronym></a> or Wait for Automatic Redirection to Login Page<br />" & vbNewLine & _
"<meta http-equiv=""Refresh"" content=""10; URL=login.asp?target=" & lcase(scriptname(ubound(scriptname))) & """>" & vbNewLine
end if

Response.Write " <br /><a href=""policy.asp""" & dWStatus("Register to post to our forum...") & " tabindex=""-1""><acronym title=""Register to post to our forum..."">Register Here</acronym></a> if You Don't Have a UserID and Password<br />" & vbNewline & _
" <br /><a href=""JavaScript:history.go(-1)"">Cancel</a> and Return to Previous Page<br />" & vbNewline & _
" </td>" & vbNewLine & _
" </tr>" & vbNewLine & _
"</table><br /><br />" & vbNewLine

WriteFooter
Response.End
end if
'#### [/Require Login to Post - NJP addon] ##############################################

Then in login.asp follow these steps found here.

Edited by - leatherlips on 04 April 2006 10:09:21
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.36 seconds. Powered By: Snitz Forums 2000 Version 3.4.07