删除mbd数据库中所有记录

lzqlaj

假设删除当前目下chjbook.mdb中表chjbook的所有记录。
Private Sub del_Click()    '工程---> 引用---> Microsoft   ActiveX   Data   Object   2.x（版本号）
  Dim conn As New ADODB.Connection
    Dim CnStr As String
    CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\chjbook.mdb; ;Persist Security Info=False"
        conn.Open CnStr
        conn.Execute ("delete from chjbook")
        MsgBox "已删除所有记录！！！"        
End Sub

其它帖子：
成绩录入工具（vb）
http://club.excelhome.net/thread-744536-1-1.html
空行操作（“插入空行”）
http://club.excelhome.net/thread-590404-1-1.html
[分享] （无意中发现的）罗刚君 底端标题生成工具（开放源码含附件）
http://club.excelhome.net/thread-601577-1-1.html
[源码全部公开] 分数段统计（数组）（vba）
http://club.excelhome.net/thread-750450-1-1.html
[源码全部公开] 分数段统计（vba）
http://club.excelhome.net/thread-599282-1-1.html
搜狗文本词库的制作（vb）
http://club.excelhome.net/thread-670925-1-1.html
汉字与区位码转换（vb版）
http://club.excelhome.net/thread-670918-1-1.html
[源码全部公开] 区位码与汉字相互转换
http://club.excelhome.net/thread-601351-1-1.html
优盘禁用工具
http://club.excelhome.net/thread-495008-1-1.html
[源码全部公开] 工资条通用生成程序（也可分考场）
http://club.excelhome.net/thread-487664-1-1.html
[转帖] 把excel追加导入到access数据库
http://club.excelhome.net/thread-745574-1-1.html
[转帖] VB中对数据库的各种操作
http://club.excelhome.net/thread-745136-1-1.html
[转帖] VB把access数据库里的表导出成EXCEL表
http://club.excelhome.net/thread-745132-1-1.html

Admin

   

很遗憾通知楼上朋友，您的帖子在24小时之内没有任何回复！

通常情况下，本论坛发布的主题帖会在8小时被回复或处理。您的帖子在24小时之内未被回复，其中的原因可能是：

1、问题表述不清、模棱两可，难以理解，帮助者被搞晕了，夺帖而出；
2、没有上传必要的附件，或附件被遗忘在某个角落；
3、发帖提问时，语气带棱角、带挑衅，不幸被列入不受欢迎的帖子；
4、所提问题不成立，或提不合理的要求，乐于助人者使出“走为上”之计；
5、话题较偏、较冷或者发布到了不合适的版块，暂时无人问津，顾影自怜。


为了提高您的问题解决效率，我们推荐您阅读以下文章：
* 如何发表新话题和上传附件：http://club.excelhome.net/thread-45649-1-1.html
* 发帖的技巧：http://club.excelhome.net/thread-176339-1-1.html
* EH技术论坛的最佳学习方法：http://club.excelhome.net/thread-117862-1-1.html

lzqlaj

没有人回帖，自己顶一下。

软件爱好者

没有人回帖，自己顶一下。

dl0506

不错，很好的资料

布山客

找了好久，感谢了