ASP如何把A表的东西导入到B表

谁能帮我写个完整的，谢谢了，我想查询A表中符合我条件的记录然后上传到B表中，有三个字段ID NAME TIME 
比如查询超过N天没有登陆的会员，然后传到B表中。

SQL code

insert into B(ID,NAME,TIME) select ID,NAME,TIME from A where datediff(d,TIME,getdate())>N

请问这个怎么用啊？我的页面是这样的你看对吗？
<!--#include file="top.asp"--><!--#include file="inc.asp"-->
<%
insert into B(ID,NAME,TIME) select ID,NAME,TIME from A where datediff(d,TIME,getdate())>10%>

<%
N = 30
Set conn = CreateObject("ADODB.Connection")
conn.Open "xxxxxxxxxxxxxx"
' Access
sql = "INSERT INTO A([ID], [NAME], [TIME]) SELECT [ID], [NAME], [TIME] FROM B WHERE DATEDIFF('d', [TIME], Date())>" & N
' sql server
sql = "INSERT INTO A([ID], [NAME], [TIME]) SELECT [ID], [NAME], [TIME] FROM B WHERE DATEDIFF(d, [TIME], GETDATE())>" & N

conn.Execute sql
conn.Close
Set conn = Nothing
%>

VBScript code

<%
N = 30
Set conn = CreateObject("ADODB.Connection")
conn.Open "xxxxxxxxxxxxxx"
' Access
sql = "INSERT INTO B([ID], [NAME], [TIME]) SELECT [ID], [NAME], [TIME] FROM A WHERE DATEDIFF('d', [TIME], Date())>" & N
' sql server
sql = "INSERT INTO B([ID], [NAME], [TIME]) SELECT [ID], [NAME], [TIME] FROM A WHERE DATEDIFF(d, [TIME], GETDATE())>" & N

conn.Execute sql
conn.Close
Set conn = Nothing
%>