Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Экспорт данных их Excel в Sql Server без цикла. VBS (http://forum.oszone.net/showthread.php?t=247219)

LilLoco 19-11-2012 12:15 2028170

Экспорт данных их Excel в Sql Server без цикла. VBS
 
Добрый день, Уважаемые!

Интересует собственно вопрос переноса данных их Excel в SqlServer без цикла. Если быть точнее интересует вопрос о возможности такой реализации. Можно ли что нибудь придумать? Не хотелось бы пробегать по каждой строке файла, и вставлять.

Если такое возможно, подскажите материальчик который можно почитать, или же примеры реализации. Спасибо.

ferget 19-11-2012 12:31 2028174

не совсем понятно, что нужно
Вот пример, лист excel экспортируется в Recordset

Код:

Sub m_4()
Dim oConnection As ADODB.Connection
Dim oRecordset As ADODB.Recordset
Set oConnection = CreateObject("ADODB.Connection")
Set oRecordset = CreateObject("ADODB.Recordset")
oConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=E:\_Рабочий стол\Таблица для переноса.xls;" & _
        "Extended Properties=""Excel 8.0;HDR=Yes;"";"
oRecordset.Open "Select * FROM [Лист1$]", oConnection
'Проверка, что находится в Recordset
Dim oQueryTable As Excel.QueryTable
Set oQueryTable = ActiveSheet.QueryTables.Add(oRecordset, Range("A1"))
oQueryTable.Refresh
oConnection.Close
End Sub


LilLoco 19-11-2012 12:55 2028183

ferget, А можно ли теперь этот Recordset вставить в таблицу на Sql Server, не пробегаясь циклом по всем строчкам?


Время: 05:36.

Время: 05:36.
© OSzone.net 2001-