Foxtable(狐表)用户栏目专家坐堂 → [求助]打开文件能指定用什么软件吗?


  共有6724人关注过本帖树形打印复制链接

主题:[求助]打开文件能指定用什么软件吗?

帅哥哟,离线,有人找我吗?
2425004926
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:5559 威望:0 精华:0 注册:2019/11/14 9:36:00
[求助]打开文件能指定用什么软件吗?  发帖心情 Post By:2022/8/6 18:54:00 [只看该作者]

打开文件能指定用什么软件吗?
比如下面,有txt文件,htm文件,能指定都用记事本打开吗?

    Dim f As String = ProjectPath & "Attachments\html\" & dr("页面") & dr("扩展名")
    If FileSys.FileExists(f) Then
        Dim Proc As New Process '定义一个新的Process
        Proc.File = f
        Proc.Start()
    End If

[此贴子已经被作者于2022/8/6 19:09:13编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/7 20:16:00 [只看该作者]

这个要看指定的软件是否支持命令行参数打开文件。支持的就可以,比如记事本:

Dim Proc As New Process
Proc.File = "notepad"
Proc.Arguments = "D:\web\test.html"
Proc.Start

 回到顶部
帅哥哟,离线,有人找我吗?
2425004926
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:5559 威望:0 精华:0 注册:2019/11/14 9:36:00
  发帖心情 Post By:2022/8/9 11:28:00 [只看该作者]

    
感谢老师!这下如果发现错误更改太方便了!
    '打开文件
    Dim f As String = ProjectPath & "Attachments\html\" & dr("页面") & dr("扩展名")
    If FileSys.FileExists(f) Then
        Select Case dr("扩展名")
            Case ".txt", ".htm", ".html"
                Dim Proc As New Process
                Proc.File = "notepad" '用记事本打开
                Proc.Arguments = f
                Proc.Start
        End Select
    End If

 回到顶部