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 forum has gone kooky - and I can't login!		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Southern Girl
New Member

78 Posts
Posted - 08 February 2009 :  16:50:12  Show Profile
www.showring.co.nz/forum

Any thoughts?
I haven't accessed the server for a week so I haven' inadvertantly deleted something I shouldn't....
Though I think my host was going to change servers at some stage....<
Edited by - Southern Girl on 08 February 2009 16:52:00

bobby131313
Senior Member

USA
1163 Posts
Posted - 08 February 2009 :  17:02:13  Show Profile  Visit bobby131313's Homepage
Fixed.

It appears you lost your server variables at some point. Maybe from the move you speak of. I just ran setup.asp and it fixed it.

Check and make sure there's no spam posted under member #2.<
Switch the order of your title tags
Edited by - bobby131313 on 08 February 2009 17:04:47
Go to Top of Page

Southern Girl
New Member

78 Posts
Posted - 08 February 2009 :  20:48:33  Show Profile
Thanks - I'm not sure how those people managed to join but maybe it has to do with the move.

I do have a member that I can't delete though (apparently their real name is Hackman)
Microsoft VBScript runtime error '800a000d'
Type mismatch: '[string: "Le"]'

/forum/inc_func_common.asp, line 614

Any thoughts on how to delete?
<
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts
Posted - 08 February 2009 :  21:24:15  Show Profile  Visit AnonJr's Homepage
That was an attempt at hacking. The solution is a part of: http://forum.snitz.com/forum/topic.asp?TOPIC_ID=66113<
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 08 February 2009 :  22:44:33  Show Profile
Southern, I wrote a user-deletion program which should fix the "Hackman" issue. Save it in your forum directory as "admin_delete.asp" and then click link removed by admin now issue resolved. Simply type in the name of the user to delete and hit submit.


<%
'###############################################################################
'## Snitz Forums 2000 v3.4.06
'###############################################################################
'## Copyright © 2000-06 Michael Anderson, Pierre Gorissen,
'## 	Huw Reddick and Richard Kinser
'##
'## This program is free software; you can redistribute it and/or
'## modify it under the terms of the GNU General Public License
'## as published by the Free Software Foundation; either version 2
'## of the License, or (at your option) any later version.
'##
'## All copyright notices regarding Snitz Forums 2000 must 
'##	remain intact in the scripts and in the HTML output.
'## The "powered by" text/logo with a link back to
'## http://forum.snitz.com in the footer of the pages MUST
'## remain visible when the pages are viewed on the internet or intranet.
'##
'## This program is distributed in the hope that it will be useful,
'## but WITHOUT ANY WARRANTY; without even the implied warranty of
'## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
'## GNU General Public License for more details.
'##
'## You should have received a copy of the GNU General Public License
'## along with this program; if not, write to:
'##
'##		Free Software Foundation, Inc.
'##		59 Temple Place, Suite 330
'##		Boston, MA 02111-1307
'##
'## Support can be obtained from our support forums at:
'## 	http://forum.snitz.com
'##
'## Correspondence and marketing questions can be sent to:
'## 	manderson@snitz.com
'##
'###############################################################################
%>
<!--#INCLUDE file="config.asp"-->
<!--#INCLUDE file="inc_sha256.asp"-->
<!--#INCLUDE file="inc_header.asp" -->
<!--#INCLUDE file="inc_func_common.asp" -->
<!--#INCLUDE file="inc_func_member.asp" -->
<%
if Session(strCookieURL & "Approval") <> "15916941253" then
	scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
	Response.Redirect "admin_login.asp?target=" & scriptname(ubound(scriptname))
end if
strMemName=Request.Form("MEMNAME")
if Request.Form("Method_Type")="MEMNAME" then
	strSql="DELETE FROM "& STRMEMBERTABLEPREFIX &"MEMBERS WHERE M_NAME='" & strMemName & "'"
	my_Conn.Execute (strsql),,adCmdText + adExecuteNoRecords
	Response.Write	"<p align=""center"">Member successfully deleted!</p>"
	strMemName=""
