ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA Excel загрузить на MSSQL
12 сообщений из 12, страница 1 из 1
VBA Excel загрузить на MSSQL
    #39698908
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
Ребят, поделитесь опытом
Есть Excel, у меня на компьютере
C:\test.xlsx

Есть таблица dbo.test на сервере MS SQL 2008

Есть ли возможность через VBA без OPENROWSET(BULK загрузить целиком файл, не по строчкам?
...
Рейтинг: 0 / 0
06.09.2018, 11:36
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39698954
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
Focha,

Список методов
...
Рейтинг: 0 / 0
06.09.2018, 12:46
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39699747
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
HandKotFocha,

Список методов
я же написал
Focha

Есть ли возможность через VBA без OPENROWSET(BULK загрузить целиком файл, не по строчкам?
...
Рейтинг: 0 / 0
07.09.2018, 16:03
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39700824
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Focha,

Код: sql
1.
BULK INSERT Test FROM C:\test.xlsx WITH (FIRSTROW = ?, FIELDTERMINATOR = ?,ROWTERMINATOR =?, TABLOCK)


Как-то так, вместо вопроса поставить свои значения параметров.
...
Рейтинг: 0 / 0
11.09.2018, 11:40
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39700915
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
big-dukeFocha,

Код: sql
1.
BULK INSERT Test FROM C:\test.xlsx WITH (FIRSTROW = ?, FIELDTERMINATOR = ?,ROWTERMINATOR =?, TABLOCK)


Как-то так, вместо вопроса поставить свои значения параметров.

к сожалению я не могу воспользоваться инструментами MSSQL
...
Рейтинг: 0 / 0
11.09.2018, 13:46
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39701866
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Focha,
ADO DB вам можно использовать то ?
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
strSQL="BULK INSERT  ...."
With objCommand
        .ActiveConnection = objConnection
        .CommandType = adCmdText
        .CommandText = strSQL
        .Execute
    End With
...
Рейтинг: 0 / 0
13.09.2018, 09:39
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39732320
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
big-dukeFocha,
ADO DB вам можно использовать то ?
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
strSQL="BULK INSERT  ...."
With objCommand
        .ActiveConnection = objConnection
        .CommandType = adCmdText
        .CommandText = strSQL
        .Execute
    End With



вот и вернулся я к этому вопросу, я не очень понимаю вашу короткую конструкцию, мне надо с моего компьютера загрузить на сервер.
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private Sub test()
        Dim cn As Object
        Set cn = CreateObject("ADODB.Connection")
            cn.CommandTimeout = 600
            cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;server=***"
            cn.Open

sql = ""
sql = sql & Chr(10) & "BULK INSERT ad.temp.bulk_test from 'C:\test.csv'"
sql = sql & Chr(10) & "with("
sql = sql & Chr(10) & "         FIELDTERMINATOR = ';',"
sql = sql & Chr(10) & "         ROWTERMINATOR = ';'"
sql = sql & Chr(10) & "    )"
cn.execute sql     
End Sub



Пишет:
код ошибки операционной системы 3 системе не удается найти указанный путь
...
Рейтинг: 0 / 0
13.11.2018, 11:52
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39732323
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
Microsoft SQL Server 2008 R2 (SP2) - 10.50.4297.0 (X64) Nov 22 2013 17:24:14 Copyright (c) Microsoft Corporation Enterprise Edition (64-bit) on Windows NT 6.1 <X64> (Build 7601: Service Pack 1)
...
Рейтинг: 0 / 0
13.11.2018, 11:53
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39732481
stepochka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stepochka
Гость
Fochaошибки операционной системы 3 системе не удается найти указанный путь
Где файлик то лежит?
Из примера следует, что должен лежать на диске C: сервера, но наверное лежит на диске C: машины откуда запускаете скрипт
...
Рейтинг: 0 / 0
13.11.2018, 15:21
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39732836
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
stepochkaFochaошибки операционной системы 3 системе не удается найти указанный путь
Где файлик то лежит?
Из примера следует, что должен лежать на диске C: сервера, но наверное лежит на диске C: машины откуда запускаете скрипт
у меня на компьютере, я знаю, что для сервера команда BULK INSERT файл должен быть на сервере, я тему создал как раз, в разделе Microsoft Office, так как реализация мне нужна через VBA.
Проблема в загрузке файла почти 1 мл строк на сервер, по строчкам это долго
...
Рейтинг: 0 / 0
14.11.2018, 10:11
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39732959
stepochka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stepochka
Гость
Fochaу меня на компьютере, я знаю, что для сервера команда BULK INSERT файл должен быть на сервере,
Файл должен быть там, откуда сервер сможет его забрать/обработать, на сеть файл положите

Код: vbnet
1.
2.
BULK INSERT Sales.Orders
FROM '\\SystemX\DiskZ\Sales\data\orders.dat';
...
Рейтинг: 0 / 0
14.11.2018, 13:02
| Ответить | Цитировать | Написать  
VBA Excel загрузить на MSSQL
    #39733028
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
stepochkaFochaу меня на компьютере, я знаю, что для сервера команда BULK INSERT файл должен быть на сервере,
Файл должен быть там, откуда сервер сможет его забрать/обработать, на сеть файл положите

Код: vbnet
1.
2.
BULK INSERT Sales.Orders
FROM '\\SystemX\DiskZ\Sales\data\orders.dat';


вообщем я понял, без сервера большой объем данных загрузить нельзя в таблицу
...
Рейтинг: 0 / 0
14.11.2018, 14:37
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA Excel загрузить на MSSQL
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=39700915&tid=2172200]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 60ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 2ms
others: 290ms
total:  455ms
созд. / загр.: 455ms
x
x
Закрыть


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