- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求WebBrowser控件，读取文本框pdf数据码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=126414)
-- 发布时间：2018/10/21 1:22:00
-- 求WebBrowser控件，读取文本框pdf数据码
使用WebBrowser控件通过下面代码
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.address = "c:\\test.pdf"
可以打开指定的pdf文件，如果在窗体中建一个文本框TextBox1绑定到数据表含有pdf文件路径的数据列，可动态提供pdf文件，web.address = "c:\\test.pdf"语句怎么改动？
-- 发布时间：2018/10/21 7:56:00
--
Dim r As row=tables("表A").Current
web.address = "r("第一列")"
-- 发布时间：2018/10/21 11:57:00
--
我改成
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.address = ProjectPath & ("TextBox1")
报错警示，无效uri
等待大神指点
-- 发布时间：2018/10/21 12:49:00
--
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.address = ProjectPath & "attachments/" & e.form.controls("TextBox1").Text
-- 发布时间：2018/10/21 14:19:00
--
甜老师，按照你的方法，打开的是资源管理器，我是想要能够直接显示，这样的结果
此主题相关图片如下：111.png
-- 发布时间：2018/10/21 14:48:00
--
改成这样
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.address = e.form.controls("TextBox1").Text
-- 发布时间：2018/10/21 17:57:00
--
甜老师，依然不显示
-- 发布时间：2018/10/21 17:58:00
--
甜老师，依然不显示
1、你代码写在afterLoad？
2、代码写到按钮里面，是否显示？
-- 发布时间：2018/10/21 18:01:00
--
按钮可以，afterLoad里面不可
-- 发布时间：2018/10/21 18:02:00
--
按钮可以，afterLoad里面不可
如果写到afterLoad事件，这样写
Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
web.address = Tables("表A").current("第一列")