sql_in_do.asp

心里在线咨询系统 怎么还有字数限制

<!--#include file="../config/conn.asp"-->
<%
if session("user_name")="" then
response.Redirect url&"error.asp?msg=您这样的操作本系统令人感到耻辱！&logout=true" 
end if

tempdata=trim(Request("strPhoto"))
sql = "SELECT * into temp FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source="&tempdata&";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$] " 
conn.execute(sql) 

sqlp = "select * from temp" 
set rsp=server.createobject("adodb.recordset")
rsp.open sqlp,conn,1,1
i=0
do while not rsp.eof
sqlq = "select * from USER_VALIDATE where stu_no='"&rsp("stu_no")&"'" 
set rsq=server.createobject("adodb.recordset")
rsq.open sqlq,conn,1,1
if rsq.eof then
	sql = "insert into USER_VALIDATE (stu_no,stu_name,stu_class) values('"&rsp("stu_no")&"','"&rsp("stu_name")&"','"&rsp("stu_class")&"')" 
	conn.Execute(sql)
i=i+1
end if
rsq.close
rsp.movenext
loop
rsp.close
a=""
sql="delete from USER_VALIDATE where stu_no='"&a&"'"
conn.execute(sql)
sql="drop table temp"
conn.execute(sql)
conn.close
set conn = nothing

%><table border="0" width="100%" height="100%">
	<tr>
		<td align="center">　<%=i%>条数据导入成功<p><b><font size="2">　</font><a  style="cursor:hand; text-decoration:underline"  onclick="history.go(-1)"><font size="2">返回</font></a></b></td>
	</tr>
	</table>