以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  BUG:事件代码出现错误不提示,直接中断执行。  (http://www.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