一个表转储问题！(用access)

[huyidehyd]

table t1,t2
表t1中有时间字段a,值类型为,如："200301";
现在我想把14个月前的那个月的数据，转到表t2中，然后在表t1中把那个月的数据删除，程序每次退出执行，如何实现?

[changechange]

dim strWhere as string
strWhere="200108"
adodb.connection.execute "insert into t2 select * from t1 where format(t1.a,""yyyymm"")=" & strWhere
adodb.connection.execute "delete form t1 where format(t1.a,""yyyymm"")=" & strWhere

[changechange]

关于 adodb对象，connection对象，execute 方法请自己查看 ADO 得帮助

http://www.access911.net/index.asp?board=8&recordid=76FAB51E

[huyidehyd]

谢谢！

[changechange]

insert into t2 select * from t1 where format(t1.a,"yyyymm")="200108"

delete form t1 where format(t1.a,"yyyymm")="200108"

[yangsm]

我同意一楼的意见

[oneofcsdn]

"200108" 换为参数怎么写，谢谢（vb）！