reg.m.asp

ACTCMS是一款具有强大的功能的基于ASP语言的开源内容管理软件

				TitleSize=FieldRS("Width") 
		End Select 
		ISType=FieldRS("ISType")
		IsNotNull=FieldRS("IsNotNull")
		A="ESave"
	End  If 
    %>
	<form  name="tcjdxr" method="post" action="?A=<%= A %>&ModeID=<%= Request.QueryString("ModeID") %>&ID=<%= Request.QueryString("ID") %>">
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" class="table">
  <tr>
    <td class="bg_tr">您现在的位置：后台管理 >> <a href="Reg.MX.asp">注册模型列表</a> >> <a href="?A=L&ModeID=<%= ModeID %>">字段列表</a> >> 添加[<%= ACTCMS.ACT_C(ModeID,1)  %>]字段 </td>
  </tr>
</table>
<table class="table" cellspacing="1" cellpadding="2" width="98%" border="0" align="center">
  <tr class="tdbg">
    <td width="15%" align="right"> 字段别名： </td>
    <td><input name="Title" value="<%=Title%>"  type="text" maxlength="20" id="Title" />
    <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_zdbm',this)">帮助</span><font color="#ff0066">*</font> 如：文章标题</td>
  </tr>
  <tr class="tdbg">
    <td align="right"> 字段名称： </td>
    <td><input name="FieldName" value="<%=FieldName%>" <%If action="E" Then Response.write " disabled=""disabled"" "%>  type="text" maxlength="50" id="FieldName" />
       <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_zdmc',this)">帮助</span>
	   <%If action="E" Then Response.write " 该字段在 <"&ACTCMS.ACT_C(ModeID,1)&"> 模型内容页调用标签 <font color=red>{$"&FieldName&"}</font>"%> <br> <font color="#ff0066">*</font>为了和系统字段区分，系统创建字段时会自动以“_ACT”结尾,在模板中可以通过“{$字段名称_ACT}”进行调用 </td>
  </tr>
  <tr class="tdbg">
    <td align="right"> 字段描述： </td>
    <td><textarea name="Description" rows="6" cols="40" id="Description"><%=Description%></textarea>
	<span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_zdms',this)">帮助</span></td>
  </tr>
  <tr class="tdbg">
    <td align="right"> 是否必填： </td>
    <td><table id="IsNotNull" border="0">
      <tr>
        <td><input id="IsNotNull_0" <% IF IsNotNull = "0" Then Response.Write "Checked" %> type="radio" name="IsNotNull" value="0" /><label for="IsNotNull_0">是</label></td>
        <td><input id="IsNotNull_1" <% IF IsNotNull = "1" Then Response.Write "Checked" %> type="radio" name="IsNotNull" value="1" /><label for="IsNotNull_1">否</label>
			  <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_sfbt',this)">帮助</span></td>
      </tr>
    </table></td>
  </tr>
  <tr class="tdbg">
    <td align="right"> 会员中心调用：
</td>
    <td><table id="ISType"  border="0">
      <tr>
        <td><input id="ISType_0" <% IF ISType = "1" Then Response.Write "Checked" %>   type="radio" name="ISType" value="1" /><label for="ISType_0">是</label></td>
        <td><input id="ISType_1" type="radio" <% IF ISType = "0" Then Response.Write "Checked" %> name="ISType" value="0" /><label for="ISType_1">否</label>
			  <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_hyzxdy',this)">帮助</span></td>
      </tr>
    </table></td>
  </tr>
  <tr class="tdbg">
    <td align="right"> 字段类型： </td>
    <td>	
	
