ConnectString 属性

       

返回指定邮件合并数据源的连接字符串。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