1、准确的统计出数据表的记录总数,输出到text1.text里。(一定要准确哦!)2、当数据表的记录总数大于115条记录时,删除多了的记录。(从第一条记录开始删起!不是结尾哦!)请各位高手写出代码来,谢谢!

解决方案 »

  1.   

    (1)
    select count(*) from tablename
    (2)
    delete * from table where id not in (select top 115 id from tablename orfer by id desc)
      

  2.   

    (2)
    delete * from tablename where id not in (select top 115 id from tablename order by id desc)
      

  3.   

    select count(*) from tablenamedelete * from tablename where id not in (select top 115 id from tablename order by id desc)你用你的recordset读出来
      

  4.   

    1.count(*)
    2.不太明白意思.如果是116条记录,是保留从第二条开始的115条记录,还是仅保留最后一条记录. 亦或其它?
      

  5.   

    那楼上写的就可以了,不过delete from 中间不要*
      

  6.   

    1、语句错误,缺少case.2、我没有设置id主键。
      

  7.   

    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim sql As String
    Set cn = New ADODB.Connection
    cn.Open "provider=microsoft.jet.oledb.4.0;data source=E:\分数\成绩表.mdb;"
    sql = "select * from 成绩"
    Set rs = New ADODB.Recordset
    rs.Open sql, cn, adOpenForwardOnly, adLockOptimistic'请在这里添加代码rs.Close
    cn.Close
    Set rs = Nothing
    Set cn = Nothing
      

  8.   

    如果连SQL都不知道,就别搞数据库了。
    你这不是问问题了,是求购代码了。