Snitz Forums 2000 - Error- pop_profile.asp after active users install

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Help Groups for Snitz Forums 2000 Users

Help: MOD Implementation

Error- pop_profile.asp after active users install

New Topic

Topic Locked

Printer Friendly

Author

Topic

Ryan
Average Member

USA
858 Posts

Posted - 14 June 2003 : 17:31:04

When I installed the active users MOD I got this error when I go to submit my profile after I have changed it:
Microsoft JET Database Engine error '80040e14'

Syntax error (comma) in query expression 'M_NAME = 'Le Quack' AND M_PASSWORD = 'e778b37e1d5be611f2b8c8a2231b18c5c412260625420f70e89693c1b7754a70', M_AUHIDE = '1''.

/reducks87/tplforum/pop_profile.asp, line 1250

You may view the txt of my pop_profile.asp at http://www.thepoultrylink.com/snitzviewer.htm
Any suggestions?

The Poultry Link - "Serving the best of the fancy with the best of the web"
Forum Setup Help

masterao
Senior Member

Sweden
1678 Posts

Posted - 14 June 2003 : 17:38:30

That is because you have pasted some lines wrong (marked red below).


			if strBio = "1" then
				strSql = strSql & ",	M_BIO = '" & ChkString(Request.Form("Bio"),"message") & "'"
			end if
			strSql = strSql & " WHERE M_NAME = '" & ChkString(Request.Form("Name"), "SQLString") & "' "
			if strAuthType = "db" then 
				strSql = strSql & " AND   M_PASSWORD = '" & ChkString(Request.Form("Password-d"), "SQLString") & "'"
			end if
			if strAUAnon = "1" then 
				strSql = strSql & ",	M_AUHIDE = '" & ChkString(Request.Form("AUHide"),"") & "'" 
			end if

The above should be like this:


			if strBio = "1" then
				strSql = strSql & ",	M_BIO = '" & ChkString(Request.Form("Bio"),"message") & "'"
			end if
			if strAUAnon = "1" then 
				strSql = strSql & ",	M_AUHIDE = '" & ChkString(Request.Form("AUHide"),"") & "'" 
			end if
			strSql = strSql & " WHERE M_NAME = '" & ChkString(Request.Form("Name"), "SQLString") & "' "
			if strAuthType = "db" then 
				strSql = strSql & " AND   M_PASSWORD = '" & ChkString(Request.Form("Password-d"), "SQLString") & "'"
			end if

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod