sort.asp

来自「本系统适用于选择题（单选和多选）的练习和考试.主要有七大模块：学习信息、经验交流」· ASP 代码 · 共 30 行

<%
if session("zzteacher")=true then
  str="select * into temp from "&session("select_tk")&""
  conn.execute(str)
  str="DROP TABLE "&session("select_tk")&""
  conn.execute(str)
  str="select * into "&session("select_tk")&" from temp where 1<>1"
  conn.execute(str)
  str="select * from temp"
  set rs=conn.execute(str)
    do while not rs.eof
      temp1=rs("tm_text")
      temp2=rs("img_name")
      temp3=rs("da_a")
      temp4=rs("da_b")
      temp5=rs("da_c")
      temp6=rs("da_d")
      temp7=rs("da_e")
      temp8=rs("da_f")
      temp9=rs("da")
      temp10=rs("select_only")
      str="insert into "&session("select_tk")&"(tm_text,img_name,da_a,da_b,da_c,da_d,da_e,da_f,da,select_only) values('"&temp1&"','"&temp2&"','"&temp3&"','"&temp4&"','"&temp5&"','"&temp6&"','"&temp7&"','"&temp8&"','"&temp9&"',"&temp10&")"
      conn.execute(str)
    rs.movenext
    loop
  rs.close
  str="DROP TABLE temp"
  conn.execute(str)
end if
%>