<table id="FieldType" <%If action="E" Then Response.write " disabled=""disabled"" "%> onClick="SelectModelType()" border="0">
	<tr>
		<td><input id="Type_0" <% IF FieldType = "TextType" Then Response.Write "Checked" %> type="radio" name="FieldType" value="TextType" checked="checked" />
		<label for="Type_0">单行文本</label></td>
		<td><input id="Type_1" <% IF FieldType = "MultipleTextType" Then Response.Write "Checked" %>  type="radio" name="FieldType" value="MultipleTextType" />
		<label for="Type_1">多行文本(不支持Html)</label></td><td>
		<input id="Type_2" <% IF FieldType = "MultipleHtmlType" Then Response.Write "Checked" %>   type="radio" name="FieldType" value="MultipleHtmlType" />
		<label for="Type_2" <% IF FieldType = "SupportHtmlType" Then Response.Write "Checked" %> >多行文本(支持Html)</label></td><td>
		<input id="Type_3" <% IF FieldType = "RadioType" Then Response.Write "Checked" %>  type="radio" name="FieldType" value="RadioType" /><label for="Type_3">单选项</label>
		</td>
		<td><input id="Type_4" <% IF FieldType = "ListBoxType" Then Response.Write "Checked" %>  type="radio" name="FieldType" value="ListBoxType" /><label for="Type_4">多选项</label></td>
	</tr><tr>
		<td><input id="Type_5" <% IF FieldType = "DateType" Then Response.Write "Checked" %>  type="radio" name="FieldType" value="DateType" />
		<label for="Type_5">日期时间</label></td><td>
		<input id="Type_6"  <% IF FieldType = "PicType" Then Response.Write "Checked" %> type="radio" name="FieldType" value="PicType" />
		<label for="Type_6">图片</label></td><td><input <% IF FieldType = "FileType" Then Response.Write "Checked" %>  id="Type_7" type="radio" name="FieldType" value="FileType" />
		<label for="Type_7">文件</label></td><td><input <% IF FieldType = "NumberType" Then Response.Write "Checked" %>  id="Type_8" type="radio" name="FieldType" value="NumberType" />
		<label for="Type_8">数字</label></td><td><input <% IF FieldType = "RadomType" Then Response.Write "Checked" %>  id="Type_9" type="radio" name="FieldType" value="RadomType" />
		<label for="Type_9">随机数</label>
		<span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_zdlx',this)">帮助</span></td>
	</tr>
</table>	
	
	</td>
  </tr>
  <tbody id="DivTextType">
    <tr>
      <td align="right">文本框长度：</td>
      <td><input name="TitleSize" value="<%=TitleSize%>"  type="text"  maxlength="4" size="10" id="TitleSize" /></td>
    </tr>
  </tbody>
  <tbody id="DivMultipleTextType" style="display:none">
    <tr>
      <td align="right">显示的宽度：</td>
      <td><input name="MultipleTextType_Width" type="text" value="<%=MultipleTextType_Width%>" maxlength="4" size="10" id="MultipleTextType_Width" />
        px</td>
    </tr>
    <tr>
      <td align="right">显示的高度：</td>
      <td><input name="MultipleTextType_Height" type="text" value="<%=MultipleTextType_Height%>" maxlength="4" size="10" id="MultipleTextType_Height" />
        px</td>
    </tr>
  </tbody>
  <tbody id="DivMultipleHtmlType" style="display:none">
    <tr>
      <td align="right">编辑器菜单名称：</td>
      <td>       
<input name="IsEditor" type="text" value="<%=IsEditor%>" maxlength="4" size="10" id="IsEditor" />
<select name="select" onChange="FormatTitle(this, tcjdxr.IsEditor, '')">
          <option selected>-- 请选择 --</option>
          <option value="1">简洁</option>
          <option value="2">超简洁</option>
          <option value="3">全部</option>
        </select>如需自己定义菜单名称,请手工配置editor/fckeditor/fckconfig.js 文件
