以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  文档管理  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82419)

--  作者:实话实说
--  发布时间:2016/3/17 14:55:00
--  文档管理

希望表事件DoubleClick满足一下要求:

1、表锁定状态,如果路径文件存在,则双击当前行打开文件,如果文件名称列为空,或路径文件不存在,则提示“文件不存在”;

2、表可编辑状态,双击文件名称列进入编辑。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文档管理.zip


--  作者:大红袍
--  发布时间:2016/3/17 15:01:00
--  
汗,最基础的内容啊,越学越退步么。
--  作者:大红袍
--  发布时间:2016/3/17 15:07:00
--  

doubleClick事件

 

If e.Table.AllowEdit = False Then
    msgbox(e.Row("文件名称"))
    Dim file As String = ProjectPath & FileSys.GetName(e.Row("文件名称"))
    msgbox(file)
    If FileSys.FileExists(file) Then
        Dim Proc As New Process \'定义一个新的Process
        Proc.File = file \'指定要打开的文件
        Proc.Start()
    Else
        msgbox("文件不存在")
    End If
    e.cancel = True
End If


--  作者:实话实说
--  发布时间:2016/3/17 15:08:00
--  

真不好意思,最近很忙,想偷点懒,帮助文件没系统看过,没时间啊.


--  作者:实话实说
--  发布时间:2016/3/17 15:11:00
--  
下半年就会调整工作,那时我就闭关学习
--  作者:实话实说
--  发布时间:2016/3/17 15:23:00
--  

试了一下代码,问题:

1、所表状态,文件名称为空或文件路径不对弹出出错框,不是提示消息框

2、表的可编辑状态时,执行了双击程序后再进入编辑状态(比如先打开文件再进入编辑状态)


--  作者:大红袍
--  发布时间:2016/3/17 15:30:00
--  
 代码没问题。
--  作者:实话实说
--  发布时间:2016/3/17 15:35:00
--  

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

--  作者:大红袍
--  发布时间:2016/3/17 16:09:00
--  

3楼代码测试没问题。代码不可能有问题。肯定你改错了。

[此贴子已经被作者于2016/3/17 16:09:21编辑过]

--  作者:实话实说
--  发布时间:2016/3/17 16:11:00
--  
大红袍老师,动画显示没有锁表时要打开文件再进入编辑状态,我想直接进入编辑状态;另外锁表时,文件名称空或路径不对时出错,而不是消息框提示。