以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  BUG：事件代码出现错误不提示，直接中断执行。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=47667)
--  作者：关键下一秒
--  发布时间：2014/3/14 13:36:00
--  BUG：事件代码出现错误不提示，直接中断执行。

如下代码在事件里不出现错误提示，直接中断运行：

Dim rfzip As String ="ftp://erp:aaaa@mdt.gicp.net/download/update.zip"
MessageBox.Show(rfzip)
Dim rftxt As String = filesys.GetParentPath(rfzip)\' & "\\update.txt"   ’(此行错误，但不出现错误提示，直接在此中断运行。)
MessageBox.Show(rftxt)                                                             \'此行被中断，没有执行。

但将这段代码复制到命令窗口中执行就会出现错误提示。
--  作者：Bin
--  发布时间：2014/3/14 14:03:00
--  
不支持FTP://这种路径 或者HTTp什么的



Dim rfzip As String ="ftp://erp:aaaa@mdt.gicp.net/download/update.zip" 
MessageBox.Show(rfzip)
Dim rftxt As String = rfzip.Substring(0,rfzip.LastIndexOf("/")) \' & "\\update.txt"   \'(此行错误,但不出现错误提示,直接在此中断运行.)
MessageBox.Show(rftxt)        
--  作者：关键下一秒
--  发布时间：2014/3/14 14:42:00
--  
以下是引用Bin在2014-3-14 14:03:00的发言：
不支持FTP://这种路径 或者HTTp什么的



Dim rfzip As String ="ftp://erp:aaaa@mdt.gicp.net/download/update.zip" 
MessageBox.Show(rfzip)
Dim rftxt As String = rfzip.Substring(0,rfzip.LastIndexOf("/")) \' & "\\update.txt"   \'(此行错误,但不出现错误提示,直接在此中断运行.)
MessageBox.Show(rftxt)        

我要表达的问题是：系统调试不提示错误，直接中断，不利于调试。
--  作者：狐狸爸爸
--  发布时间：2014/3/14 14:47:00
--  

我执行一楼的代码，出现错误提示了，然后中断，正常。

 

 
--  作者：关键下一秒
--  发布时间：2014/3/14 15:16:00
--  
以下是引用狐狸爸爸在2014-3-14 14:47:00的发言：

我执行一楼的代码，出现错误提示了，然后中断，正常。

 

 

查出原因了：因为 beforeshowerrormessage事件中设置了 e.cancel = true