<% response.Expires=-1 response.CacheControl="no-cache" %> <!--#include file="../../conn/conn.asp"--> <!--#include file="../psw.asp"--> <!--#include file="../../functions/dofunction.asp"--> <!--#include file="../../functions/showfunction.asp"--> <!--#include file="../../fqdb/admin/website.asp"--> <% cmd = checkstr(request("cmd"),2) if cmd="loadteacher" then response.Charset = "gb2312" set rs=server.CreateObject("adodb.recordset") sql="select teacher_id,name from Edu_Person" rs.open sql,conn,1,3 response.write "{""data"":[" i = 0 do until rs.eof i = i + 1 response.write "{""Id"":"&rs("teacher_id")&",""Name"":"""&rs("name")&"""}" if i<rs.recordcount then response.write "," rs.movenext() loop response.write "]}" response.End() end if %>