| Author |
 Topic  |
|
|
Chuck Sinclair
Starting Member
USA
9 Posts |
 Posted - 28 May 2002 : 00:20:20
|
When i go to delete a user i get the following error:
ADODB.Recordset error '800a0e78'
Operation is not allowed when the object is closed.
/ws-landsca1/pop_delete.asp, line 524
The only thing i have done with thid file is add the PM Mod.
It's in this area and i don't see a problem
if Mode_Type = "DeleteMember" then
mLev = cint(chkUser(STRdbntUserName, Request.Form("Pass")))
if mLev > 0 then '## is Member
if mLev = 4 then
'## Forum_SQL - Remove the member from the moderator table
strSql = "DELETE FROM " & strTablePrefix & "MODERATOR "
strSql = strSql & " WHERE " & strTablePrefix & "MODERATOR.MEMBER_ID = " & Member_ID
my_Conn.Execute (strSql)
'## Forum_SQL - Select postcount
strSql = "SELECT COUNT(T_AUTHOR) AS POSTCOUNT "
strSql = strSql & " FROM " & strTablePrefix & "TOPICS "
strSql = strSql & " WHERE T_AUTHOR = " & Member_ID
set rs = my_Conn.Execute (strSql)
if not rs.eof then
intPostcount = rs("POSTCOUNT")
else
intPostcount = 0
end if
>>>>>>>>>>>>>> it is point here >>>rs.close
'## Forum_SQL - Select postcount
strSql = "SELECT COUNT(R_AUTHOR) AS REPLYCOUNT "
strSql = strSql & " FROM " & strTablePrefix & "REPLY "
strSql = strSql & " WHERE R_AUTHOR = " & Member_ID
set rs = my_Conn.Execute (strSql)
if not rs.eof then
intReplycount = rs("REPLYCOUNT")
else
intReplycount = 0
|
|
|
Davio
Development Team Member
Jamaica
12217 Posts |
Posted - 28 May 2002 : 01:00:00
|
Just by looking at the code, add the following after the rs.close:set rs = nothing See if that fixes the problem.
«------------------------------------------------------»
Want to know when the next version comes out,
as soon as possible? Join our Mailing Lists ! |
 |
|
|
Chuck Sinclair
Starting Member
USA
9 Posts |
Posted - 28 May 2002 : 19:17:02
|
I added that like you said and now i get this error
Microsoft VBScript runtime error '800a01a8'
Object required: 'rs'
/pop_delete.asp, line 524
|
|
|
|
Davio
Development Team Member
Jamaica
12217 Posts |
Posted - 28 May 2002 : 22:55:38
|
Post your updated code now, and let me know which line is 524.
«------------------------------------------------------»
Want to know when the next version comes out,
as soon as possible? Join our Mailing Lists ! |
|
|
|
Chuck Sinclair
Starting Member
USA
9 Posts |
Posted - 30 May 2002 : 20:03:04
|
Thanks for your help, i found the problem i pasted the code twice. I took one out and it works fine now.
|
|
|
|
Davio
Development Team Member
Jamaica
12217 Posts |
Posted - 30 May 2002 : 23:16:33
|
LoL. Oh yeah. How did that one miss me? I was wondering why the record set was being used twice. Didn't see the rest of the code was the same. 
Glad you got it working, although I didn't give you much help. 
«------------------------------------------------------»
Want to know when the next version comes out,
as soon as possible? Join our Mailing Lists ! |
|
|
| |
Topic |
|
Topic Locked
