<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>ÎÄ»¯½¨Éè</title>
<!-- #include file="conn.asp" -->
<!-- #include file="../inc/config.asp" -->
<!-- #include file="../inc/function.asp" -->
<!-- #include file="../admin/inc/function.asp" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.unnamed1 {
	font-size: 12px;
	color: #000000;
}
-->
</style></head>
<%
Dim ClassSql,RsClassObj,direct_f
ClassSql = "Select * from catalogs where parentID=291"
Set RsClassObj = Conn.Execute(ClassSql)
direct_f=request("file")

%>

<body>
<br>
<table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <%
do while Not RsClassObj.Eof
%>
  <tr>

    <td class="unnamed1"><a href="right.asp?classid=<% = RsClassObj("id") %>" target="mainFrame"><% = RsClassObj("title") %></a>
	  <form name="form1" method="post" action="">
	    <input name="title" type="hidden" value="<% = RsClassObj("title") %>">
		<input name="classid" type="hidden" value="<% = RsClassObj("id") %>">
      </form>
	</td>
  </tr>
  <%
	
	RsClassObj.MoveNext
loop
%>
</table>
</body>
</html>
<%
RsClassObj.close
Set RsClassObj = Nothing
%>
