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 / Current Version (Old)
 I really need help big time..
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  02:12:29  Show Profile  Visit Kenno's Homepage
Hi,

Well, I have Snitz Forum running on my site for pretty long now. I made a lot of modification with the MODs I got from here. It kinda looks cool. However, recenly, I found a weird thing. After posting the messages in the thread, we normally can edit it if we're either the Admin or the person who posts it. But I can't. I'll get this error messages: ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/forum/post.asp, line 362


Anyone could help me please?

I forget to tell you the link:

http://khmersite.net/forum

÷§÷ Kenno ÷§÷

Edited by - Kenno on 22 March 2001 02:16:34

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 22 March 2001 :  02:28:33  Show Profile
can you post the code that is around line #362 of post.asp?

say like from 10 lines above and 5 lines below it?
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  02:38:56  Show Profile  Visit Kenno's Homepage
Here it is:
' *** TOPIC ORDER MODIFICATION *** BEGIN	
if strRqMethod = "Edit" or _
strRqMethod = "EditTopic" then
strOrder = rs("T_ORDER")
end if
' *** TOPIC ORDER MODIFICATION *** END

if strRqMethod = "EditTopic" then
TxtMsg = rs("T_MESSAGE")
' ****


÷§÷ Kenno ÷§÷
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 22 March 2001 :  03:18:51  Show Profile
Is TOPICS.T_ORDER in the SELECT statement just above where this code is?
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  03:39:24  Show Profile  Visit Kenno's Homepage
okay, here's the code from line 342 to 381:


if strRqMethod = "EditTopic" or _
strRqMethod = "TopicQuote" then
'## Forum_SQL
strSql = "SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "TOPICS.T_AUTHOR, " & strTablePrefix & "TOPICS.T_MAIL, " & strTablePrefix & "TOPICS.T_MESSAGE "
strSql = strSql & " FROM " & strTablePrefix & "TOPICS "
strSql = strSql & " WHERE " & strTablePrefix & "TOPICS.TOPIC_ID = " & Request.QueryString("TOPIC_ID")

set rs = my_Conn.Execute (strSql)

TxtSub = rs("T_SUBJECT")
strAuthor = rs("T_AUTHOR")

' old thing
' if strRqMethod = "EditTopic" then
' TxtMsg = rs("T_MESSAGE")

' *** TOPIC ORDER MODIFICATION *** BEGIN
if strRqMethod = "Edit" or _
strRqMethod = "EditTopic" then
strOrder = rs("T_ORDER")
end if
' *** TOPIC ORDER MODIFICATION *** END

if strRqMethod = "EditTopic" then
TxtMsg = rs("T_MESSAGE")
' ****
else



if strRqMethod = "TopicQuote" then
TxtMsg = "
quote:
" & vbCrLf
TxtMsg = TxtMsg & rs("T_MESSAGE") & vbCrLf
TxtMsg = TxtMsg & "
"
end if
end if
if strDBNTUserName = getMemberName(strAuthor) then boolTopic = rs("T_MAIL")
end if



÷§÷ Kenno ÷§÷
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  03:47:45  Show Profile  Visit Kenno's Homepage
This is the post.asp.

http://khmersite.net/post.txt

÷§÷ Kenno ÷§÷
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 22 March 2001 :  03:49:30  Show Profile
Replace this line:

strSql = "SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "TOPICS.T_AUTHOR, " & strTablePrefix & "TOPICS.T_MAIL, " & strTablePrefix & "TOPICS.T_MESSAGE "


with this line:

strSql = "SELECT " & strTablePrefix & "TOPICS.CAT_ID, " & strTablePrefix & "TOPICS.FORUM_ID, " & strTablePrefix & "TOPICS.TOPIC_ID, " & strTablePrefix & "TOPICS.T_SUBJECT, " & strTablePrefix & "TOPICS.T_AUTHOR, " & strTablePrefix & "TOPICS.T_MAIL, " & strTablePrefix & "TOPICS.T_ORDER, " & strTablePrefix & "TOPICS.T_MESSAGE "
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  04:09:58  Show Profile  Visit Kenno's Homepage
After made change to above correction, I got this message:

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/forum/post.asp, line 351


÷§÷ Kenno ÷§÷
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 22 March 2001 :  04:32:59  Show Profile
does FORUM_TOPICS.T_ORDER exist in your database?
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  14:48:22  Show Profile  Visit Kenno's Homepage
quote:

does FORUM_TOPICS.T_ORDER exist in your database?



Nope, well that might be the problem. Should I just add another field called "T_ORDER" in FORUM_TOPICS table?

÷§÷ Kenno ÷§÷
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  14:54:59  Show Profile  Visit Kenno's Homepage
After editing the database by adding the T_ORDERS in FORUM_TOPICS table, it allows me to edit the first the message of the thread. But when I lick on the "Post Changes" button, I got another error message:

Microsoft JET Database Engine error '80040e14'

Syntax error in UPDATE statement.

/forum/post_info.asp, line 250

hmmm...

÷§÷ Kenno ÷§÷
Go to Top of Page

Kenno
Average Member

Cambodia
846 Posts

Posted - 22 March 2001 :  14:57:39  Show Profile  Visit Kenno's Homepage
This is the code of post_info.asp from line 248 to 261, the bold line is line 251:

strSql = strSql & " WHERE TOPIC_ID = " & Request.Form("TOPIC_ID")

my_Conn.Execute(strSql)

if Request.Form("FORUM_ID") <> aryForum(1) then
'## Forum_SQL
strSql = "UPDATE " & strTablePrefix & "REPLY "
strSql = strSql & " SET CAT_ID = " & aryForum(0)
strSql = strSql & ", FORUM_ID = " & aryForum(1)
strSql = strSql & " WHERE TOPIC_ID = " & Request.Form("TOPIC_ID")

my_Conn.Execute(strSql)

set rs = Server.CreateObject("ADODB.Recordset")




÷§÷ Kenno ÷§÷
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.38 seconds. Powered By: Snitz Forums 2000 Version 3.4.07