Received: from malur.postgresql.org ([217.196.149.56]) by arkaria.postgresql.org with esmtps (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1nt725-0008IY-RR for pgsql-odbc@arkaria.postgresql.org; Mon, 23 May 2022 12:19:34 +0000 Received: from localhost ([127.0.0.1] helo=malur.postgresql.org) by malur.postgresql.org with esmtp (Exim 4.92) (envelope-from ) id 1nt724-00007j-Jh for pgsql-odbc@arkaria.postgresql.org; Mon, 23 May 2022 12:19:32 +0000 Received: from magus.postgresql.org ([2a02:c0:301:0:ffff::29]) by malur.postgresql.org with esmtps (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1nsV1a-0003va-AU for pgsql-odbc@lists.postgresql.org; Sat, 21 May 2022 19:44:30 +0000 Received: from mail-wr1-x42a.google.com ([2a00:1450:4864:20::42a]) by magus.postgresql.org with esmtps (TLS1.3:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.92) (envelope-from ) id 1nsV1X-00033H-Ad for pgsql-odbc@postgresql.org; Sat, 21 May 2022 19:44:29 +0000 Received: by mail-wr1-x42a.google.com with SMTP id r23so15629602wrr.2 for ; Sat, 21 May 2022 12:44:27 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=mime-version:from:date:message-id:subject:to; bh=4zH2sBsI7mE6a3kd6hIBQYghXmOXWI1gBNlVO6wOg6E=; b=CzrrGL7rrNSKQ7EBHUpOgUfwdCtirg21xCcNzjH0hX1HHUJshvsVBGpCkggTz7KIhV 2cZxOSiWTs3GGm6egY/69kc+y64O1Hax156tpYof3a0ItBsOeCb9YTIq6xEXEtZGnmMa s4s2fyAFlfum3Ke0jefc7GemIOvBMhniJBfQE6LKzHVf6dSMEikLnHTfiuHvTwzxr3lM GsIz5ymlpRVuFHHMnsyBLbxyyzmiD0iF9t+sTndJsDrIk+J8KxEo2M6QAd1a+IXpzNEF 6HGSQ2tyrcY6dK95gQj/u1ZhfNCUmnT73Ith1ar7kKkbnTfIW3il1FXyTdmkUjbulAP7 73jw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=4zH2sBsI7mE6a3kd6hIBQYghXmOXWI1gBNlVO6wOg6E=; b=kAASFbW61shgLrdBopo+dbtKPbtRUAPVZFVAEk+60I2oPbUO77OsclG16OA8VSY1QG FY6dmIPaFKY4mfLBiPF3PXgc/VgathKfr7rYUpNg6AcY9rqxNhg+cnvZEav9bwrDPZEn lRXksAF3Fu4SbUkkxplC60xtQiuYZdNw1WGY3pelCLPTic3xmpgRee4xo676YB1GvNWI hB4Vq7ZJj2TUj+6w96+MOLhxaL7inK6gRI/cP+QZR82Xgbj5YQ/o1J9j27HwAQdM8IL7 PBLa0nfbOoV7fhMNM0OrAZYofnFLec0CBJddx6CFX7MMWTO/FTYg7NBK9cKy5+7Y/FKl dMdA== X-Gm-Message-State: AOAM533vzGupAjh1ugYEt99rtGrK42mrCMDui1IcgwpertEDAsl3KZIn UXM2ZSm1BDni2jl8StfUlBDEohqaPR8zRE8XlZnPBGmY2hA= X-Google-Smtp-Source: ABdhPJzEJKZUrbpZLm3X86MfveVL/2OwnNcw6x1L6ZizcXMxY1rsEptO4wAuAYZi26RSVqGj0WATImlDPK3VsmZUeWE= X-Received: by 2002:adf:f8ce:0:b0:20e:5ecf:d1ca with SMTP id f14-20020adff8ce000000b0020e5ecfd1camr12925946wrq.143.1653162265376; Sat, 21 May 2022 12:44:25 -0700 (PDT) MIME-Version: 1.0 From: hemant Kawalkar Date: Sun, 22 May 2022 01:14:12 +0530 Message-ID: Subject: Support Postgresql Stored Procedure execution error in VBA To: pgsql-odbc@postgresql.org Content-Type: multipart/alternative; boundary="000000000000957d0605df8ad5bc" List-Id: List-Help: List-Subscribe: List-Post: List-Owner: List-Archive: Archived-At: Precedence: bulk --000000000000957d0605df8ad5bc Content-Type: text/plain; charset="UTF-8" Dear All, 0 I am trying to execute a Postgresql stored procedure in Excel VBA, but I am getting the following error: *duplicatefilechecksp is procedure(); error while executing the query.* PFB code : Dim conSQL As New ADODB.ConnectionDim cmd As New ADODB.CommandDim Rs As New ADODB.RecordsetDim strErrDescSP As String ' Set Error Description of SP With cmd .ActiveConnection = mod_General.RecturnMSSQLCon .CommandType = adCmdStoredProc .CommandText = "duplicatefilechecksp_test" .ExecuteEnd With Kindly assist me with query. regards, Hemant Virus-free. www.avast.com <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> --000000000000957d0605df8ad5bc Content-Type: text/html; charset="UTF-8" Content-Transfer-Encoding: quoted-printable
Dear Al= l,

0

I am trying to execute a Postgresql stored procedure in Excel VBA, but I a= m getting the following error:

duplicatefilechecksp is procedure(); error= while executing the query.


PFB code :

Dim conSQL          As New ADODB.=
Connection
Dim cmd             As New AD=
ODB.Command
Dim Rs              As New AD=
ODB.Recordset
Dim strErrDescSP    As String    =
           ' Set Error Description of =
SP


With cmd
    .ActiveConnection =3D mod_General.RecturnMSSQLCon
    .CommandType =3D adCmdStoredProc
    .CommandText =3D "duplicatefileche=
cksp_test"
    .Execute
End With
=

Kindly assi=
st me with query.

=
regards,
Hemant

3D"" Virus-free. www.avast.com
--000000000000957d0605df8ad5bc--