Question

asp复制表

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_conn_STRING
sql = "select * into tyd2 from tyd"
rs.open sql,conn,1,1
rs.update
rs.close
set rs=nothing
%>

asp的程序，我用此代码不能复制当前数据库中的tyd表成为一个新表tyd2，运行页面提示：错误类型：
ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。

望各位大虾帮忙，谢谢！
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * into tyd2 from tyd
rs.open sql,conn,1,1
rs.update
rs.close
set rs=nothing
%>

我按照二楼的改成这样后 页面错误提示：错误类型：
Microsoft VBScript 编译器错误 (0x800A0409)
未结束的字符串常量
/rf/sqlbiao.asp, line 5, column 32
sql="select * into tyd2 from tyd
-------------------------------^

请问是什么问题？？？

Answer 1

'将a表另外复制一个b表（只复制结构，不含数据）
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * into b from a where 1=0"
rs.open sql,conn,1,1
rs.update
rs.close
set rs=nothing
%>

'将a表另外复制一个b表（包括制结构和数据）
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * into b from a
rs.open sql,conn,1,1
rs.update
rs.close
set rs=nothing
%>

Answer 2

删除这一句就可以了.
rs.ActiveConnection = MM_conn_STRING