Ir para conteúdo
FabianoSouza

Erro de recordset gerado por ADODB

Recommended Posts

Está ocorrendo um erro simplesmente maluco.

 

Tenho uma procedure que funciona normalmente.

Mas quando mudo a string de conexão ocorre erro de recordset, dizendo " Operação não permitida quando o objeto está fechado. "

 

Vejam o código

 

Dim strConex
Set strConex = Server.CreateObject("ADODB.Connection")
'strConex.ConnectionString ="dsn=nomeConex1;uid=user1;pwd=senha1;"
strConex.ConnectionString ="dsn=nomeConex2;uid=user2;pwd=senha2;"
strConex.Open

Dim cmd
Dim rs1
Dim Recordset1_numRows

set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = strConex
cmd.CommandText = "dbo.sel_MinhaProcedure"
cmd.Parameters.Append cmd.CreateParameter("@RETURN_VALUE", 3, 4)
cmd.Parameters.Append cmd.CreateParameter("@id", 3, 1, 16, 11) 'int
cmd.CommandType = 4
cmd.CommandTimeout = 0
cmd.Prepared = true
set rs1 = cmd.Execute
%>

 

O problema está aqui. Usando usando a nomeConex1, funciona.

 

Com a nomeConex2 não funciona. Porém uso a nomeConex2 para várias outras coisas. Deveria funcionar.

 

strConex.ConnectionString ="dsn=nomeConex1;uid=user1;pwd=senha1;"
strConex.ConnectionString ="dsn=nomeConex2;uid=user2;pwd=senha2;"

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora

  • Conteúdo Similar

    • Por parralego
      Ola pessoal estou tentando tirar 2 º via de cuns comprovantes porém está aparecendo o erro
       
      ADODB.Field error "800a0bcd"
       
      Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
       
       
      peguei isso para pedir ajuda pois vi em alguns post 
       
       
      <head>
       
       
      <link rel="stylesheet" type="text/css" href="../estilos.css"/>
      <link rel="stylesheet" href="../js/calendario/calendario.css" type="text/css">
      <script language="javascript" src="../js/calendario/calendario.js"></script>
      <script language="javascript" src="../js/validacao.js"></script>
       
      <font face="Arial" size=2>
      <p>ADODB.Field</font> <font face="Arial" size=2>error '800a0bcd'</font>
      <p>
      <font face="Arial" size=2>Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.</font>
      <p>
      <font face="Arial" size=2>/cdtr/session.asp</font><font face="Arial" size=2>, line 97</font>
       
       
      vocês podem me ajudar por favor ?
       
       
    • Por MarKteus
      Erro de tempo de execução do Microsoft VBScript erro '800a01b6'
      O objeto não dá suporte para a propriedade ou método: 'RecordCount'

      Estou obtendo esse erro ao tentar descobrir quantos registros foram retornados,

      O estranho é que em outras ocasiões, eu mesmo já usei método e não tive problemas

      Set objCommand= Server.CreateObject("ADODB.Command") Set objRecordset = Server.CreateObject("ADODB.Recordset") if not IsNull(Connection) then With objCommand .CommandText = "SELECT * FROM Usuario NOLOCK" .CommandType = 1 .ActiveConnection = Connection Set objRecordset = .Execute() End With end if
    • Por MarKteus
      Alguem tem uma luz
       
       
      Set Con = CreateObject("ADODB.Connection") Con.ConnectionString = "Provider=SQLOLEDB;Data Source=(Local);Initial Catalog=MyBank;Persist Security Info=False;Integrated Security=SSPI"
       
       
      OpenConnection = Con.Open
       
       
      Mensagem de erro
       
      Microsoft OLE DB Provider for SQL Server erro '80004005'
      Não é possível abrir o banco de dados "SimpleCrudWithBoostrap" solicitado pelo logon. Falha de logon.
       
       
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.