以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何通过代码独立使用扩展列类型为“文件”的菜单命令?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25997)

--  作者:y2287958
--  发布时间:2012/11/21 16:34:00
--  如何通过代码独立使用扩展列类型为“文件”的菜单命令?
如题如图
图片点击可在新窗口打开查看此主题相关图片如下:11.bmp
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2012/11/21 16:51:00
--  

1、
http://www.foxtable.com/help/topics/0353.htm

 
例如:
 
Dim r As row = Tables("xxx").Current
if r.IsNull("文件") = False Then
     Dim fl  As String = ProjectPath & & "Attachments\\" & r("文件") Then
     If Filesys.FileExists(fl) Then
          Dim Proc As New Process \'定义一个新的Process
          Proc.File = fl \'指定要打开的文件
          Proc.Start()
     End If
End If

2、
http://www.foxtable.com/help/topics/0328.htm


 
例如:
 
Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
     Tables("xxx").Current("文件") =  dlg.FileName
End If
 
3、
 
Tables("xxx").Current("文件") = Nothing

 

可以看出,没有技巧可以,都是帮助现成的知识。


--  作者:y2287958
--  发布时间:2012/11/21 20:19:00
--  
首先谢谢狐爸
这些代码俺也是知晓的
但俺想要是直接控制或引用当前现成的菜单命令而已
(也就是省了再重新写代码的功夫)