1 (изменено: Roman Mejtes, 2012-07-30 08:22:50)

Тема: VBS, SQL: ADO.Connection

Всем привет! давно не заходил на этот форум )

вопрос такой, существует объект ADO.Connection
с помощью него вызывается через EXECUTE хранимая процедура, процедура в процессе выполнения выводит с помощью SQL оператора PRINT сообщения (который видно к примеру в Visual Studio или другой среде, где можно писать запросы, процедуры и так далее), но как получить этот ответ в VBS или на крайняк в VB?
вот такой вопрос, на сайте инфы про это не нашел, в инете поискал, не очень понял, кто то писал, что нужно это завязывать с RAISERROR, но там какой то перевод статьи наркоманы делали, так что вообще ни чего не понять.

надеюсь, кто то уже озадачивался этим вопросом.

2

Re: VBS, SQL: ADO.Connection

давно не заходил на этот форум )

Точно. Теперь надо добавлять в заголовок темы префикс языка программирования. Добавляйте.

кто то писал, что нужно это завязывать с RAISERROR, но там какой то перевод статьи наркоманы делали, так что вообще ни чего не понять.

От самих авторов — по-русски:

PRINT (Transact-SQL)
RAISERROR (Transact-SQL)

Вполне понятно.

Советуют попробовать:

Wscript.Echo Connection.Errors.Count

For I = 0 To Connection.Errors.Count - 1
      Wscript.Echo oConn.Errors(I).Description
Next

3

Re: VBS, SQL: ADO.Connection

а можно пример работы с SQL?

4

Re: VBS, SQL: ADO.Connection

Какой пример и с каким SQL?

5

Re: VBS, SQL: ADO.Connection

вообще пример работы с ms SQL из VBS - вывод таблицы в файл, Update
а с хранимыми процедурами из скрипта можно работать?

6

Re: VBS, SQL: ADO.Connection

qwertEHOK пишет:

вообще пример работы с ms SQL из VBS - вывод таблицы в файл, Update

Пример из «The Portable Script Center»:

Connect to a SQL Server Database

Const adOpenStatic = 3
Const adLockOptimistic = 3

Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet = CreateObject("ADODB.Recordset")

objConnection.Open _
    "Provider=SQLOLEDB;Data Source=atl-sql-01;" & _
        "Trusted_Connection=Yes;Initial Catalog=Northwind;" & _
             "User ID=fabrikam\kenmyer;Password=34DE6t4G!;"

objRecordSet.Open "SELECT * FROM Customers", _
        objConnection, adOpenStatic, adLockOptimistic

objRecordSet.MoveFirst

Wscript.Echo objRecordSet.RecordCount

То есть, ничего сложного там нет. Задаёте корректную строку подключения, далее работаете как и с любым другим провайдером.

qwertEHOK пишет:

а с хранимыми процедурами из скрипта можно работать?

VBScript SQL execute stored procedure - Поиск в Google.