主题：如何获取当前连接的外部数据源名称？（仅使用一个外部数据源）

'列出所有外部连接源名称及字符串

For Each cn As Connection In Connections

   MessageBox.Show("名称:" & cn.Name)

  MessageBox.Show("链接字符串:" & cn.ConnectionString)

Next