设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 907|回复: 7
打印 上一主题 下一主题

[其它] 火烧眉毛的急事,望大侠指点一下~~~

[复制链接]
跳转到指定楼层
1#
发表于 2004-10-15 00:58:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
编制的a ccess97程序在一台机器上运行的很好(2000)

换成其它机器上就提示错误:

"无法找到库或工程”

是什么问题?如何解决???
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2004-10-15 01:05:00 | 只看该作者
可能是引用的问题
3#
发表于 2004-10-15 01:09:00 | 只看该作者
1、一定是库引用问题,尤其是引用了自己编的OCX那就更有问题了!2、可能你现在的操作系统注册的REF不同,所以在VBE中将你原来的引用都再引用一次!3、最好将所有引用与你的文件放在一起,对REFERENSES对象编一过程将你的引用注册到你的文件路径,那就万无一失了。[em07]
4#
 楼主| 发表于 2004-10-15 17:39:00 | 只看该作者
什么什么????我没有使用任何自编的ocx啊???全部是系统自己的标准控件啊!!!!!!!!!!!!!!!!zipgirl帮帮我吧急啊急死啊!!!!!!加我249156409[em06][em06][em06][em06]
5#
发表于 2004-10-15 17:56:00 | 只看该作者
你用2000打开转换为2000格式或用导入97文件的方法
6#
发表于 2004-10-19 20:10:00 | 只看该作者
只是不知你是不是这个问题,权作互相磋商吧[em04]举个例子,添加ADODB库Public Function refcheck()On Error Resume NextDim ref As Reference

Dim n As IntegerDim adoref As Boolean

adoref = False

n = References.Count

Dim refnameDim i As Integer

For i = 1 To n

    refname= References(i).Name

    If UCase(refname) = "ADODB" Then

    adoref = True

    End IfNext iIf adoref = False Then Set ref = References.AddFromFile(your system reffilepath)

'ex:"C:\Program Files\Common Files\SYSTEM\ADO\msado360.dll(记不清)"

End Function
7#
发表于 2004-10-19 21:14:00 | 只看该作者
进入vba设计视图,然后点击菜单:工具--引用,若在跳出的“可使用的引用”列表框中出现“丢失的.......”选上它,这时在窗体下方“定位”会提示该文件的路径,到可运行本程序的机子上将该文件烤到相同目录下,再运行看看。
8#
发表于 2004-10-19 23:22:00 | 只看该作者
请将数据库上传或传到子benbfm@yahoo.com.cn 给我.

一般是一些函数不能兼容, 比如DATE(), RIGHT(),LEFT()....在97可以用到2000就可能有问题了.



[此贴子已经被作者于2004-10-19 15:25:03编辑过]

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-26 04:38 , Processed in 0.095955 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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