如何在MS Access表单中添加按钮打开服务器指定路径PDF文件
实现Access表单按钮打开指定PDF文件
完全可以实现,按以下步骤操作:
- 打开目标表单的设计视图,从控件工具箱中添加一个按钮控件。
- 右键点击该按钮,选择「事件生成器」,进入VBA代码编辑器。
- 在按钮的
Click事件中插入以下代码:
Private Sub cmdOpenPDF_Click() Dim filePath As String ' 读取表单上[File Location]字段的文件路径 filePath = Me![File Location] ' 验证路径有效性与文件存在性 If Nz(filePath, "") <> "" And Dir(filePath) <> "" Then ' 调用系统默认PDF阅读器打开文件 FollowHyperlink filePath Else MsgBox "文件路径无效或文件不存在!", vbExclamation End If End Sub
代码说明:
Nz(filePath, ""):处理字段为空的情况,避免报错Dir(filePath):检查指定路径下的文件是否存在FollowHyperlink:Access内置方法,会自动调用系统默认程序打开对应格式的文件
最后记得将按钮的名称改为cmdOpenPDF(或对应代码里的名称),保存后切换到表单视图测试即可。
内容的提问来源于stack exchange,提问作者Evans_Reid
相关产品推荐
相关产品推荐

