[求助]Try语句不起作用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]Try语句不起作用

共有9298人关注过本帖树形打印复制链接主题：[求助]Try语句不起作用

blueskyyq

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：295 积分：1856 威望：0 精华：1 注册：2012/7/9 23:25:00

[求助]Try语句不起作用 发帖心情

Post By：2012/11/21 0:22:00 [只看该作者]

下面这段代码在没有安装邮件程序的电脑上运行没有按设定提示

Try
Dim Proc As New Process

Proc.File = "mailto:123@163.com"

Proc.Start()
Catch ex As Exception
MessageBox.Show("电脑上没有Foxmail之类的邮件程序,请自行下载安装","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)
End Try

lin_hailun

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6708 积分：34304 威望：0 精华：11 注册：2012/8/18 23:10:00

Post By：2012/11/21 9:00:00 [只看该作者]

应该是狐表对process再次封装的时候，没有抛出异常，导致无法捕捉，你用原始的吧。

Try
    Dim proc As New System.Diagnostics.Process
    Proc.StartInfo.FileName = "mailto:123@163.com"
    Proc.Start()
Catch ex As Exception
    MessageBox.Show("电脑上没有Foxmail之类的邮件程序,请自行下载安装","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)
End Try

[此贴子已经被作者于2012-11-21 9:00:03编辑过]

下一主题 >> << 上一主题

主题：[求助]Try语句不起作用