Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL / Visual Basic

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL

3 сообщений из 3, страница 1 из 1

Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL

#39535116

kominet

Гость

Приветствую!
Прошу помощи, сам не смог не найти ответа на форуме не разобраться.
Проблема следующая: Необходимо в Excell получить результат выполнения хранимой процедуры от MS SQL.
Результат запроса на базе SELECT передаётся на ура но вот результат запроса с запуском хранимой процедуры никак не хочет работать
Код процедуры [CheckRuleList] заканчивается строкой:

Код: sql

SELECT @ErrorText AS RCH

и возвращает где @ErrorText простая строковая переменная

Макрос В EXCELL:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.

Dim cn As ADODB.Connection
Dim rst As ADODB.Recordset

cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=LotsiaDB;Data Source=SERVERSQL" 'строка соединения
cn.Open
rst.Open "SELECT testC FROM [LotsiaDB].[LSDBO].[TestTable]", cn 'Вот так работает

'rst.Open "EXEC [ServerSQL].[LotsiaDB].[LSDBO].[CheckRuleList] 100008615600086,100000346000055", cn 'а вот так не работает

Sheets("Лист1").Range("A1").CopyFromRecordset rst
rst.Close
cn.Close

Set rst = Nothing
Set cn = Nothing

End Sub

когда в макросе прописываю

Код: vbnet

rst.Open "EXEC [ServerSQL].[LotsiaDB].[LSDBO].[CheckRuleList] 100008615600086,100000346000055", cn 'а вот так не работает

При попытке выполнения VBA выдаёт ошибку "Операция не допускается, если объект закрыт" на строку:

Код: vbnet

Sheets("Лист1").Range("A1").CopyFromRecordset rst

Подскажите пожалуйста, что не так у меня в коде.

...

Рейтинг:

0 / 0

12.10.2017, 02:08

| Ответить | Цитировать | Написать

Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL

#39535131

HandKot

Участник

Откуда: Sergiev Posad

Сообщения: 3 122

Рейтинг: 0 / 0

kominet, чаще всего проблемы в том, что в хранимой процедуре не стоит SET NOCOUNT ON
Проверьте.
Или же можно сделать так: если рекордсет закрыт, то надо сделать

Код: vbnet

rst.NextRecordset

...

Рейтинг:

0 / 0

12.10.2017, 06:50

| Ответить | Цитировать | Написать

Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL

#39535142

kominet

Гость

HandKot, Спасибо большое! Дело оказалось действительно в отсутствии в хранимой процедуре SET NOCOUNT ON

...

Рейтинг:

0 / 0

12.10.2017, 07:51

| Ответить | Цитировать | Написать

3 сообщений из 3, страница 1 из 1

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&msg=39535131&tid=2155202]:	0ms
get settings:	11ms
get forum list:	14ms
check forum access:	4ms
check topic access:	4ms
track hit:	40ms
get topic data:	13ms
get forum data:	3ms
get page messages:	51ms
get tp. blocked users:	2ms
others:	265ms

total:	407ms