vba删除文件-数据库中的记录按条件统一删除

【分享成果，随喜正能量】人最终决定着自己的命运。在天赋和环境内，他成为什么是自己决定的结果。人不是简单的活着vba删除文件，而是时时需求对自己的前途做出思考，决定下一刻自己会成为什么样的人。每个人都有随时改变自己决定的自由。上天不会亏待努力的人，也不会同情假勤奋的人，你有多努力，时光它知道。只有一条路不能选择，那就是放弃的路；只有一条路不能拒绝，那就是成长的路。努力是你的底气，自信是你的资本，微笑是你的标签，当你熬过所有的苦，自然会遇见所有的甜。

《VBA数据库解决方案》教程是我推出的第二套教程，目前已经是第一版修订了。这套教程定位于中级，是学完字典后的另一个专题讲解。数据库是数据处理的利器vba删除文件，教程中详细介绍了利用ADO连接ACCDB和EXCEL的方法和实例操作，教程第一版的修订内容主要是完成所有程序文件的32位和64位OFFICE系统测试。

这套教程共两册，八十四讲，今后一段时间会给大家陆续推出修订后的教程内容。今日的内容是第27讲：数据库中的记录按条件统一删除

删除文件需要管理员权限_删除文件夹命令Linux_vba删除文件

第二十七讲把数据表中符合固定条件的记录统一删除

大家好,我们今日继续讲解VBA数据库解决方案的第27讲内容：利用VBA，把数据表中特殊的记录删除的方法。这讲的内容比较简单，在理解和掌握了前几讲内容的基础上很容易掌握。为什么要提出这讲的课题呢？其实，我们在实际的工作中有各式各样的问题会遇到，我只能尽可能多的给大家多举些实例来说明。

1 应用场景的具体分析

今天的话题是，在数据库员工信息的数据表中有些人的记录要删除，因为这些人退休了啊，而退休的条件又是比较固定的。这时，我们完全可以用代码来解决。同时，讲这一讲的目的也是为了让大家多了解一些SQL语句中特殊语法的写法。提到退休，大部分是男性大于60岁，女性大于55岁，在下面的WHERE条件中会有关于日期函数在WHERE中的写法。

2 数据表中删除特定条件记录的代码及代码解读

下面看代码：

Sub mynz_27() '第27讲在数据表中删除特定条件的记录

Dim cnADO, rsADO As Object

Dim strPath, strTable, strWhere, strSQL, strMsg As String

Set cnADO = CreateObject(“ADODB.Connection”)

Set rsADO = CreateObject(“ADODB.Recordset”)

strPath = ThisWorkbook.Path & “mydata2.accdb”

strTable = “员工信息”

cnADO.Open “Provider=Microsoft.Ace.OLEDB.12.0;Data Source=” & strPath

strSQL = “SELECT * FROM ” & strTable

rsADO.Open strSQL, cnADO, 1, 3