asp中复制字段请高手帮忙
来源:百度知道 编辑:UC知道 时间:2024/06/21 18:55:29
<%
Dim strsheetname
sheetname=request.QueryString("sheetname")
strsql = "INSERT INTO "&strsheetname&"(tybh) SELECT tybh FROM studentinfo"
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_StudentConn_STRING
Recordset1.Source = strSQL
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
错误类型:
ADODB.Recordset (0x800A0BB9)
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
/xjgl/sxqdo.asp, 第 7 行
浏览器类型:
Maybe...双引号惹的祸~!
我给你改一下你的语句:
strsql = "INSERT INTO '"&strsheetname&"'(tybh) SELECT tybh FROM studentinfo"
或者
strsql = "INSERT INTO ['"&strsheetname&"'](tybh) SELECT [tybh] FROM [studentinfo]"
------------以上回答有问题-----------
不过我在本机帮你测试了一下,下面是我的代码,你看一下就会明白的,是你没有定义 MM_StudentConn_STRING 字符串连接.代码如下:
<%
Dim strsheetname
strsheetname="bbb"
MM_StudentConn_STRING= "DBQ=D:\test\abc.mdb;Driver={Microsoft Access Driver (*.mdb)};"
sheetname=request.QueryString("sheetname")
strsql = "INSERT INTO "&strsheetname&"(tybh) SELECT tybh FROM studentinfo"
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_StudentConn_STRING
Recordset1.Source = strSQL
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.Loc