<br>
<form name=object_basic action="admin_object_edit_basic_handle.asp?id=<%=MySys.object.object_id%>" method=post>
<table cellpadding="3" cellspacing="4" width="90%" height="30" align=center style='border:1px solid #ebebeb' >
	<tr>
		<td width="2%" align=right><img alt='点击弹开编辑框' onclick="opencat(basic_open)" style='CURSOR: hand' src="Images/index_search.gif" width="8" height="16"></td>
		<td  width="98%" align=left>
		<font color="#ebebeb"> | </font>
		<img alt='点击弹开提示信息框' onclick="opencat(help_basic_open)" style='CURSOR: hand' src="Images/icon_info.gif" width="13" height="13" hspace="0" align="absmiddle">			
		<font color="#ebebeb"> | </font>
		网站基本信息设置
	    </td>
	</tr>		
	<tr id="help_basic_open" style="display:  ">
		<td colspan="10" align=left>
		<table cellpadding="4" cellspacing="2" width="99%" height="30" align=center style='border:1px dashed #B7B7B7' >
			<tr>
				<td colspan="8" width='100%' style="line-height:150% ">
				·一般情况下除了广告栏目请不要修改栏目的描述！<br>
				·请慎重设置栏目的权限！<br>
				</td>
			</tr>
		</table>
		</td>
	</tr>
	
	<tr id="basic_open" >
		<td colspan="10" align=left style='padding-bottom:5px'>
		<table cellpadding="4" cellspacing="2" bgcolor='#f7f7f7' width="99%" height="30" align=center style='border:1px dashed #808080;padding:20px' >
			<tr>
				<td  width="25%" align=right>栏目描述:</td>
				<td  width="75%" align=left>
				<input name=object_description type= text value=<%=MySys.object.object_description%> size=15>
				</td>
			</tr>
			<tr>
				<td  width="25%" align=right>栏目名称:</td>
				<td  width="75%" align=left>
				<%=MySys.object.object_name%>
				</td>
			</tr>
			<tr>
				<td  width="25%" align=right>栏目属性:</td>
				<td  width="75%" align=left>
				<%
				select case MySys.object.object_ads
				
				case 1
				 response.write "广告栏目"
				 
				case else
				if instr(1,MySys.object.object_template,"handle")=0 then
				 response.write "普通栏目"
				else
				 response.write "后台处理栏目"
				end if
				 
				end select
				%>
				</td>
			</tr>
			<tr>
				<td  width="25%" align=right>栏目类型:</td>
				<td  width="75%" align=left>
				<%
				select case MySys.object.object_class
				
				case "objects"
				 response.write "栏目组"
				 
				case else
				 response.write "叶栏目"
				 
				end select
				if MySys.object.object_ads=1 then response.write " [ 广告栏目 ]"
				%>
				</td>
			</tr>
			<tr>
				<td  width="25%" align=right>栏目模版:</td>
				<td  width="75%" align=left>
				<%
				if MySys.object.object_show="" then
				response.write replace(MySys.object.object_template,"show",split(MySys.object.object_show,",")(0))&"_show"
				else
				response.write MySys.object.object_template
				end if
				%>
				</td>
			</tr>
			<tr>
				<td  width="25%" align=right valign=top>模版风格:</td>
				<td  width="75%" align=left valign=top >
		<%
		rs.open "select * from jins_object_template where template_name='"&MySys.object.object_template&"' ",conn,1,1
		if rs.eof then
		 response.write "暂时没有其他风格"
		else
		'/////////////////////////////////////////////////////////////////////////////////////////////////////////////
		'response.write
		dim t
		dim i_t
		t=rs("template_style")
		t=split(t,",")
		for i_t=0 to ubound(t)
		t(i_t)=split(t(i_t),"|")
			for ii_t=0 to ubound(t(i_t))/2-1
				if ii_t=0 then 
					response.write "<input name=object_show_0 type=radio value='"&t(i_t)(3*(ii_t))&"'"
						if MySys.object.object_show<>"" then
							if split(MySys.object.object_show,",")(0)=t(i_t)(3*(ii_t)) then response.write " checked "
						end if
					response.write ">"
				else
					response.write " | "
				end if
				
				response.write t(i_t)(3*(ii_t)+1)
				
				if t(i_t)(3*(ii_t)+2)<>"" then 
					response.write ":<input name=object_show_"&t(i_t)(0)&"_"&ii_t&" type=text  value='"
					
					if ubound(split(MySys.object.object_show,","))>0 and split(MySys.object.object_show,",")(0)=t(i_t)(0) then
						response.write split(MySys.object.object_show,",")(1)
					else
						response.write t(i_t)(3*(ii_t)+2)
					end if
					
					response.write "' size=5>"
			    end if
				
			next
			response.write "<br>"
		next
		'/////////////////////////////////////////////////////////////////////////////////////////////////////////////
		end if
		rs.close
		%>
				</td>
			</tr>
		<%if MySys.object.object_qu>0 then%>
			<tr>
				<td  width="25%" align=right>分页设置:</td>
				<td  width="75%" align=left>
				 <input name=object_qu type= text value=<%=MySys.object.object_qu%> size=5>
				  条信息/每页</td>
			</tr>
		<%end if%>			
		<%if MySys.object.object_open_temp>=0 then%>
			<tr>
				<td  width="25%" align=right>栏目开关:</td>
				<td  width="75%" align=left>
				 <select name=object_open_temp >
				<option value=1 <%if MySys.object.object_open_temp=1 then response.write "selected"%>>显示</option>
				<option value=0 <%if MySys.object.object_open_temp=0 then response.write "selected"%> >不显示</option>
				</select> 
				</td>
			</tr>
		<%end if%>
		<%
		dim g
		dim g_n
		g=MySys.object.object_customer_grade
		if g<>"" then g=split(g,"|")
		g(1)=split(g(1),",")
		
		function ListCustomerSort(kind)
		dim rs_t
		dim rs_tt
		set rs_t=conn.execute("select sort_grade from jins_customer_sort group by sort_grade order by sort_grade ")
		do while not rs_t.eof 
			response.write "<input name=object_grade_"&kind&"_1 type="&kind&" value="&rs_t("sort_grade")
			for ii_g=0 to ubound(g(1))
			if g(1)(ii_g)-rs_t("sort_grade")=0 then response.write " checked "
			next
			response.write ">"
			set rs_tt=conn.execute("select sort_description,sort_name,sort_grade from jins_customer_sort where sort_grade="&rs_t("sort_grade")&" ")
			do while not rs_tt.eof 
		
				response.write " | "&rs_tt("sort_description")
				
				rs_tt.movenext
			loop
			rs_tt.close
			
			response.write "<br>"
			
			rs_t.movenext
		loop
		rs_t.close
		'response.end
		end function
		%>
			<tr>
				<td  width="25%" align=right valign=top>权限设置:</td>
				<td  width="75%" align=left valign=top>
				 <select name=object_grade_0 onchange='gradeshow();'>
				<option value='>=' <%if g(0)=">=" then response.write "selected"%>>高于或等于</option>
				<option value='<=' <%if g(0)="<=" then response.write "selected"%>>低于或等于</option>
				<option value='=' <%if g(0)="=" then response.write "selected"%> >等于</option>
				</select>
				<div id=radio ><%ListCustomerSort("radio")%></div>
				<div id=checkbox ><%ListCustomerSort("checkbox")%></div>
				</td>
			</tr>
			<script >
			function gradeshow(){
			if (object_basic.object_grade_0.value=='='){
			document.getElementById("radio").style.display="none";
			document.getElementById("checkbox").style.display="";
			}
			else
			{
			document.getElementById("radio").style.display="";
			document.getElementById("checkbox").style.display="none";
			}
			
			}
			gradeshow();
			</script>
		</table>
		</td>
	</tr>

	<tr>
		<td height='1' colspan="9" background='images/dot03.gif'></td>
	</tr>
	
	<tr>
		<td height='30' colspan="8" width='100%' align=center >
	  <input type=submit value="提交设置！" >
	  <input type=reset value="重置" >
		</td>
	</tr>
</table>		
<SCRIPT language=javascript>
	function opencat(cat)
	{
 	 	if(cat.style.display=="none"){
     	cat.style.display="";
  		} else {
     	cat.style.display="none"; 
  		}
	}
	
</SCRIPT>
</form>