给你一段代码研究一下我也是抄别人的，没试过的。
set con_access =server.createobject(“adodb.connection’)
con_access_str=””
con_access.open con_access_str ‘连接你们的ACCESS数据库

set con_sqlserver=server.createobject(“adodb.connection”)
con_sqlerver_str=”…”
con_sqlserver.open con_sqlserver_str ’连接到SQLSERVER数据库

set rs_access=server.createobject(“adodb.recordset”)
set rs_sqlserver=server.createobject(“adodb.recordset”) ‘连接数据集
’从ACCESS中读数据【注：在插入时，不能向SQL SERVER的TT表中插入自动增量字段如: ID号，否则会出错。因为ID是系统自己来添加的，不能更新，不需要人为添加】

while rs_access.eof ‘循环开始
rs_sqlserver.addnew
rs_sqlserver.fields(“NAME”)=rs_access.fields(“NAME”)
rs_sqlserver.fields(“sex”)=rs_access.fields(“sex”)
rs_sqlserver.update

rs_access.movenext
’结束循环
wend
set rs_access=nothing
set rs_sqlserver=nothing
response.write “你们的数据已经全部导入到SQL SERVER数据库中，请不要刷新或再运行”