SELECT 站名 as ZD1,年份 as ZD2,月份 as ZD3,日期 as ZD4,世代 as ZD5,作物 as ZD6,'作物总面积(万亩)' as ZD7, '取样面积(平方米)' as ZD8,调查株数 as ZD9,调查网数 as ZD10, '1龄幼虫数量' as ZD11, '2龄幼虫数量' as ZD12 INTO [dBase III; DATABASE=C:\mlc\export\].[A5a.dbf] FROM [A5]错在字段名被加单引号处(以数字开头以及字段中含有()等)!!!
尤其是你的两个变量的内容:databasename, tablename的值
Set db = Workspaces(0).OpenDatabase(c:\mlc\mlc.mdb)
显示SQL语句,
再贴出来,看看是否有语法错误。
错误的地方来修改。