Can’t Register - Web Wiz Support and Community Forums

When ever I try to register a test account in my forum I get the following error:

ADODB.Recordset error '800a0e79'

Operation is not allowed when the object is open.

/forum/forum/includes/navigation_buttons_inc.asp, line 45

How can this be fixed?

P.S. I've installed the nav bar mod.

Go here to goto a great forum for help with XP and more: http://www.johnscompany.net/xp
Visit my cool forum at: http://forums.johnscompany.net!

Here's the full soruce code of navigation_buttons_inc.asp:

\\premfs7\sites\premium2\hexstar\webroot\forum\forum\i ncludes\navigation_buttons_inc.asp

0001: <br>
0002: <table width="<% = strTableVariableWidth %>" border="0" cellspacing="0" cellpadding="1" bgcolor="<% = strTableBorderColour %>" align="center">
0003:   <tr>
0004:     <td> <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="<% = strTableBgColour %>">
0005:         <tr>
0006:            <td bgcolor="<% = strTableBgColour %>"><table width="100%" border="0" align="center" cellpadding="4" cellspacing="1">
0007:                <tr valign="top" bgcolor="<% = strTableTitleColour %>" background="<% = strTableTitleBgImage %>">
0008:                   <td colspan="9" bgcolor="<% = strTableTitleColour %>" background="<% = strTableTitleBgImage %>" class="tHeading"><div align="center">Navigation</div></td>
0009:                </tr>
0010:                <tr valign="top" bgcolor="<% = strTableColour %>" background="<% = strTableTitleBgImage %>">
0011:                   <td width="11%" align="center" bgcolor="<% = strTableColour %>">
0012:                    <div align="center">
0013:                <%
0014:                Response.Write("<a href=""default.asp"" target=""_self"" class=""nav""><img src=""" & strImagePath & "Homepage1_icon.gif"" align=""absmiddle"" border=""0"" alt=""Homepage""><br>Homepage</a>")
0015:                %>
0016:                </div></td>
0017:                   <td width="11%" align="center" bgcolor="<% = strTableColour %>">
0018:                    <%
0019: 'Make sure that the forum ID number has a number in it otherwise set it to 0
0020: If isEmpty(intForumID) Then intForumID = 0
0021:
0022:    'Display the other common buttons
0023:    Response.Write ("<a href=""active_topics.asp?FID=" & intForumID & """ target=""_self"" class=""nav""><img src=""" & strImagePath & "active_topics.gif"" align=""absmiddle"" border=""0"" alt=""" & strTxtActiveTopics & """><br>" & strTxtActiveTopics & "</a>")
0024:     %>
0025:                  </td>
0026:                   <td width="11%" align="center">
0027:                    <div align="center">
0028:                      <%
0029: 'Make sure that the forum ID number has a number in it otherwise set it to 0
0030: If isEmpty(intForumID) Then intForumID = 0
0031:
0032:    'Display the other common buttons
0033:    Response.Write ("<a href=""active_users.asp"" & target=""_self"" class=""nav""><img src=""" & strImagePath & "active_users.gif"" border=""0"" align=""absmiddle"" alt=""" & strTxtActiveUsers & """><br>" & strTxtActiveUsers & "</a><br>")
0034:
0035: 'Get the number of active users if enabled
0036: If blnActiveUsers Then
0037:    'Initialise the SQL variable with an SQL statement count the number of records
0038:    If strDatabaseType = "SQLServer" Then
0039:       strSQL = "EXECUTE wwfSpCountOfActiveUsers"
0040:    Else
0041:       strSQL = "SELECT Count(tblActiveUser.Author_ID) AS ActiveUser From tblActiveUser;"
0042:    End If
0043:
0044:    'Query the database
0045:

Go here to goto a great forum for help with XP and more: http://www.johnscompany.net/xp
Visit my cool forum at: http://forums.johnscompany.net!

rsCommon is still open from where ever it was used last. The recordset either needs to be closed or use another recordset.

Get a website that sells