<%
'乘风多用户计数器 Sql版
'作者QQ：178575
'作者EMail：yliangcf@163.com
'作者网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/cfcount.htm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，就没有放在程序里，请自己上网站上查看
'有完整版本的演示
%>
<%
ID=ChkStr(Request("ID"),2)
Sql="Select * From CFCount_SetBClass Where ID="&ID
Set Rs=Conn.Execute(Sql)
%>  


    <form name="form1" method="post" action="AdminUser.aspx?Action=setbclassmodifysave&ID=<%=ID%>&RefUrl=<%=Server.URLEncode(Request.ServerVariables("Http_Referer"))%>">


  <table class="tb_1">
    <tr class="tr_1">
      <td colspan="2">设置修改</td>
    </tr>
	<tr>
        <td>设置描述：</td>
        <td><input name="SetBClassDesc" type="text" id="SetBClassDesc" value="<%=Rs("SetBClassDesc")%>" size="40">
&nbsp;*</td>
      </tr>
	  <tr>
	    <td>设置的类型：</td>
	    <td><input type="radio" name="SetType" value="1"<%If Rs("SetType")=1 Then Response.write " checked"%>>内部
        <input type="radio" name="SetType" value="2"<%If Rs("SetType")=2 Then Response.write " checked"%>>
        外部 * </td>
      </tr>
  <tr>
        <td>排序数字：</td>
        <td><input name="SetTaxis" type="text" id="SetTaxis" value="<%=Rs("SetTaxis")%>" size="40">
          &nbsp;*</td>
      </tr>
	  <tr>
        <td>需更新的缓存名称：</td>
        <td><input name="AppName" type="text" id="AppName" value="<%=Rs("AppName")%>" size="40"<%If Rs("SetType")=1 Then Response.write " readonly style='background-color:#eeeeee'"%>>
        (多个请用,分隔)</td>
      </tr>
	  <tr>
	    <td>设置的值：</td>
	    <td>
<%
MyArray=Split(Rs("SetValue"),"|||")
Response.write "共有"&Ubound(MyArray)&"个设置的值,此处无法修改三级设置的值，修改请返回在列表里点管理进入三级配置列表修改!"

%>
		</td>
      </tr>
	  <tr>
        <td>&nbsp;</td>
        <td><input type="submit" name="Submit2222" value="修改">&nbsp;&nbsp;<a href="?Action=setbclasslist">返回一级设置配置列表</a></td>
      </tr>    
</table></form>
  
  