捕获错误无效 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 捕获错误无效

共有3807人关注过本帖树形打印复制链接主题：捕获错误无效

BG小白

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

等级：三尾狐帖子：603 积分：4102 威望：0 精华：0 注册：2019/11/14 23:06:00

捕获错误无效 发帖心情

Post By：2022/1/29 6:42:00 [只看该作者]

Dim dk As String = "http://*:" & e.Form.Controls("TextBox1").Value & "/"

Try

HttpServer.Prefixes.Add(dk)

HttpServer.WebPath = "d:\web" '指定静态文件存储位置

HttpServer.Start()

Catch ex As Exception

MessageBox.Show("端口已被占用,请更换端口")

End Try

MessageBox.Show("网络服务已打开")

这样即使端口被占用了，也不提示，还是系统原本提示错误，这是什么原因？

BG小白

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

等级：三尾狐帖子：603 积分：4102 威望：0 精华：0 注册：2019/11/14 23:06:00

Post By：2022/1/29 6:49:00 [只看该作者]

上面的代码是放在窗口的按钮click里面的

有点蓝

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

等级：超级版主帖子：109736 积分：558396 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/1/29 9:05:00 [只看该作者]

捕捉不了。内部处理掉异常了，没有抛出来

主题：捕获错误无效