使用子窗体在 Access 中选择和播放视频

Question

我正在开发一个将用户链接到培训视频的数据库。

初级形式“2_CCC”有windows media player插件。一切正常。

子表单包含所有视频文件。

问题是我无法成功地将地址从子表单传递到媒体播放器。该地址存储在名为“视频”的文本框中。

这是我所拥有的：

Public Sub PlaybButton_Click()

Dim videoaddress As String

videoaddress = Forms![2_CCC]![2_CCC_Subform].Form![Video]

Forms![2_CCC]!WMP.URL = videoaddress 

End Sub

我收到一条错误消息“自动化错误”。

所以我重写了这样的代码：

Public Sub PlaybButton_Click()

Forms![2_CCC]!WMP.URL = Forms![2_CCC]![2_CCC_Subform].Form![Video]

End Sub

如果我将文件路径直接放在代码中，它可以正常工作。所以我认为这可能是没有传递到主要形式的问题。所以我试过这个：

我在名为“VideoSelect”的主要表单中添加了一个文本框

Public Sub PlaybButton_Click()

Dim videoaddress As String

videoaddress = Forms![2_CCC]![2_CCC_Subform].Form![Video]

Forms![2_CCC]!WMP.URL = videoaddress 

End Sub

我收到一个新错误，提示“您输入的表达式对属性的引用无效。”

我做了一个消息框来查看 VideoSelect 显示的内容，它显示了正确的文件地址。

所以我迷路了！任何帮助将不胜感激！

Answer 1

所以问题是文件路径中的引号导致 WMP 播放器出现问题。

所以我只是添加了一个步骤来删除那些。

代码现在非常简单，并且 100% 的时间都有效。

Forms![2_CCC}!WMP.URL = Replace(Forms![2_CCC]![2_CCC_Subform].Form![Video],"""","")