Private Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
望高手解释adReason、adStatus 与pRecordset 作用,用途。

解决方案 »

  1.   

    adreason 指示最初的操作引发的移动
    其取值为
    adrsnaddnew         此操作执行addnew方法
    adrsndelete     此操作执行delete方法  
    adrsnupdate     此操作执行update方法
    adrsnundoupdate   此操作反相执行update方法 
    adrsnundoaddnew   此操作反相执行addnew方法
    adrsnundodelete   此操作反相执行delete方法
    adrsnrequery         此操作执行requery
    adrsnresync          此操作执行resync方法
    adrsnclose           此操作执行关闭记录集
    adrsnmove      此操作移动当前记录指针到不同的记录
    adrsnmovefirst   此操作移动当前记录指针到记录集的第一条记录
    adrsnmovelast    此操作移动当前记录指针到记录集的最后一条记录
    adrsnmovenext       此操作移动当前记录指针到记录集的下一条记录
    adrsnmoveprevious   此操作移动当前记录指针到记录集的前一条记录
    adrsnfirstchange  此操作对行进行第一次改变adstatus   指示当事件返回时应当采取的操作
    其取值为
    adstatusok              触发事件操作成功
    adstatuserrorsoccured  触发事件操作失败
    adstatuscantdeny     操作不能被删除
    adstatuscancel      请求取消触发事件操作
    adstatusunwantedevent  在事件已完成执行前防止后来的标志信息precordset  是触发事件的recordset对象的一个引用对象