VPF::Ошибка выполнения ХП из VBA - Форум программистов

shefus

Дата 27.11.2010, 14:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 11.11.2010

Репутация: нет
Всего: нет

Добрый день!

Есть ХП:

Код


ALTER PROCEDURE dbo.[1111]
(@parN int)
AS 
 SET NOCOUNT ON
DELETE FROM dbo.[Cross]
WHERE     ([№] = @parN)

Вызываю ее из проекта access:
1. Непосредственно из окна проекта - всё ок. Запрашивает параметр и удаляет

2. Из VBA:

Код


Dim cmd As ADODB.Command
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim p1, p2, p3 As ADODB.Parameter
  Set cnn = CurrentProject.Connection
  Set cmd = New ADODB.Command
  
    cmd.ActiveConnection = cnn
    cmd.CommandText = "1111"
    cmd.CommandType = adCmdStoredProc
       
    Set p3 = cmd.CreateParameter("@parN", adInteger, adParamInput, , -1637037225)
    cmd.Parameters.Append p3
    
   Set rs = cmd.Execute()

вылетает ошибка:

Run-time error '-2147217900(80040e14)':
Ошибка синтаксиса или нарушения прав доступа

В чем проблема?

PS к SQL подключаюся под SA

shefus

Дата 27.11.2010, 15:51 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 11.11.2010

Репутация: нет
Всего: нет

Пардон, ошибку нашёл

Zloxa

Дата 28.11.2010, 12:32 (ссылка)

(нет голосов)

Загрузка ...

Чо?

Профиль
Группа: Завсегдатай
Сообщений: 3473
Регистрация: 12.9.2008

Репутация: 10
Всего: 161

Цитата(shefus @ 27.11.2010, 14:23

)

cmd.CommandText = "1111"

попробуйте

Код


   cmd.CommandText = "dbo.[1111]"

--------------------

Достоверно известно, что 89% людей доверяют статистике взятой с потолка smile

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| MS SQL Server \| Следующая тема »