以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助][讨论]链接到外部对象  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=67903)
--  作者：hotday1972
--  发布时间：2015/5/5 22:54:00
--  [求助][讨论]链接到外部对象
FoxTable能否实现在单元格里存储一个外部对象文件的链接，象excel一样点击可以打开执行链接文件，有没有？请教了。
--  作者：大红袍03
--  发布时间：2015/5/5 22:59:00
--  

 呃，可以

 

http://www.foxtable.com/help/topics/0080.htm

 

http://www.foxtable.com/help/topics/0084.htm

 

http://www.foxtable.com/help/topics/0082.htm

 
--  作者：hotday1972
--  发布时间：2015/5/6 4:49:00
--  

谢谢答复

 

上面的设置我看过的，能存路径或者文件，如果要直接打开，要么把文件存在本地attachment，要么在局域网建一个共享文件夹，这样一来，就链接不到该文件原来的位置。原文件要是变了，Foxtable打开的还是老版本文件。

 

Excel或者Access都能实现直接链接到源文件并双击打开，而Foxtable是另外复制一份文件然后放入指定的文件夹，很不同嘛

 

有没有大神知道怎么在Foxtable里实现上述功能？多谢了
--  作者：hotday1972
--  发布时间：2015/5/6 6:13:00
--  

增加单元格的双击事件，解决了问题。

 

If e.Col.Name = "链接" Then
    e.Cancel = True 
    Dim proc As New Process
    Proc.File = Tables("文件清单").current("链接")
    Proc.Start()
End If

 

但是，有个问题是，文件名及路径需要录入，而不是像Excel一样可以打开文件找到文件后来生成链接。
--  作者：Bin
--  发布时间：2015/5/6 8:41:00
--  
帮助处处是宝  http://www.foxtable.com/help/topics/0328.htm
--  作者：大红袍
--  发布时间：2015/5/6 9:16:00
--  
If e.Col.Name = "链接" Then
    If e.Row.IsNull(e.Col.Name) Then
        Dim dlg As new OpenFileDialog
        If dlg.ShowDialog = DialogResult.OK Then
            e.Row(e.Col.Name) = dlg.FileName
        End If
    Else
        e.Cancel = True
        Dim proc As New Process
        Proc.File = e.Row("链接")
        Proc.Start()
    End If
End If
--  作者：hotday1972
--  发布时间：2015/5/6 17:30:00
--  

大神就是想得比我周全，多谢！