WorkbookBase.Connections Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Получает коллекцию подключений между книгой и источником данных.
public:
property Microsoft::Office::Interop::Excel::Connections ^ Connections { Microsoft::Office::Interop::Excel::Connections ^ get(); };
public Microsoft.Office.Interop.Excel.Connections Connections { get; }
member this.Connections : Microsoft.Office.Interop.Excel.Connections
Public ReadOnly Property Connections As Connections
Значение свойства
A Microsoft.Office.Interop.Excel. Connections коллекции, содержащей соединения между книгой и источником данных.
Примеры
В следующем примере кода добавляется новое подключение к данным в указанный CSV-файл. Далее в примере выполняется итерацию всех подключений, существующих в книге, и отображается имя, тип и описание каждого подключения. В этом примере требуется CSV-файл с именем SalesData.csv в корне диска C. CSV-файл должен содержать данные, разделенные запятыми. При выполнении этого примера Excel запускает мастер импорта текста. Выполните действия, описанные в этом мастере, чтобы создать подключение данных к CSV-файлу.
Этот пример предназначен для настройки на уровне документа.
private void WorkbookConnections()
{
Excel.WorkbookConnection myConnection =
this.Connections.AddFromFile(@"C:\SalesData.csv");
myConnection.Description = "Data stored in a CSV file.";
foreach (Excel.WorkbookConnection connection in this.Connections)
{
MessageBox.Show(
"Connection Name: " + connection.Name
+ "\r\nConnection Type: " + connection.Type.ToString()
+ "\r\nDescription: " + connection.Description);
}
}
Private Sub WorkbookConnections()
Dim myConnection As Excel.WorkbookConnection = _
Me.Connections.AddFromFile("c:\SalesData.csv")
myConnection.Description = "Data stored in a CSV file."
For Each connection As Excel.WorkbookConnection In Me.Connections
MessageBox.Show(connection.Name + " " + connection.Type.ToString() _
+ " " + connection.Description)
Next
End Sub