| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]列扩展为文件锁定行后怎么打开 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98495) |
| -- 作者：aidimeng -- 发布时间：2017/3/30 17:03:00 -- [求助]列扩展为文件锁定行后怎么打开 某列 扩展类型定义为 文件，发现 当行被锁定后 点击该列 不能查看文件了。能否 点击该列后 打开文件 |
| -- 作者：狐狸爸爸 -- 发布时间：2017/3/30 18:11:00 -- 暂时不可以，以后考虑改进 |
| -- 作者：狐狸爸爸 -- 发布时间：2017/3/30 18:21:00 -- 目前可以自己设置doubleClick事件打开文件： http://www.foxtable.com/webhelp/scr/1499.htm
|
| -- 作者：狐狸爸爸 -- 发布时间：2017/3/30 18:25:00 -- 参考代码： If e.Col.name = "第五列" Then e.Cancel = True If e.Row.IsNull("第五列") = False Then Dim fl As String = ProjectPath & "Attachments\\" & e.Row("第五列") If FileSys.FileExists(fl) Then Dim Proc As New Process \'定义一个新的Process Proc.File = fl \'指定要打开的文件 Proc.Start() End If End If End If
|
| -- 作者：有点色 -- 发布时间：2017/3/30 18:34:00 -- 不能锁定行，加一列逻辑列，用来锁定行，然后startEdit写代码
If e.Row("第二列") = True Then |
| -- 作者：aidimeng -- 发布时间：2017/3/31 7:50:00 -- 谢谢 |
| -- 作者：aidimeng -- 发布时间：2017/3/31 8:17:00 -- Select Case e.Col.Name Case "磷酸批次报告","碱批次报告","柠檬酸批次报告","活性白土批次报告","凹凸棒土批次报告","膨润土批次报告","活性炭批次报告" e.Cancel = True If e.Row.IsNull(""& e.col.name &"") = False Then Dim fl As String = "\\\\192.168.1.160\\hrdb\\ftp\\" & e.Row(""& e.col.name &"") If FileSys.FileExists(fl) Then Dim Proc As New Process \'定义一个新的Process Proc.File = fl \'指定要打开的文件 Proc.Start() End If End If End Select 达到预期效果 ，谢谢
|