end if

Response.Write	"<table border=""0"" width=""100%"">" & vbNewLine & _
	"	<tr>" & vbNewLine & _
	"		<td width=""33%"" align=""left"" nowrap>" & vbNewLine & _
	"			<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" & vbNewLine & _
	"			" & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " " & vbNewLine & _
	"				<a href=""default.asp"">All Forums" & vbNewLine & _
	"				</a><br />" & vbNewLine & _
	"			" & getCurrentIcon(strIconBar,"","align=""absmiddle""") & getCurrentIcon(strIconFolderOpenTopic,"","align=""absmiddle""") & " Admin Section<br />" & vbNewLine & _
	"			" & getCurrentIcon(strIconBlank,"","") & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpenTopic,"","") & " Member Delete<br />" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"	</tr>" & vbNewLine & _
	"</table><br />" & vbNewLine & _
	"<form action=""admin_delete.asp"" method=""post"" name=""delete"">" & vbNewLine & _
	"	<input type=""hidden"" name=""Method_Type"" value=""MEMNAME"">" & vbNewline & _
	"	<table border=""0"" width=""75%"" cellspacing=""0"" cellpadding=""0"" align=""center"">" & vbNewLine & _
	"		<tr>" & vbNewLine & _
	"			<td bgcolor=""" & strTableBorderColor & """>" & vbNewLine & _
	"				<table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""1"">" & vbNewLine & _
	"					<tr valign=""middle"">" & vbNewLine & _
	"						<td colspan=""3"" align=""center"" bgcolor=""" & strHeadCellColor & """ width=""100%""> <br>" & vbNewLine & _
	"							<font face=""" & strDefaultFontFace & """ size=""" & strHeaderFontSize & """ color=""" & strCategoryFontColor & """>Member to Delete" & vbNewLine & _
	"							</font><br> " & vbNewLine & _
	"						</td>" & vbNewLine & _
	"					</tr>" & vbNewLine & _
	"					<tr valign=""middle"">" & vbNewLine & _
	"						<td colspan=""1"" align=""center"" bgcolor=""" & strCategoryCellColor & """ width=""10%""> " & vbNewLine & _
	"						</td>" & vbNewLine & _
	"						<td colspan=""1"" align=""center"" bgcolor=""" & strCategoryCellColor & """ width=""80%"">" & vbNewLine & _
	"							<input type=""text"" size=""80%"" maxLength=""75"" name=""MEMNAME"" value="""& strMemName &""">" & vbNewLine & _
	"						</td>" & vbNewLine & _
	"						<td colspan=""1"" align=""center"" bgcolor=""" & strCategoryCellColor & """ width=""10%""> " & vbNewLine & _
	"						</td>" & vbNewLine & _
	"					</tr>" & vbNewLine & _
	"					<tr valign=""middle"">" & vbNewLine & _
	"						<td colspan=""3"" align=""center"" bgcolor=""" & strCategoryCellColor & """ width=""100%"">" & vbNewLine & _
	"							<input type=""submit"" id=""submit"" name=""submit"">" & vbNewLine & _
	"						</td>" & vbNewLine & _
	"					</tr>" & vbNewLine & _
	"				</table>" & vbNewLine & _
	"			</td>" & vbNewLine & _
	"		</tr>" & vbNewLine & _
	"	</table>" & vbNewLine & _
	"</form>" & vbNewLine
%>


<
Go to Top of Page

Southern Girl
New Member

78 Posts
Posted - 09 February 2009 :  17:28:10  Show Profile
Thanks for the replies
Carefree - that was simple! <
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts
Posted - 09 February 2009 :  18:40:33  Show Profile
Glad we could help.<
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.26 seconds. Powered By: Snitz Forums 2000 Version 3.4.07