Foxtable(狐表)用户栏目专家坐堂 → 为什么浏览器昨天显示htm,今天都不显示了(word、excel、pdf)


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

主题:为什么浏览器昨天显示htm,今天都不显示了(word、excel、pdf)

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/20 21:01:00 [显示全部帖子]

Dim ext As String
ext = e.link.Text.SubString(e.link.Text.LastIndexof(".") ) '获得文件后缀
Select Case ext
    'Case ".bmp",".gif",".jpg",".png",".tif",".wmf",".doc",".txt",".xls",".rft"

    Case ".doc",".txt",".htm",".html"
        Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
        brw.Address = ProjectPath & "Attachments\web\" & e.Page.Name & "\" & e.link.Text
        e.Form.Controls("Label1").text =  e.Page.Name & "》" & e.link.Text
End Select

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/20 21:12:00 [显示全部帖子]

 因为你判断了后缀名,你可以不判断

 

Case ".doc",".txt",".htm",".html"


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/20 21:21:00 [显示全部帖子]

 呃,我测试没有这样的提示。

 

 当然,如果你修改了word或者excel,肯定会提示是否保存的


 回到顶部