</td>
    </tr>
    <tr>
      <td align="right">显示的宽度：</td>
      <td><input name="SupportHtmlType_Width" type="text" value="<%=SupportHtmlType_Width%>" maxlength="4" size="10" id="SupportHtmlType_Width" />
        px</td>
    </tr>
    <tr>
      <td align="right">显示的高度：</td>
      <td><input name="SupportHtmlType_Heigh" type="text" value="<%=SupportHtmlType_Heigh%>" maxlength="4" size="10" id="SupportHtmlType_Heigh" />
        px</td>
    </tr>
  </tbody>
  <tbody id="DivRadioType" style="display:none">
    <tr>
      <td align="right">分行键入每个选项：</td>
      <td><textarea name="RadioType_Content" rows="6" cols="40" id="RadioType_Content"><%=RadioType_Content%></textarea></td></tr>
    <tr>
      <td align="right">显示选项：</td>
      <td><table id="RadioType_Type" border="0">
        <tr>
          <td>
		  <input id="RadioType_Type_0"  <% IF RadioType_Type = "0" Then Response.Write "Checked" %>  type="radio" name="RadioType_Type" value="0" checked="checked" />
                <label for="RadioType_Type_0">单选下拉列表框</label></td>
        </tr>
        <tr>
          <td><input id="RadioType_Type_1" <% IF RadioType_Type = "1" Then Response.Write "Checked" %>  type="radio" name="RadioType_Type" value="1" />
                <label for="RadioType_Type_1">单选按钮</label></td>
        </tr>
      </table></td>
    </tr>

  </tbody>
  <tbody id="DivListBoxType" style="display:none">
    <tr>
      <td align="right">分行键入每个选项：</td>
      <td><textarea name="ListBoxType_Content" rows="6" cols="40" id="ListBoxType_Content"><%=ListBoxType_Content%></textarea></td></tr>
    <tr>
      <td align="right">显示选项：</td>
      <td><table id="ListBoxType_Type" border="0">
        <tr>
          <td><input id="ListBoxType_Type_0"  <% IF ListBoxType_Type = "0" Then Response.Write "Checked" %>  type="radio" name="ListBoxType_Type" value="0" checked="checked" />
                <label for="ListBoxType_Type_0">复选框</label></td>
        </tr>
        <tr>
          <td><input id="ListBoxType_Type_1"  <% IF ListBoxType_Type = "1" Then Response.Write "Checked" %>  type="radio" name="ListBoxType_Type" value="1" />
                <label for="ListBoxType_Type_1">多选列表框</label></td>
        </tr>
      </table></td>
    </tr>
  </tbody>
  <tbody id="DivDateType" style="display:none">
  </tbody>
  <tbody id="DivPicType" style="display:none">
  </tbody>
  <tbody id="DivRadomType" style="display: none">
  </tbody>
  <tbody id="DivFileType" style="display:none">
  </tbody>
  <tbody id="DivNumberType" style="display:none">
    <tr>
      <td align="right">文本框长度：</td>
      <td><input name="NumberType_TitleSize" type="text" value="35" maxlength="4" size="10" id="NumberType_TitleSize" /></td>
    </tr>
  </tbody>
  <tr>
	<Td align="right">默认值：</td>
      <td><input name="type_Default" type="text" value="<%=type_Default%>" size="10" id="NType_Default" />
	  <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('mode_mrz',this)">帮助</span>
	  注：没有数据录入的默认值，与前台显示无关.</td>
  </tr>

  <tr>
    <td></td>
    <td height="50">
	  <input type=button onclick=CheckForm() class="ACT_btn"  name=Submit1 value="  保存字段  " />
      &nbsp;&nbsp; <input type="reset" class="ACT_btn" name="Submit2" value="  重置  ">
	
	</td>

  </tr>
</table></form>
<%  End Sub



%>
<script language="JavaScript" type="text/javascript">
function FormatTitle(obj, obj2, def_value)
{
    var FormatFlag = obj.options[obj.selectedIndex].value;
    var tmp_Title = FilterHtmlStr(obj2.value);
    switch(FormatFlag)
    {
        case "1" :
            obj2.value = "UserMode";
            break;
        case "2" :
            obj2.value = "Simple";
            break;
        case "3" :
            obj2.value = "Default";
            break;
    }
    obj.selectedIndex = 0;
}
function FilterHtmlStr(str)
{
    str = str.replace(/<.*?>/ig, "");
    return str;
}
function SelectModelType()
{
    var TypeCount=document.getElementsByName("FieldType"); 
    
    for(var i=1;i<TypeCount.length;i++)
    { 
        var DivType=eval("Div"+TypeCount[i].value);
        
        if(TypeCount[i].checked)
        {
            DivType.style.display="";
        }
        else
        {
            DivType.style.display="none";
        }
    }
}

function overColor(Obj)
{
	var elements=Obj.childNodes;
	for(var i=0;i<elements.length;i++)
	{
		elements[i].className="tdbg1"
		Obj.bgColor="";
	}
	
}
function outColor(Obj)
{
	var elements=Obj.childNodes;
	for(var i=0;i<elements.length;i++)
	{
		elements[i].className="tdbg";
		Obj.bgColor="";
	}
}
	function CheckForm()
	{ var form=document.tcjdxr;
	  
	 if (form.Title.value=='')
		{ alert("字段别名不能够为空！");   
		  form.Title.focus();    
		   return false;
		}
	 if (form.FieldName.value=='')
		{ alert("字段名称不能够为空！!");   
		  form.FieldName.focus();    
		   return false;
		}
	    form.Submit1.value="正在提交数据,请稍等...";
		form.Submit1.disabled=true;	
		form.Submit2.disabled=true;	
	    form.submit();
        return true;
	}	
</script>

</body>
</html>