以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎样打开指定文件的文件夹并选中该文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73938)

--  作者:lxy060669
--  发布时间:2015/8/29 17:58:00
--  怎样打开指定文件的文件夹并选中该文件

请问老师:

       在foxtable中,怎样打开指定文件的文件夹并选中该文件。

我现在能实现打开文件夹,但不能实现选中文件。


--  作者:有点蓝
--  发布时间:2015/8/29 18:09:00
--  
http://www.foxtable.com/help/index.html?n=0328.htm
--  作者:有点蓝
--  发布时间:2015/8/29 18:11:00
--  
打开外部文件用Process
--  作者:有点蓝
--  发布时间:2015/8/29 18:12:00
--  
文件的相关操作参考这里
--  作者:lxy060669
--  发布时间:2015/8/29 18:43:00
--  

老师给的连接是不能实现的。

我搜索了网页,在VB中用下面的代码实现的。

 

Private Sub Command1_Click()
Shell "explorer.exe /select,C:\\test\\123.txt ", vbNormalFocus

End Sub

 

现在怎样把上面的代码引用到foxtable中呢?


--  作者:lxy060669
--  发布时间:2015/8/29 18:52:00
--  

我已经实现了。

在全局代码中将刚才的shell语句放进去,定义一个全局变量,并引用即可。


--  作者:有点蓝
--  发布时间:2015/8/29 19:21:00
--  
图片点击可在新窗口打开查看
打开文本文件
Dim Proc As New Process
Proc
.File = "Notepad.exe" \'指定要执行的文件
Proc.Arguments = 
"c:\\table.txt" \'指定命令行参数
Proc
.Start()


--  作者:lxy060669
--  发布时间:2015/8/29 21:40:00
--  

已经完美的实现这个功能,谢谢老师。

 

\'-----打开文件目录并打开文件所在目录
Dim Proc As New Process
Dim r As Row = Tables("文件管理表").Current
Dim rs As String = "  /select," & r("文件路径") & " "
\'output.Show(rs)
Proc.File = "explorer.exe" \'指定要执行的文件
Proc.Arguments = rs \'指定命令行参数
Proc.Start()


--  作者:大红袍
--  发布时间:2015/8/30 10:24:00
--  
System.Diagnostics.Process.Start("Explorer", "/select,c:\\Windows")