说明你现在的ADO版本和以前的ADO版本不一致了,声明也不一样了。你只要把这个事件先删除,然后重新打开这个事件,再把以前的代码贴进来就行了。

解决方案 »

  1.   

    你碰到的和‘我是谁谢谢 但我只有一个listview 这是为什么’的问题一样,引用了两个不同版本的ADODC控件。用记事本打开工程文件,找找看,如果有就删除一个引用。
      

  2.   

    当然可能了,你可能安装了如ACCESS2000等都会加入新版本的东东了。
      

  3.   

    但问题是用向导新生成的程序照样有问题。
    这就说明你这种方法恐怕也不行。
    有没有VB或系统设置方面来考虑解决的办法呢?
    另外我重装了一遍VB照样解决不了。
      

  4.   

    如果使用了ado不同版本的化先按照小草的辦法改一下
      

  5.   

    引用添加ADO控件即可解决此问题。
    发生此问题主要是文件路径发生了变化。如:按装别的软件等等。
      

  6.   

    在现在的机器上新建一个工程运行正常(向导程序除外)。
    出错的代码贴子内容里已有:
    Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
    这就奇怪了。
    同样的代码为什么用新建工程就运行正常呢??!!
    怎样才能不用新建工程的方法使以前的代码正常运行呢??
      

  7.   

    在现在的机器上新建一个工程然后手工加入同样的代码运行正常。
    出错的代码贴子内容里已有:
    Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
    这就奇怪了。
    同样的代码为什么用新建工程就运行正常呢??!!
    怎样才能不用新建工程的方法使以前的代码正常运行呢?? 
      

  8.   

    呵呵,我也不知道,我只知道这样可以解决问题,
    我以前VBsp5的程序因为要和同事兼容非转到sp3
    结果出现和你基本一样的问题
    想尽办法最后还是新建工程搞定
    你可以用文本打开工程文件比较一下工程文件的库引用什么不同
    就知道结果了
      

  9.   

    你一定曾经添加了一个同名控件,看看你的adodc1,应该它的index属性是某一个数,不是空值
    因为如果index非空,则说明这是个控件数组,它的生命需要有index参数
    Private Sub Adodc1_MoveComplete(Index as integer,ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
    只要在属性栏中将改控件的index清空即可
      

  10.   

    to sssoft(恒谦) 
         但是如何解释以前可以现在不行?
      

  11.   

    你一定曾经添加了一个同名控件,看看你的adodc1,应该它的index属性是某一个数,不是空值
    因为如果index非空,则说明这是个控件数组,它的函数都需要有index参数
    Private Sub Adodc1_MoveComplete(Index as integer,ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
    只要在属性栏中将该控件的index清空即可
    一定是这个问题。。
      

  12.   

    新建工程可以说明问题是出在工程文件.vbp上,因为你添加窗体时工程文件会自动添加窗体所包含的控件或对象的引用.
    所以我认为比较两个工程文件就可以找到症结所在,对吗?
      

  13.   

    可能是某一次不小心按下了复制,以前不是控件数组,复制了以后,会出现“你已经有了一个同名控件,是否创建控件数组,虽然你可能删除了新添加的控件,但是原来的空间的index属性由空值变成了0,成为了控建树组,他所有的事件都变成需要index参数。
      

  14.   

    to sssoft(恒谦) 
        如何解释以前可以现在不行? 
        如何解释新建工程就可以运行?
      

  15.   

    你写个例子from1中间添加一个按钮
    在里面写一句话msgbox "哈哈哈哈哈"
    然后选中这个按钮,点击右键,选择复制,然后选择粘贴,“你已经有了一个“选择是
    然后你再运行一下程序,会看到同样的提示
      

  16.   

    你也出现的同样的问题?拿出来看看?
    因为ado的这个事件的定义,所有的版本都是一样的,除了控件数组。:)
      

  17.   

    问题是怎样才能使用窗体向导新生成的程序运行不出现这种错误提示呢?
    如果是因为sp版本不同,怎样才能消除sp对现在程序的影响呢?
      

  18.   

    由于没有好的解决办法,我已经重装了系统。
    感谢大家参与。
    由于hnlzh(吸海垂虹)的大力关注,主要分数将送给hnlzh(吸海垂虹)。