Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ексел: как запихнуть это в commandtext ADODB.Command? / 5 сообщений из 5, страница 1 из 1
14.03.2005, 14:37:15
    #32958879
Blob
Blob
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ексел: как запихнуть это в commandtext ADODB.Command?
Надо прочитать некую инфу из SQL Server в лист Ексел. Читаю по строкам объекта ADO.Recordset. Проблема с самим запросом. Пишу его в свойство commandtext объекта ADODB.command. Если написать простое предложение SELECT, работает. Но надо получить резалтсет вот такого запроса, где создается врем. таблица:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
declare @hotelname as varchar( 1000 )
declare @sposinc AS int

create table #nomera_spos (
	sposinc int,
	sposnote varchar( 128 ),
	sposnote2 varchar( 128 ),
	hotelname varchar ( 1000 ))
INSERT INTO #nomera_spos (sposinc, sposnote, sposnote2, hotelname)
				
SELECT DISTINCT dbo.spos.inc, и т.д.
- а VBA ругается на синтаксис; похоже знаки '#' надо как-то выделять кавычками, посоветуйте.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2005, 14:51:02
    #32958923
Va1entin
Va1entin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ексел: как запихнуть это в commandtext ADODB.Command?
Не надо # брать в кавычки.
Проверьте систаксис INSERT INTO.
Для этого подключитесь к серверу через QA и выполните запрос.
А вообще лучше напишите хранимую процедуру и выполняйте вычисления в ней.

Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2005, 14:52:42
    #32958935
Va1entin
Va1entin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ексел: как запихнуть это в commandtext ADODB.Command?
Опечатка: синтаксис.

Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2005, 14:59:31
    #32958954
Alexey Kudinov
Alexey Kudinov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ексел: как запихнуть это в commandtext ADODB.Command?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Option Explicit

Private Sub Command1_Click()
Dim s As String
s = "declare @hotelname as varchar(1000)" _
     & "declare @sposinc AS int" _
     & "create table #nomera_spos (" _
     & "sposinc int, " _
     & "sposnote varchar(128), " _
     & "sposnote2 varchar(128), " _
     & "hotelname varchar (1000)) " _
     & "INSERT INTO #nomera_spos (sposinc, sposnote, sposnote2, hotelname) " _
     & "SELECT DISTINCT dbo.spos.inc, и т.д."
Debug.Print s
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.03.2005, 17:05:42
    #32959356
Blob
Blob
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ексел: как запихнуть это в commandtext ADODB.Command?
to Alexey KudinovСпасибо, Алексей! Я и забыл, что после _ надо амперсанд ставить. Щас попробую
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Ексел: как запихнуть это в commandtext ADODB.Command? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 344ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2168104]:
 0ms
get settings:
 7ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 71ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 24ms
get tp. blocked users:
 1ms
others: 220ms
total:  344ms
x
x
Закрыть


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