Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Связь с SQL Server / 8 сообщений из 8, страница 1 из 1
05.05.2007, 14:46
    #34506889
RQuit
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
Здрвствуйте!
Раньше я писала сценарии на JScript, но теперь настала необходимость использовать VB.
В JScript подключение к базе:
MyCon=Server.CreateObject("ADODB.Connection");
MyCon.Open("firmRIA","sa","sa");//firmRIA-настроен через источники данных-системный DSN
var MyRec=Server.CreateObject("ADODB.Recordset");
var strSQL1="SELECT* FROM Dishes";
MyRec.Open(strSQL1, MyCon);

А на VB мне необходимо запустить процедуру на SQL Servere. Но возникает какая-то ошибка:

Set MyCon = Server.CreateObject("ADODB.Connection")
Set MyRec=Server.CreateObject("ADODB.Command")
Set MyRec.ActiveConnection = MyCon
MyRec.CommandText = "{call DeleteInsertPostavschikiFromXML sodergimoe}"
//MyRec.CommandText = "exec DeleteInsertPostavschikiFromXML sodergimoe"-тоже не получается
MyRec.Execute
'MyRec.ActiveConnection.Close
Set MyRec=nothing

Буду очень признательна за помощь.
...
Рейтинг: 0 / 0
05.05.2007, 16:12
    #34506985
Magnus23
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
Для начала. Точное описание ошибки в студию. Совими силами переводить не нужно.

На основе чего создатся соеденение? Connections string? DSN?
Где это в коде?

Потом, как минимум нужно его открыть Connection.Open



Magnus
...
Рейтинг: 0 / 0
05.05.2007, 16:30
    #34507008
RQuit
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
Дело в том,что сам сценарий вызывается у меня из 1С,а там ошибка:
Компонента V7Plus : Ошибка исполнения HTTP запроса сервером, код - 500
HTTP.ОтправитьДляОбработки("http://localhost/ria/Files/fileVBfor1C.asp",IFile1, 1, ответ, 2);
{Глобальный модуль(4310)}: Ошибка при выполнении метода объекта компоненты C:\Program Files\1Cv77\BIN\v7plus.dll

А ошибка эта возникает именно из-за кода соединения с БД.

MyCon.Open "firmRIA","sa","ria21"
...
Рейтинг: 0 / 0
05.05.2007, 16:40
    #34507016
RQuit
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
Дело в том,что сам сценарий вызывается у меня из 1С,а там ошибка:
Компонента V7Plus : Ошибка исполнения HTTP запроса сервером, код - 500
HTTP.ОтправитьДляОбработки("http://localhost/ria/Files/fileVBfor1C.asp",IFile1, 1, ответ, 2);
{Глобальный модуль(4310)}: Ошибка при выполнении метода объекта компоненты C:\Program Files\1Cv77\BIN\v7plus.dll

А ошибка эта возникает именно из-за кода соединения с БД.

MyCon.Open "firmRIA","sa","ria21"
...
Рейтинг: 0 / 0
05.05.2007, 17:46
    #34507096
Magnus23
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
А можно все-таки уточнить строку на которой ошибка? И попытатся отловить ориганальное сообщение об ошибке? Т.е. сделать в процедуре VB свой хендлер и писать ошибку куданибудь в файл что ли... Это скрипт? На страницу вывести можно?

В начале вы говорите что ошибка при попытке выполнения команды, а теперь на соеденении?


Magnus
...
Рейтинг: 0 / 0
05.05.2007, 19:56
    #34507211
RQuit
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
Вот это у меня работает нормально:
Dim MyCon
Dim MyRec
Set MyCon = Server.CreateObject("ADODB.Connection")
MyCon.Open "firmRIA", "sa", "sa"
Set MyRec=Server.CreateObject("ADODB.Command")
Set MyRec.ActiveConnection = MyCon


MyRec.CommandText = "insert into postavschiki(NameP) values('rrr')"

MyRec.Execute
MyRec.ActiveConnection.Close
Set MyRec=nothing

Но если я пытаюсь вызвать хранимую процедуру:
MyRec.CommandText = "exec DeleteInsertPostavschikiFromXML sodergimoe"
то возникает ошибка.
Отследить её нет возможности, так как из 1с сценарию с данным кодом передаётся бинарный поток(сама тяжело это понимаю).
Может я не правильно осуществляю вызов функции.
...
Рейтинг: 0 / 0
06.05.2007, 07:32
    #34507456
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
попробуйте сделать это в обычном vbs-скрипте
...
Рейтинг: 0 / 0
06.05.2007, 10:24
    #34507505
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Связь с SQL Server
попробуйте так
Код: plaintext
1.
2.
3.
MyRec.CommandText ="DeleteInsertPostavschikiFromXML sodergimoe"
Myrec.CommandType =  4 
MyRec.Execute
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Связь с SQL Server / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]