使用 CreateNewDocument 方法可以创建与指定的超链接相关联的新文档。
expression.CreateNewDocument(FileName, EditNow, Overwrite)
expression 必需。返回“应用于”列表中的一个对象的表达式。
FileName 必需 String 型。字符串表达式,用来标识文档的名称和路径。文件名所用的扩展名决定了文档格式的类型。可以创建 HTML (*.htm)、Microsoft Active Server Pages (*.asp)、Microsoft Excel (*.xls)、Microsoft IIS (*.htx, *.idc)、MS-DOS 文本 (*.txt)、超文本格式 (*.rtf) 或 Microsoft 数据访问页 (*.html) 来输出数据。模块只能输出为 MS-DOS 文本格式。数据访问页只能以 HTML 格式输出。Microsoft Internet Information Server 和 Microsoft Active Server 格式仅适用于表、查询和窗体。注意:如果未提供文件扩展名,则假定为数据访问页 (.html)。如果未指定目录,则使用默认的数据库目录。该目录由“选项”对话框中的设置确定。
EditNow 必需 Boolean 型。Boolean 型值,该参数为 True 时,在“设计”视图中打开文档;为 False 时,在指定的数据库目录中保存新文档。默认值为 True。
Overwrite 必需 Boolean 型。Boolean 型值,该参数为 True时,覆盖参数 filename 指定的文档;为 False 时,则需要参数 filename 指定一个新的文件名。默认值为 False。
CreateNewDocument 方法提供了以编程方式创建与控件中超链接相关的文档的方法。
下面的示例利用超链接控件的 Click 事件。当用户单击窗体上名为“GenerateReport”的超链接控件时,该事件新建一个名为“Report.txt”的文件。新文件会打开以便进行编辑。如果在驱动器 C 上已经有了一个名为“Report.txt”的文件,则旧文件会被新文件取代。
Private Sub GenerateReport_Click()
ActiveControl.Hyperlink.CreateNewDocument _
"C:\Report.txt", EditNow:=True, Overwrite:=True
End Sub