Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]


  共有4602人关注过本帖树形打印复制链接

主题：[求助]
帅哥哟，离线，有人找我吗？
xianzheng
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 15: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
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 15:39: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
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 15:43:00 [只看该作者]

 按上面代码改好了，但还是出现刚开始的错：

 

.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
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 15:55:00 [只看该作者]

 已经改成了return nothing， 但还是一样刚开始的错

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/11/2 15:57:00 [只看该作者]

1、是否弹出 msgbox ？

 

2、任何写有 New DCap.Filters() 的地方，都要改啊。
 回到顶部
帅哥哟，离线，有人找我吗？
xianzheng
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 16:02:00 [只看该作者]

1、弹出的是一个窗口，标题是：运行错误 

2、全局定义里的代码：Public _Cams As DCap.Filters = New DCap.Filters()，这里也要改吗？
 回到顶部
帅哥哟，离线，有人找我吗？
xianzheng
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 16:07:00 [只看该作者]

1、内部函数代码是： 

'获得摄像头名称列表
'_Cams,_CamList在全局代码定义

Dim f As DCap.Filter
'_Cams = New DCap.Filters()  '这行改为下面的代码
'''''''''''''''''''''''
Try
    _Cams = New DCap.Filters()
    Catch
    MessageBox.Show("未找到摄像头","提示")
    Return Nothing   'Return
End Try
'''''''''''''''''''''''''''''
_CamList.Clear()
_CamList.Add("无")
Dim c As Integer
For c=0 To _Cams.VideoInputDevices.Count - 1
    f = _Cams.VideoInputDevices(c)
    _CamList.Add(f.Name)
Next

 

2、全局变量代码是：

临时共享变量

lic _dVars(100) As Date

Public _bVars(100) As Boolean

Public _iVars(100) As Integer

Public _lVars(100) As Long

 

'摄像头

Public _Cap As DCap.Capture

Public _Cams As DCap.Filters = New DCap.Filters()

Public _Cam As DCap.Filter

Public _CamList As New List(Of String)

Public _CamIndex As Integer

<!--EndFragment-->

 回到顶部
帅哥哟，离线，有人找我吗？
xianzheng
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 16:10:00 [只看该作者]

 只有这两个地方有“New DCap.Filters()代码

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/11/2 16:17:00 [只看该作者]

Public _Cams As DCap.Filters = New DCap.Filters()

 

改成

 

Public _Cams As DCap.Filters
 回到顶部
帅哥哟，离线，有人找我吗？
xianzheng
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：356 积分：2314 威望：0 精华：0 注册：2014/10/4 9:38:00 		  发帖心情 Post By：2015/11/2 16:24:00 [只看该作者]

 原来已经有了这行代码了，那我试着把”Public _Cams As DCap.Filters = New DCap.Filters()“删除

 回到顶部
总数 26 上一页 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询