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
 Content Display MOD bookmark hangup...		  New Topic  Topic Locked
 Printer Friendly
Next Page
Author Previous Topic Topic Next Topic
Page: of 2

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  12:28:36  Show Profile  Visit Reinsnitz's Homepage
Following up on this topic with the same problem.

Downloaded the latest revision: contentdisplay34.zip

Implimented Fix as per Bookie: strMemberPrefix in content.asp

per the readme.txt, built display.asp: 
<!--#INCLUDE FILE="forum/config.asp"-->
<!--#INCLUDE FILE="forum/inc_func_secure.asp" -->
<!--#INCLUDE FILE="forum/inc_sha256.asp"-->
<!--#INCLUDE FILE="forum/inc_header.asp" -->
<!--#INCLUDE FILE="forum/inc_func_member.asp" -->
<!--#INCLUDE FILE="forum/inc_moderation.asp" -->
<!--#INCLUDE FILE="forum/inc_subscription.asp" -->
<!--#INCLUDE FILE="forum/content.asp" -->
<!--#INCLUDE FILE="forum/inc_contentdisplay.asp" -->
<%
		DisplayContent 1, 10, 1, 4, 6, 5, 200, 0, 5, 1, 2, 0, "Top News Stories", 450, "forum/topic.asp"
%>
<!--#INCLUDE FILE="forum/inc_footer.asp" -->


I've installed the dbs_files.asp for the Avatar and MsgIcons MOD's as per homeacademy.

I've done this as per Davio on this thread.:
Comment out line 124:
'rs.cachesize = 20


So, to recap, we're getting the error:
ADODB.Recordset error '800a0cb3' 

Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype. 

/forum/content.asp, line 125


Code Snipet before and after 125 (marked in green):
set rs = Server.CreateObject("ADODB.Recordset")
'	rs.cachesize = 20

rs.open strSql, my_Conn, 3, adLockReadOnly, adCmdText

if Not rs.EOF then
	arrTopicData = rs.GetRows(TopicCount,1)
	iTopicCount = UBound(arrTopicData, 2)
else
	iTopicCount = ""
end if


This all takes place on the page display.asp with all the above updates. I'm still trying to find answers, but this is realy frustrating... :) any other ideas?
Reinsnitz (Mike)

ruirib
Snitz Forums Admin

Portugal
26364 Posts
Posted - 14 November 2003 :  12:43:12  Show Profile
If that's the error, that means you will need to change the recordset type you're using. Try opening the recordset using adOpenStatic and adLockReadOnly as options. Basically open it the same way as, for example, is done in topic.asp (line 259 in base forum).

Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts
Posted - 14 November 2003 :  12:45:11  Show Profile
Hmmm... it seems that you're already doing it. What database are you using?

Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  12:50:24  Show Profile  Visit Reinsnitz's Homepage
MySQL hrm... my host is having issues at this very moment... pages won't load for me or I would tell you the exact version and such.
Reinsnitz (Mike)
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts
Posted - 14 November 2003 :  12:50:29  Show Profile
He is most likely using MySQL, Rui. Since my recommendations in that post he linked to was for a MySQL database.
Support Snitz Forums
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  12:53:50  Show Profile  Visit Reinsnitz's Homepage
DBMS Name MySQL
DBMS Version 3.23.54
Provider Name MSDASQL.DLL
OLE DB Version 02.00
Provider Version 02.80.1022.0
Driver Name myodbc3.dll
Driver Version 03.51.04
Driver ODBC Version 03.51

nails down the exact drivers and such on the server.
Reinsnitz (Mike)
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts
Posted - 14 November 2003 :  12:54:00  Show Profile
Ok, looking for how things are done in topic.asp for a MySQL DB, better open the recordset using something like this:

		rs.open strSql, my_Conn, adOpenForwardOnly, adLockReadOnly, adCmdText

Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts
Posted - 14 November 2003 :  12:57:57  Show Profile
Try this instead Mike:
set rs = Server.CreateObject("ADODB.Recordset")
'	rs.cachesize = 20

rs.open strSql, my_Conn, 3, adOpenForwardOnly, adCmdText

if Not rs.EOF then
	arrTopicData = rs.GetRows(TopicCount,1)
	iTopicCount = UBound(arrTopicData, 2)
else
	iTopicCount = ""
end if
Change the code in green and delete the code in red.

I'm not sure what value TopicCount has, but it should be -1 which retrieves all rows. You can try using adGetRowsRest instead of TopicCount if it doesn't work.
Support Snitz Forums
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts
Posted - 14 November 2003 :  12:59:25  Show Profile
Sorry Rui, was posting while you were posting.

But basically I was saying the same thing Rui was saying, along with another change. Try Rui's change first and see if it fixes it.
Support Snitz Forums
Edited by - Davio on 14 November 2003 13:03:21
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts
Posted - 14 November 2003 :  12:59:51  Show Profile
Ah, ah, beat you to it, David . You're way too slow .

Snitz 3.4 Readme | Like the support? Support Snitz too
Edited by - ruirib on 14 November 2003 13:01:00
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  13:08:35  Show Profile  Visit Reinsnitz's Homepage
TopicCount = 5 (did a response.write and on error resume next to get that)

with the above changes an error of the following is generated:
ADODB.Recordset error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

/forum/content.asp, line 122

This all happens on the following line marked in green:
set rs = Server.CreateObject("ADODB.Recordset")
'	rs.cachesize = 20

rs.open strSql, my_Conn, 3, adOpenForwardOnly, adCmdText
'rs.open strSql, my_Conn, 3, adLockReadOnly, adCmdText

'Response.Write("<br><br><br>TopicCount: " & TopicCount & "<br><br><br>")

if Not rs.EOF then
	arrTopicData = rs.GetRows(TopicCount)
'	arrTopicData = rs.GetRows(TopicCount,1)
	iTopicCount = UBound(arrTopicData, 2)
else
	iTopicCount = ""
end if
Reinsnitz (Mike)
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  13:33:30  Show Profile  Visit Reinsnitz's Homepage
The same error is generated when this is used too: 
rs.open strSql, my_Conn, adOpenForwardOnly, adLockReadOnly, adCmdText
Reinsnitz (Mike)
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts
Posted - 14 November 2003 :  13:48:17  Show Profile
Mike, I'm going to install the mod and test it with mysql database and get back to you.
Support Snitz Forums
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  14:11:36  Show Profile  Visit Reinsnitz's Homepage
Thank you very much Davio :)
Reinsnitz (Mike)
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts
Posted - 14 November 2003 :  14:27:02  Show Profile
Mike, I tested this with a mysql database 4 and mysql database 3.23.

I got both working with this code:
set rs = Server.CreateObject("ADODB.Recordset")
'	rs.cachesize = 20

rs.open strSql, my_Conn, adOpenForwardOnly, adLockReadOnly, adCmdText

if Not rs.EOF then
	arrTopicData = rs.GetRows(TopicCount)
	iTopicCount = UBound(arrTopicData, 2)
else
	iTopicCount = ""
end if
Support Snitz Forums
Go to Top of Page

Reinsnitz
Snitz Forums Admin

USA
3545 Posts
Posted - 14 November 2003 :  19:44:43  Show Profile  Visit Reinsnitz's Homepage
testing now ;)
Reinsnitz (Mike)
Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
Next Page
 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 2.3 seconds. Powered By: Snitz Forums 2000 Version 3.4.07