如何用语句把Access数据库中的所有表都重新命名！
第一步：
选出Access某数据库中所有表
SELECT right(MSysObjects.Name,len(MSysObjects.Name)-4) AS Expr1
FROM MsysObjects
WHERE (((Left([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1))
ORDER BY MsysObjects.Name
选出Access某数据库中所有表
SELECT right(MSysObjects.Name,len(MSysObjects.Name)-4) AS Expr1
FROM MsysObjects
WHERE (((Left([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1))
ORDER BY MsysObjects.Name
