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