以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  点击单元格打开文件  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=74445)

--  作者:qwz405
--  发布时间:2015/9/11 8:20:00
--  点击单元格打开文件

文件在局域网共享文件夹中,用于分享给员工查阅,求代码

 

用现在的代码,都提示"系统找不到提定文件”

If e.Col.Name = "文件名称" Then
    Dim Proc As New Process    \'定义一个新的Process
    Proc.File = Tables("文档中心").Current("文件名称")
    \'Proc.File = "\\\\192.168.1.222\\file\\ \'" & e.Row("文件名称") & "\' "   \'指定要打开的文件名称
    Proc.Start()
End If

 

 


图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:222.jpg
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/9/11 9:11:00
--  
If e.Col.Name = "文件名称" Then
    Dim Proc As New Process    \'定义一个新的Process
    Proc.File = "\\\\192.168.1.222\\file\\" & e.Row("文件名称")  \'指定要打开的文件名称
    Proc.Start()
End If

--  作者:qwz405
--  发布时间:2015/9/11 10:47:00
--  

老师,e.Row("文件名称") 无法获得文件的后缀名,如何获得后缀名,或者插入文件时直接不需要后缀名。

 

系统找不到指定文件:

    \'Proc.File = "\\\\192.168.1.2\\file\\中国阅兵"   

    \'Proc.File = "\\\\192.168.1.2\\file\\ " & e.Row("文件名称") 

 

可以打开文件:

    Proc.File = "\\\\192.168.1.2\\file\\中国阅兵.pdf" 


--  作者:大红袍
--  发布时间:2015/9/11 10:58:00
--  

你文件名称就是自带文件后缀名的啊。msgbox看一下

 

msgbox(e.Row("文件名称"))


--  作者:qwz405
--  发布时间:2015/9/11 11:06:00
--  

谢谢老师,多个了空格,晕倒……

 

现在我是弄一点学一点,

看帮助,看了后面的忘了前面的;

看视频,看着看着就睡着了;

 

 


图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:222.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:333.jpg
图片点击可在新窗口打开查看