代码如下:
Dim cn As New ADODB.Connection
cn.ConnectionString = cnn
cn.Open
cn.Execute ("delete * from xbb where flag= True")
‘====================
每次删除的时候都只能删除最后一条记录,这是什么原因啊?奇怪,哪位大哥来讲讲啊。还有个问题,我在rs.open "....",cn,3,3 以后为什么再用rs.open"...",cn,3,3就不行了啊,是不要先关闭一次??怎么能探测到rs是否是关闭的呢?谢谢了。

解决方案 »

  1.   

    delete  from xbb where flag= True
      

  2.   

    cn.Execute ("delete * from xbb where flag= True")
    * 号去掉
      

  3.   

    rs.open "....",cn,3,3 
    --
    改成
    if rs.state then rs.close
    rs.open ....
      

  4.   

    谢谢。又测试了下才发现有个奇怪的问题。我用的是fpspread控件,当我在上面修改数据时,我发现最后一次修改的那条数据不会立即生效,要关闭了窗口重新进入才会生效,这个问题该怎么解决啊??万分感谢。