Erro: Microsoft Vbscript Runtime Error '800a01a8'

[smez]

porque esta dando esse erro??

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/web/conta_credito.asp, line 910

<%

strLink = Request("link")

strAcao = Request("acao")

Select Case strLink

'--------------------------------------------------------------------------------------------------------------

'##############################################################################################################

' Editar Perfil

'##############################################################################################################

'--------------------------------------------------------------------------------------------------------------

Case "add_acionista"

Set rs = CreateObject("ADODB.Recordset")

Set rs.ActiveConnection = Conexao

NomeAcionista = Request.Form("txtNomeAcionista")

CNPJAcionista = Request.Form("txtCNPJAcionista")

CPFAcionista = Request.Form("txtCPFAcionista")

CapitalAcionista = Request.Form("txtCapitalAcionista")

TotalAcionista = Request.Form("txtTotalAcionista")

SQL = "INSERT INTO Acionista (user_ID,NomeAcionista,CNPJAcionista,CPFAcionista,CapitalAcionista,TotalAcionista) values ("& Session("user_ID") &",'"& NomeAcionista &"','"& CNPJAcionista &"','"& CPFAcionista &"','"& CapitalAcionista &"','"& TotalAcionista &"')"

set rs = abredb.execute(SQL)Response.Redirect("conta_credito.asp")

rs.close

set rs = nothing

End Select

%>

[.Andreia.]

Sempre que aparecer erros assim, imprima a consulta pra analisar como está saindo a consulta:

SQL = "INSERT INTO Acionista (user_ID,NomeAcionista,CNPJAcionista,CPFAcionista,CapitalAcionista,TotalAcionist
a) values ("& Session("user_ID") &",'"& NomeAcionista &"','"& CNPJAcionista &"','"& CPFAcionista &"','"& CapitalAcionista &"','"& TotalAcionista &"')"
response.write sql
response.end
set rs = abredb.execute(SQL)
Response.Redirect("conta_credito.asp")

isso se chama debugar

[kuroi]

essa variavel abredb ta mesmo conectada ao banco??

você passa a variavel Conexao pro rs mas depois executa pelo abredb, qual o sentido??