HDR вызывает ошибку "Невозможно найти устанавливаемый ISAM"

Скрипт · Регистрация: 15.09.2012

Author24 — интернет-сервис помощи студентам

Ошибка возникает в строке 18 (см. макрос ниже).
Если параметр "HDR" удалить (строка 15), то код работает. В чём причина?

Макрос

Visual Basic

Sub Procedure_1()
 
    Const myFullName As String = "C:\Users\User\Desktop\База данных.xlsx;"
 
    'Библиотека "Microsoft ActiveX Data Objects версия Library".
    Dim myConnection As ADODB.Connection
    
    
    'Создание объекта "Connection".
    Set myConnection = CreateObject(Class:="ADODB.Connection")
    
    'Указание полного имени Excel-файла и версии Excel-файла.
    myConnection.ConnectionString = _
        "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & myFullName & _
        "Extended Properties=Excel 12.0 Xml;HDR=YES"
    
    'Открытие Excel-файла.
    myConnection.Open
 
End Sub

Аксима · 03.10.2013, 18:02

Скрипт, если какому-либо аргументу строки подключения передается несколько параметров, то эти параметры должны быть не только разделены точкой с запятой, но и заключены в кавычки:

"Extended Properties=""Excel 12.0 Xml;HDR=YES"""

С уважением,

Aksima

Аксима 6081 / 1325 / 195 Регистрация: 12.12.2012 Сообщений: 1,023
	03.10.2013, 18:02	2
	Скрипт, если какому-либо аргументу строки подключения передается несколько параметров, то эти параметры должны быть не только разделены точкой с запятой, но и заключены в кавычки: "Extended Properties=""Excel 12.0 Xml;HDR=YES""" С уважением, Aksima 1

Опции темы