%Title=Trim(request("Title"))
Set ts = Server.CreateObject("ADODB.Recordset")
sql="select Content from yingxiang where Title='"&Title&"'"
ts.open sql,conn,1,3
%>
上海觉策广告有限公司
影像文化
<%
Set rslist = Server.CreateObject("ADODB.Recordset")
sql="select Title from yingxiang order by Aboutusorder"
rslist.open sql,conn,1,1
do while not rslist.eof
%>