
- 网站连接


%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <%'======================================================================== request_BigClassID=Request("BigClassID") request_BigClassName=Request("BigClassName") request_BigClassType=Request("BigClassType") IfClass=" BigClassName='" & request_BigClassName &"'" gburl="BigClassID=" & Request("BigClassID") & "&BigClassName="& Request("BigClassName") & "&BigClassType=" & Request("BigClassType") sql="select * from SmallClass Where BigClassName='" & request_BigClassName &"' order by SmallClassID" rs.open sql,conn,1,1 SmallClassCount=rs.RecordCount if SmallClassCount>0 then dim ArraySmallClassID(20),ArraySmallClassName(20),ArraySmallClassType(20) for i=1 to SmallClassCount ArraySmallClassID(i)=rs("SmallClassID") ArraySmallClassName(i)=rs("SmallClassName") arraySmallClassType(i)=rs("SmallClassType") rs.MoveNext next end if rs.Close '=================================================================================%>


