Foxtable(狐表)用户栏目专家坐堂 → 如何判断WebBrowser中打开文件的文件名和后缀


  共有2601人关注过本帖树形打印复制链接

主题:如何判断WebBrowser中打开文件的文件名和后缀

帅哥哟,离线,有人找我吗?
ZJZK2018
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
如何判断WebBrowser中打开文件的文件名和后缀  发帖心情 Post By:2018/4/20 14:49:00 [只看该作者]

如题

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/20 15:53:00 [只看该作者]

你是说这个?e.form.controls("webbrowser1").address的值?

 

具体一点问题。


 回到顶部
帅哥哟,离线,有人找我吗?
ZJZK2018
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
  发帖心情 Post By:2018/4/20 16:13:00 [只看该作者]

我在同一个WebBrowser中有可能打开的文件是AAA.doc或bbb.xls或bbb.pdf,如何判断提取正打开的文件的文件名和后缀?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/20 16:17:00 [只看该作者]

你是如何制定webbrowser的文件路径的?直接判断e.form.controls("webbrowser1").address的值不就行了?

 

msgbox(e.form.controls("webbrowser1").address)


 回到顶部
帅哥哟,离线,有人找我吗?
ZJZK2018
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
  发帖心情 Post By:2018/4/20 16:40:00 [只看该作者]

有点甜:

我执行下面代码出现乱码:

Dim wbr1 As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
msgbox(e.form.controls("webbrowser1").address)
wbr1.Address = Nothing


图片点击可在新窗口打开查看此主题相关图片如下:$sep(gva1%wr4zyns$ctq6.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
ZJZK2018
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
  发帖心情 Post By:2018/4/20 16:43:00 [只看该作者]

我需要的是:C:\aaa.doc

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/20 16:48:00 [只看该作者]

Dim wbr1 As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim s = UrlDecode(e.form.controls("webbrowser1").address)
msgbox(s.replace("file:///", ""))

 回到顶部
帅哥哟,离线,有人找我吗?
ZJZK2018
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
  发帖心情 Post By:2018/4/20 16:58:00 [只看该作者]

谢谢甜版

 回到顶部