Foxtable(狐表)用户栏目专家坐堂 → 请帮助测试分析一下出现的错误,如何解决?


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

主题:请帮助测试分析一下出现的错误,如何解决?

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 9:55:00 [显示全部帖子]

 1、你对应的dll文件一定要放在项目里;

 

 2、如果是win7系统,一定要用管理员打开;

 

 3、如果你的dll文件是需要注册的,你也一定先要注册 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=49293&replyID=&skin=1

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 15:21:00 [显示全部帖子]

这样判断,你在使用之前,先判断。

 

try
    Dim cmr As New DCap.Filters()
catch ex As exception
    msgbox("没有设备")
End try


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 16:29:00 [显示全部帖子]

 呃,我单独测试没有问题,这个代码不可能有错。请把你的完整例子发上来测试。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 16:44:00 [显示全部帖子]

 不明白你想说什么,你这个例子单独就根本就无法测试。

 

 请单独做一个可以报错而且能测试的例子,打包全部文件发上来。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 16:56:00 [显示全部帖子]

 回复10楼,不是跟你说了么?打开项目的时候,在打开窗口的时候判断一下是否有设备,没有设备就不要运行即可啊。

 

这样判断,你在使用之前,先判断。

 

try
    Dim cmr As New DCap.Filters()
catch ex As exception
    msgbox("没有设备")
End try


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 16:57:00 [显示全部帖子]

 关于你6楼的错误,我单独测试并没有出错。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 17:44:00 [显示全部帖子]

 对你彻底无语,你把afterOpenProject的代码Forms("拍照").Open这句代码删除就不会报错了啊。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 17:45:00 [显示全部帖子]

 有或者你在 拍照 这个窗口上afterload事件 加入检测的代码

 

 

try
    Dim cmr As New DCap.Filters()
catch ex As exception
    msgbox("没有设备")

    Return
End try


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/17 18:01:00 [显示全部帖子]

  帮你改了一下,如下,改了 全局代码 和 窗口afterload 事件

 

  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:拍照.foxdb


 回到顶部