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: MOD Implementation
 private message preferences error
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Doughnut
Starting Member

United Kingdom
40 Posts

Posted - 22 September 2003 :  22:21:40  Show Profile  Visit Doughnut's Homepage
Alright there,
When I try to set any private message preferences (version v3.4.01) I get the following error:

Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/forum/pm_options.asp, line 58


Heres line 58 plus one line above and one line below:
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.M_PASSWORD = '" & Request.Cookies(strUniqueID & "User")("PWord") & "'"

my_Conn.Execute(strSql) <<<line 58.
if strSetCookieToForum = 1 then


I know this aint the latest version but it works okay so I don't really wanna change it, any ideas what up chaps?

Thanks, Robin.

Edited by - Doughnut on 23 September 2003 04:36:13

Doughnut
Starting Member

United Kingdom
40 Posts

Posted - 22 September 2003 :  23:16:39  Show Profile  Visit Doughnut's Homepage
decided to install the new version after all... still get the same error though
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts

Posted - 23 September 2003 :  05:03:04  Show Profile
Well, this guy had the same problem, but doesn't look like he got it fully resolved.
http://forum.snitz.com/forum/topic.asp?ARCHIVE=true&TOPIC_ID=27837

Support Snitz Forums
Go to Top of Page

Doughnut
Starting Member

United Kingdom
40 Posts

Posted - 23 September 2003 :  07:18:43  Show Profile  Visit Doughnut's Homepage
Thanks Davio,

I did do a search but never found this one

Thanks again.

Edited by - Doughnut on 23 September 2003 07:26:02
Go to Top of Page

Doughnut
Starting Member

United Kingdom
40 Posts

Posted - 23 September 2003 :  07:25:18  Show Profile  Visit Doughnut's Homepage
I tried Richards amended code I get a slightly new error on the same line..

Microsoft JET Database Engine error '80040e14'

Syntax error in UPDATE statement.

/forum/pm_options.asp, line 58


Anyone managed to work this one out?

Thanks.

Edited by - Doughnut on 23 September 2003 07:26:36
Go to Top of Page

sikandar
Junior Member

Pakistan
135 Posts

Posted - 16 November 2003 :  04:24:48  Show Profile
I am getting the following error message,
Error Type:
(0x80020009)
Exception occurred.
/forums/pm_options.asp, line 103


103 if rs("M_PMRECEIVE") = "1" then
104 Response.Write "ON"
105 else
106 Response.Write "OFF"
107 end if
Go to Top of Page

laser
Advanced Member

Australia
3859 Posts

Posted - 16 November 2003 :  04:31:04  Show Profile
I guess change line 103 to :

if rs("M_PMRECEIVE") = 1 then

i.e. remove the quotes
Go to Top of Page

masterao
Senior Member

Sweden
1678 Posts

Posted - 17 November 2003 :  16:23:00  Show Profile  Visit masterao's Homepage
Robin, could you put a response.write strSql and a response.end before that myConn.Execute and paste the result here? Then we can check the sql-query and try to see what causes the error.

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod
Go to Top of Page

sikandar
Junior Member

Pakistan
135 Posts

Posted - 18 November 2003 :  00:16:53  Show Profile
Normal users are getting the error while I as an admin not getting it, I have removed the quotes but still same.
Here is the copy paste,

'## Forum_SQL
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_NAME "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_PASSWORD "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_PMRECEIVE "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_PMEMAIL "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.M_PASSWORD = '" & Request.Cookies(strUniqueID & "User")("PWord") & "'"

set rs = my_Conn.Execute(strSql)

Response.Write "<center>" & vbNewLine & _
"<table border=""0"" width=""100%"" align=""center"">" & vbNewLine & _
" <tr>" & vbNewLine & _
" <td width=""33%"" align=""left"" nowrap><font size=""" & strDefaultFontSize & """>" & vbNewLine & _
" " & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""default.asp?sectionid=0"">" & fLang(strLangAll_Forums00010) & "</a><br>" & vbNewLine & _
" " & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpen,"","align=""absmiddle""") & " <a href=""pm_view.asp?sectionid=2"">" & fLang(strLangPm_Message00020) & "</a><br>" & vbNewLine & _
" " & getCurrentIcon(strIconBlank,"","align=""absmiddle""") & getCurrentIcon(strIconBar,"","") & getCurrentIcon(strIconFolderOpenTopic,"","") & " " & fLang(strLangPm_Message01010) & "<br></font></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
"</table>" & vbNewLine & _
"<br>" & vbNewLine & _
"<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""4"">" & vbNewLine & _
"<form action=""pm_options.asp?mode=setoptions"" method=""POST"">" & vbNewLine & _
" <tr>" & vbNewLine & _
" <td class=header><font size=""" & strDefaultFontSize & """>" & fLang(strLangPm_Message01020) & "</font></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
" <tr>" & vbNewLine & _
" <td class=forumcellcolor><font size=""" & strDefaultFontSize & """><b>" & fLangN(strLangPm_Message01030,strForumTitle)
if rs("M_PMRECEIVE") = 1 then
Response.Write fLang(strLangPm_Message01040)
else
Response.Write fLang(strLangPm_Message01050)
end if
Response.Write "</b>.<br>" & fLang(strLangPm_Message01060) & " <b>"
if rs("M_PMRECEIVE") = "1" then
Response.Write fLang(strLangPm_Message01050)
else
Response.Write fLang(strLangPm_Message01040)
end if
Response.Write "</b> " & fLang(strLangPm_Message01070) & "<br>" & vbNewLine & _
" <input type=""radio"" name=""statusstorage"" value=""1"""
if rs("M_PMRECEIVE") = "1" then
Response.Write(" checked")
end if
Response.Write "> " & fLang(strLangPm_Message01080) & "<br>" & vbNewLine & _
" <input type=""radio"" name=""statusstorage"" value=""0"""
if rs("M_PMRECEIVE") = "0" then
Response.Write(" checked")
end if
Go to Top of Page

masterao
Senior Member

Sweden
1678 Posts

Posted - 18 November 2003 :  10:41:31  Show Profile  Visit masterao's Homepage
Sikandar, pasting code like that will not be of much help. Instead, make a copy of the file and save it as text-file, then paste a link to it instead. Did you test laser's suggestions?

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod
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.35 seconds. Powered By: Snitz Forums 2000 Version 3.4.07