批处理配置MDB数据库MDB，Microsoft>，SubUpdateData，DimdbAsDAO.DatabaseDimrsAsDAO.RecordsetDimstrSQLAsStringSetdb=CurrentDb，strSQL=UPDATE表名SET字段名=值WHERE条件Setrs=db.OpenRecordset...。