powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Выполнение SQL-запроса в ADO
13 сообщений из 13, страница 1 из 1
Выполнение SQL-запроса в ADO
    #36289277
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго времени суток, господа!
Встал следующий вопрос ...
Скриптом я подсоединился к СКЛ серверу.
Вот он, работает )))

Dim cn As New ADODB.Connection

Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB;Data Source=sql2003;" & _
"Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=test"


cn.Close

Вопрос, как выполнить SQL-запрос где описать переменную, какого она должна быть типа?

запрос в квери-аналайзере выглядит вот так:
use DataBaseName
go
sp_helpfile

Заранее всем спасибо!
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289290
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
dim tm as New ADODB.Recordset

set tm=cn.Execute "use DataBaseName sp_helpfile"

'обработка рекордсета, см. его свойства и методы

tm.Close
set tm=Nothing
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289295
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.foxSet cn = New ADODB.Connection

Это лишнее.

либо так:
Код: plaintext
1.
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289345
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro,

Спасибо за помощь, но оно не работает ...
на строку:
set tm=cn.Execute "use DataBaseName sp_helpfile"
даёт вот такую ошибку:
Compile error:
Expected: end of statment
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289347
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
missing.fox,
Именно на вот это содержание:
"use DataBaseName sp_helpfile"
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289351
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.foxShocker.Pro,

Спасибо за помощь, но оно не работает ...
на строку:
set tm=cn.Execute "use DataBaseName sp_helpfile"
даёт вот такую ошибку:
Compile error:
Expected: end of statment

ну да
Код: plaintext
set tm=cn.Execute("use DataBaseName sp_helpfile")
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289374
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да, спасибо, работает, но опять не всё, к сожалению ...
запрос "use DataBaseName sp_helpfile" выдаёт SQL-ошибку, аналогичную квери-аналайзеру: Line 1: Incorrect syntax near 'sp_helpfile'.

вот такой запрос работает корректно:
use DataBaseName
go
sp_helpfile

а вот такой тоже не пройдёт:
use DataBaseName go sp_helpfile

Прекрасно понимаю, что это уже не вопрос по ADO и VB, но всё же, есть идеи по поводу исполнения этого запроса?
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289383
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

Код: plaintext
1.
cn.Execute "use DataBaseName"
set tm=cn.Execute("sp_helpfile")
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289418
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

А еще можно (нужно) так:
Код: plaintext
set tm=cn.Execute("use DataBaseName exec sp_helpfile")

соответственно в QA можно (нужно) писать:
Код: plaintext
1.
use DataBaseName
exec sp_helpfile

без всякого GO
вообще-то положено выполнять процедуры командой exec
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289419
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

А если надумаете более плотно работать с процедурами с параметрами - изучайте объект ADODB.Command
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289421
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо, сработало!!!
Но результатом срабатывания, оказалась переменная tm со множеством значений.
зто не есть плохо для меня, но я в этой массе значений так и не смог найти ничего из того, что мне надо ... Тогда, как квери-аналайзер на аналогичный запрос предоставляет вот что:
DataBaseName_Data 1 e:\MSSQL\data\test_Data.MDF PRIMARY 1024 KB Unlimited 10% data only
DataBaseName_Log 2 e:\MSSQL\data\test_Log.LDF NULL 1024 KB Unlimited 10% log only

Есть идеи, как получить эти данные?
Заранее спасибо!!!
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289427
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
missing.fox,

Эх. Неужели лень хоть раз выделить ключевое слово и нажать F1
Я скоро уйду, кто вам будет каждый шаг-то рассказывать?
Я же вам написал выше
Код: plaintext
'обработка рекордсета, см. его свойства и методы

Эх.

Короче:
Код: plaintext
1.
2.
3.
Do Until tm.EOF
  debug.print tm("name"),tm("size")
  tm.MoveNext
Loop
...
Рейтинг: 0 / 0
Выполнение SQL-запроса в ADO
    #36289460
missing.fox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
СПАСИБО ОГРОМНОЕ!!!
Хороших Вам праздников, а я работать буду продолжать ...
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Выполнение SQL-запроса в ADO
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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