<%
set myrs=server.CreateObject("Adodb.recordset")
sqlstr="select * from t_sort where parent_id=0"
myrs.Open sqlstr,conn,1,1
if myrs.RecordCount>0 then
do until myrs.eof
%>
<%
set myrs=server.CreateObject("Adodb.recordset")
sqlstr="select * from t_sort where parent_id=1"
myrs.Open sqlstr,conn,1,1
if myrs.RecordCount>0 then
do until myrs.eof
%>
礼 品
