以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=76614)

--  作者:xianzheng
--  发布时间:2015/11/2 13:31:00
--  [求助]

DataRowAdding代码:e.DataRow("操作员")=_UserName,这个在老板本是可以的,但新版报错,为什么?

 

 

 

.NET Framework 版本:2.0.50727.3053
Foxtable 版本:2015.11.2.1
错误所在事件:表,基础资料,DataRowAdding
详细错误信息:
System.Reflection.TargetInvocationException: Exception has been thrown by the target of an invocation. ---> System.TypeInitializationException: The type initializer for \'UserCode\' threw an exception. ---> System.NotSupportedException: No devices of the category
   at DirectX.Capture.FilterCollection.getFilters(Guid category)
   at DirectX.Capture.FilterCollection..ctor(Guid category)
   at DirectX.Capture.Filters..ctor()
   at UserCode..cctor()
   --- End of inner exception stack trace ---
   at UserCode.DataRowAdding(DataRowEventArgs e)
   --- End of inner exception stack trace ---
   at System.RuntimeMethodHandle._InvokeMethodFast(Object target, Object[] arguments, SignatureStruct& sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
   at System.RuntimeMethodHandle.InvokeMethodFast(Object target, Object[] arguments, Signature sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
   at System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture, Boolean skipVisibilityChecks)
   at System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture)
   at Foxtable.DataTable.Oo00o O (Object A_0, DataTableNewRowEventArgs A_1)


--  作者:xianzheng
--  发布时间:2015/11/2 13:40:00
--  

发现2016新版本,有_UserName 代码的事件都提示错,为什么呢


--  作者:xianzheng
--  发布时间:2015/11/2 13:46:00
--  
但是到命令窗口执行: messagebox.show(_UserName) ,显示是正常的
--  作者:xianzheng
--  发布时间:2015/11/2 14:12:00
--  
 检查发现:在win7是正常的,但在Xp运行也出现错
--  作者:大红袍
--  发布时间:2015/11/2 14:23:00
--  

报这个 No devices of the category

 

是你设备的问题,比如你电脑没有摄像头,但用了摄像头。

 

捕捉错误

 

Try
    Dim _Cams = New DCap.Filters()
Catch
  MessageBox.Show("未找到摄像头","提示")
End Try


--  作者:xianzheng
--  发布时间:2015/11/2 14:29:00
--  

老师我昨天是加了拍照功能,是要加这些代码?应该加哪里呢?

Try
    Dim _Cams = New DCap.Filters()
Catch
  MessageBox.Show("未找到摄像头","提示")
End Try


--  作者:大红袍
--  发布时间:2015/11/2 14:32:00
--  

你搜索一下哪里写了 New DCap.Filters()

 

加上 try catch 即可

 

比如原来 _Cams = New DCap.Filters()

改成

 

Try
    _Cams = New DCap.Filters()
Catch

    MessageBox.Show("未找到摄像头","提示")

    return
End Try

 

 


--  作者:xianzheng
--  发布时间:2015/11/2 15:06:00
--  
 代码是写在内部函数里的,现在改为上在代码时提示错误,如下图:

 


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151102145823.jpg
图片点击可在新窗口打开查看

--  作者:Hyphen
--  发布时间:2015/11/2 15:09:00
--  
return nothing
--  作者:大红袍
--  发布时间:2015/11/2 15:10:00
--  

改成

 

return nothing