主题：[求助]

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)

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

但是到命令窗口执行： messagebox.show(_UserName) ，显示是正常的

 检查发现：在win7是正常的，但在Xp运行也出现错

报这个 No devices of the category

 

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

 

捕捉错误

 

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

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

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

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

 

加上 try catch 即可

 

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

改成

 

Try
    _Cams = New DCap.Filters()
Catch

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

    return
End Try

 

 

 代码是写在内部函数里的，现在改为上在代码时提示错误，如下图：

 

此主题相关图片如下：qq图片20151102145823.jpg

return nothing

改成

 

return nothing