返回指定邮件合并数据源的连接字符串。String 类型,只读。
本示例创建一个新的主文档,并从名为“Northwind.mdb”的 Microsoft Access 数据库附加“客户”表。连接字符串显示在一个消息框中。
Dim docNew As Document
Set docNew = Documents.Add
With docNew.MailMerge
    .MainDocumentType = wdFormLetters
    .OpenDataSource _
        Name:="C:\Program Files\Microsoft Office\Office" & _
        "\Samples\Northwind.mdb", _
        LinkToSource:=True, AddToRecentFiles:=False, _
        Connection:="TABLE Customers"
    MsgBox .DataSource.ConnectString
End With