Author |
Topic |
|
Lon2
Junior Member
USA
151 Posts |
Posted - 24 January 2009 : 13:21:02
|
Upon looking at our Google dead file log, I noticed many errors of pages that don't even exist in our forums. I have messed with End Of File code before but I'm not sure of the parameters and where it needs to go in forums.asp. This is what I'm thinking:
If (rsTopics?.EOF or rsTopics?.BOF = true) Then
Response.Write "That topic does not exist" & vbNewLine & _
"Click here to continue" & vbNewLine Has anyone attempted this? Can you help?
I searched Snitz but did not find anything.< |
|
Lon2
Junior Member
USA
151 Posts |
Posted - 26 January 2009 : 17:23:41
|
Uh oh... where's Rui, Anon... I hope Snitz doesn't lose its great support team...
Edited by ruirib - I don't think it is appropriate to joke with serious stuff, ok?< |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
Lon2
Junior Member
USA
151 Posts |
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
Lon2
Junior Member
USA
151 Posts |
Posted - 27 January 2009 : 07:28:34
|
Microsoft SQL 2005 Express< |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 27 January 2009 : 07:51:12
|
On forum.asp, change #333-#339 lines to:
rs.pagesize = strPageSize
maxpages = cLng(rs.pagecount)
inttotaltopics = cLng(rs.recordcount)
If (mypage > maxpages) Then mypage = maxpages
rs.absolutepage = mypage '**
arrTopicData = rs.GetRows(strPageSize)
iTopicCount = UBound(arrTopicData, 2)
The blue line was moved a few lines back and the red line is new. It should fix it, but I haven't tested it.< |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
Lon2
Junior Member
USA
151 Posts |
Posted - 27 January 2009 : 09:18:02
|
Made the change but still get the error:
ADODB.Recordset error '800a0bcd'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/forum/forum.asp, line 338
Line 337: maxpages = cLng(rs.pagecount)
Line 338: arrTopicData = rs.GetRows(strPageSize)
Line 339: iTopicCount = UBound(arrTopicData, 2) < |
|
|
Carefree
Advanced Member
Philippines
4207 Posts |
Posted - 27 January 2009 : 10:28:39
|
Change line 332 to say:< |
|
|
Lon2
Junior Member
USA
151 Posts |
Posted - 27 January 2009 : 11:51:06
|
No change, still get the exact same error. < |
|
|
Carefree
Advanced Member
Philippines
4207 Posts |
Posted - 27 January 2009 : 13:27:20
|
quote: Originally posted by Lon2
No change, still get the exact same error.
Post a link to your file in .txt format for us to see.< |
|
|
Lon2
Junior Member
USA
151 Posts |
Posted - 27 January 2009 : 13:55:37
|
Did you need more than this:
else 'end MySql specific code
set rs = Server.CreateObject("ADODB.Recordset")
rs.cachesize = strPageSize
rs.open strSql & strSql2 & strSql3 & strSql4, my_Conn, adOpenStatic
if not rs.EOF then
rs.movefirst
rs.pagesize = strPageSize
inttotaltopics = cLng(rs.recordcount)
rs.absolutepage = mypage '**
maxpages = cLng(rs.pagecount)
arrTopicData = rs.GetRows(strPageSize)
iTopicCount = UBound(arrTopicData, 2)
else
iTopicCount = ""
inttotaltopics = 0
end if
rs.Close
set rs = nothing
end if Could it have anything to do with my recent connection string change?< |
Edited by - Lon2 on 27 January 2009 14:21:46 |
|
|
Carefree
Advanced Member
Philippines
4207 Posts |
Posted - 27 January 2009 : 16:02:31
|
This may not solve the issue, but it's worth a try. The previous routine used arrTopicData = rs.GetRows(intGetRows) instead of arrTopicData = rs.GetRows(strPageSize) < |
|
|
jgs
New Member
Netherlands
95 Posts |
Posted - 29 January 2009 : 01:48:03
|
Yesterday I got the same error after opening a new petitionlist and trying to read this empty list. After the first entry the error didn't come back. As I had just before deleted the previous list, I didn't pay much attention to this. With an empty list BOF=EOF, both are true, and the file had been deleted.
O, I've an Access dB.< |
Info about my forum: http://www.govvd.nl/forumsoftware.htm list of Mods included. Most of userinterface translated into Dutch. |
Edited by - jgs on 29 January 2009 01:50:20 |
|
|
Lon2
Junior Member
USA
151 Posts |
Posted - 31 January 2009 : 09:42:10
|
quote: Originally posted by Carefree
This may not solve the issue, but it's worth a try. The previous routine used arrTopicData = rs.GetRows(intGetRows) instead of arrTopicData = rs.GetRows(strPageSize)
Thanks Carefree!
Rui, Anon or ?, can you confirm changing all strPageSize to intGetRows in this routine might help?< |
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Topic |
|