CMD.PARAMETERS NO ASP RETORNA ERRO: Provider error 8007000e Not enough storage is available to complete this operation

06/01/2017

1

Pessoal. Boa noite.

Quando tento executar algum comando do objeto command com parameters dá o erro especificado no título. quando eu comento todas as partes com cmd.parameters a página executa normalmente. Alguém poderia me ajudar com este problema.

Grato, desde já.


Set cmd = Server.CreateObject("ADODB.Command")
'With cmd
    cmd.ActiveConnection = CONEXAO_DB
    cmd.Commandtext = "DBxxxx_SISGuddh..SP_GEfff_xxx_CADASTRO_DESEMBOLSO"
    cmd.CommandType = 4 'onde está 9 você deve colocar os paremetros de acordo com sua tabela
	cmd.Parameters.Refresh ' a linha 53
	cmd.Parameters(1) = 2
	cmd.Parameters(2) = 5.5
	'.Parameters.Append .CreateParameter("@CODIGO_PROJETO",CODIGO_PROJETO)
	'.Parameters.Append .CreateParameter("@VALOR_DESEMBOLSO", VALOR_DESEMBOLSO)
    cmd.Execute
    retCount = cmd.Parameters(0) ' receberia o valor de scopeidentity NO PROCEDIMENTO ARMAZENADO.
'End with	

Response.Write("Id gerado no DB = " & retCount)



resultado:

Provider error '8007000e'

Not enough storage is available to complete this operation.

/Sirsa/SisGERSA_lab/gersa_fsa_desembolsos_projetos_autorizacao_cadastrar2.asp, line 53

a linha 53 é a linha cmd.Parameters.Refresh

PROCEDIMENTO ARMAZENADO:

ALTER PROCEDURE [dbo].[SP_GEfff_xxx_CADASTRO_DESEMBOLSO]
-- Add the parameters for the stored procedure here
@CODIGO_PROJETO INT,
@VALOR_DESEMBOLSO MONEY
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;

insert into DB5524_SISGXXX.._GEfff_xxx__DESEMBOLSO2
(CODIGO_PROJETO,VALOR_DESEMBOLSO ) VALUES (@CODIGO_PROJETO,@VALOR_DESEMBOLSO)
--(CODIGO_PROJETO ) VALUES (@CODIGO_PROJETO)

RETURN SCOPE_IDENTITY ()

END
Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira