<%
dim objDB, objDB2
set objDB = new clsDB
objDB.InitDB "./manage_center/"
set objDB2 = new clsDB
objDB2.InitDB "./manage_center/"
objDB.InitRs4Read "select * from main_section"
%>
<%
objDB.InitRs4Read "select * from main_section"
do while not objDB.rs.Eof
%>
<%
dim objDB, objDB2
set objDB = new clsDB
objDB.InitDB "./manage_center/"
set objDB2 = new clsDB
objDB2.InitDB "./manage_center/"
objDB.InitRs4Read "select * from main_section"
%>
<%
objDB.InitRs4Read "select * from main_section"
do while not objDB.rs.Eof
%>