设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
楼主: zhuyiwen
打印 上一主题 下一主题

ADP 连接管理组件范例

[复制链接]
21#
发表于 2011-2-19 20:54:12 | 只看该作者
下载学习
22#
发表于 2011-2-24 16:52:08 | 只看该作者
dddddddddddddddddddddddddddd
23#
发表于 2011-2-24 17:21:34 | 只看该作者
好的就发嘛
24#
发表于 2011-2-27 18:41:26 | 只看该作者
朱总的东西都是好东西啊.

点击这里给我发消息

25#
发表于 2011-7-16 11:44:39 | 只看该作者
这个,还得慢慢消化一下。

点击这里给我发消息

26#
发表于 2011-7-16 11:59:48 | 只看该作者
这个是为什么

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

27#
 楼主| 发表于 2011-7-16 14:43:11 | 只看该作者
轻风 发表于 2011-7-16 11:59
这个是为什么

请说明环境、条件及使用方法

点击这里给我发消息

28#
发表于 2011-7-16 15:09:17 | 只看该作者
WINDOWS XP + ACCESS 2010 + SQL 2000
下载了示例,按文中所述操作,出现这个错误,调试时:


引用情况:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

29#
 楼主| 发表于 2011-7-16 16:07:17 | 只看该作者
回复 轻风 的帖子

你把这一句
  1. Public objADP As New YHAccess.yhADPConnection
复制代码
改成
  1. Public objADP As  YHAccess.yhADPConnection
复制代码


修改 InitADP
  1. Private Function InitADP()
  2.     If objADP Is Nothing Then
  3.         Set objADP = New YHAccess.yhADPConnection
  4.     End If

  5.     ... 接原来的代码

  6. End Function
复制代码

这样试试

点击这里给我发消息

30#
发表于 2011-7-16 16:12:35 | 只看该作者
zhuyiwen 发表于 2011-7-16 16:07
回复 轻风 的帖子

你把这一句改成

朱老师,还是同样错误,错误停在:Set objADP = New YHAccess.yhADPConnection
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-4-24 18:21 , Processed in 0.109124 second(s), 32 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表