📄 admin_pfield.asp
字号:
<%
'**************************************************************
' Software name: PowerEasy SiteWeaver
' Web: http://www.powereasy.net
' Copyright (C) 2005－2008 佛山市动易网络科技有限公司 版权所有
'**************************************************************
response.Expires = -1
response.ExpiresAbsolute = Now() - 1
response.Expires = 0
response.CacheControl = "no-cache"
Dim fieldname, num, dbname, dbtype, isknow
fieldname = Trim(Request("fieldname"))
num = Trim(Request("num"))
dbname = Trim(Request("dbname"))
If dbname = "" Then dbname = 0
dbtype = Trim(Request("dbtype"))
If dbtype = "" Then dbtype = 0
isknow = False
%>
<html>
<head>
<title>字段属性设置</title>
<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>
<link href='Admin_Style.css' rel='stylesheet' type='text/css'>
<script language = 'JavaScript'>
function changemode(){
var dbname=document.myform.ftype.value;
if(dbname=='Text'){
input1.style.display='';
}else{
input1.style.display='none';
}
if(dbname=='Num'){
input2.style.display='';
}else{
input2.style.display='none';
}
if(dbname=='Time'){
input3.style.display='';
}else{
input3.style.display='none';
}
if(dbname=='yn'){
input4.style.display='';
}else{
input4.style.display='none';
}
if(dbname=='GetUrl'|dbname=='GetClass'|dbname=='GetSpecil'|dbname=='GetChannel'){
input5.style.display='';
}else{
input5.style.display='none';
}
}
function changetime(){
var dbname=document.myform.Timetype.value;
if(dbname=='3'){
document.myform.Timemb.value="2";
}else{
document.myform.Timemb.value="{year}年{month}月{day}日";
}
}
function submitdate(){
var dbname=document.myform.ftype.value;
if(dbname=='Text'){
for (var i=0;i<document.myform.CatType.length;i++){
if (document.myform.CatType[i].checked){
var cattype=document.myform.CatType[i].value;
}
}
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + document.myform.CatNum.value + "," + document.myform.OutType2.value + "," + cattype + ")}";
}
if(dbname=='Num'){
for (var i=0;i<document.myform.OutType.length;i++){
if (document.myform.OutType[i].checked){
var cattype=document.myform.OutType[i].value;
}
}
if (cattype=='2'){
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + cattype + ")}";
}else{
if (cattype=='0'){
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + cattype + "," + document.myform.ZhengShu.value + ")}";
}else{
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + cattype + "," + document.myform.XiaoShu.value + ")}";
}
}
}
if(dbname=='Time'){
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + document.myform.Timetype.value + "," + document.myform.Timemb.value + ")}";
}
if(dbname=='yn'){
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + document.myform.yny.value + "," + document.myform.ynn.value + ")}";
}
if(dbname=='GetUrl'){
for (var i=0;i<document.myform.outype.length;i++){
if (document.myform.outype[i].checked){
var outype=document.myform.outype[i].value;
}
}
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + document.myform.dbtype.value + "," + outype + ")}";
}
if(dbname=='GetClass'|dbname=='GetSpecil'|dbname=='GetChannel'){
for (var i=0;i<document.myform.outype.length;i++){
if (document.myform.outype[i].checked){
var outype=document.myform.outype[i].value;
}
}
dbname="{$Field(" + document.myform.Fieldnum.value + "," + dbname + "," + outype + ")}";
}
window.returnValue=dbname;
window.close();
}
</script>
</head>
<body>
<table id="main" width="100%">
<form method='post' action='' name='myform'>
<tr class="tdbg"><td><strong>字段名称：</strong><input name='FieldName' type='text' id='FieldName' size='35' value="<% =fieldname %>" readonly></td></tr>
<tr class="tdbg"><td><strong>输出类型：</strong><select name="ftype" onChange="changemode()"><option value='Text'>文本型</option>
<%
If (dbtype > 1 And dbtype < 7) Or dbtype = 131 Then
response.write "<option value='Num' selected>数字型</option>"
isknow = True
Else
response.write "<option value='Num'>数字型</option>"
End If
If dbtype = 7 Then
response.write "<option value='Time' selected>时间型</option>"
isknow = True
Else
response.write "<option value='Time'>时间型</option>"
End If
If dbtype = 11 Then
response.write "<option value='yn' selected>是否型</option>"
isknow = True
Else
response.write "<option value='yn'>是否型</option>"
End If
If LCase(fieldname) = "articleid" Or LCase(fieldname) = "softid" Or LCase(fieldname) = "photoid" Or LCase(fieldname) = "productid" Then
response.write "<option value='GetUrl' selected>对象路径(系统内置)</option>"
isknow = True
Else
response.write "<option value='GetUrl'>对象路径(系统内置)</option>"
End If
If LCase(fieldname) = "classid" Then
response.write "<option value='GetClass' selected>栏目路径(系统内置)</option>"
isknow = True
Else
response.write "<option value='GetClass'>栏目路径(系统内置)</option>"
End If
response.write "<option value='GetSpecil'>专题路径(系统内置)</option>"
If LCase(fieldname) = "channelid" Then
response.write "<option value='GetChannel' selected>频道路径(系统内置)</option>"
isknow = True
Else
response.write "<option value='GetChannel'>频道路径(系统内置)</option>"
End If
%>
</select></td></tr>
<%
If isknow = False Then
response.write "<tbody id='input1' style='display:'>"
Else
response.write "<tbody id='input1' style='display:none'>"
End If
%>
<tr class="tdbg"><td><strong>输出长度：</strong><input name='CatNum' type='text' id='gotopic' size='20' value=0> <font color='#FF0000'>为0则不截断</font></td></tr>
<tr class="tdbg"><td><strong>过滤处理：</strong><select name='OutType2'><option value='0' selected>解析HTML标记</option><option value='1'>不解析HTML标记</option><option value='2'>过滤HTML标记</option></select></td></tr>
<tr class="tdbg"><td><strong>截断处理：</strong><Input type='radio' name='CatType' value='0' checked>显示... <Input type='radio' name='CatType' value='1'>不显示...</td></tr>
</tbody>
<%
If ((dbtype > 1 And dbtype < 7) Or dbtype = 131) And Not (LCase(fieldname) = "articleid" Or LCase(fieldname) = "softid" Or LCase(fieldname) = "photoid" Or LCase(fieldname) = "productid" Or LCase(fieldname) = "classid" Or LCase(fieldname) = "channelid") Then
response.write "<tbody id='input2' style='display:'>"
Else
response.write "<tbody id='input2' style='display:none'>"
End If
%>
<tr class="tdbg"><td><strong>输出方式：</strong><Input type='radio' name='OutType' value='0' checked onClick="input21.style.display='';input22.style.display='none'">整数 <Input type='radio' name='OutType' value='1' onClick="input21.style.display='none';input22.style.display=''">小数 <Input type='radio' name='OutType' value='2' onClick="input21.style.display='none';input22.style.display='none'">百分数</td></tr>
<%
If ((dbtype > 1 And dbtype < 7) Or dbtype = 131) And Not (LCase(fieldname) = "articleid" Or LCase(fieldname) = "softid" Or LCase(fieldname) = "photoid" Or LCase(fieldname) = "productid" Or LCase(fieldname) = "classid" Or LCase(fieldname) = "channelid") Then
response.write "<tbody id='input21' style='display:'>"
Else
response.write "<tbody id='input21' style='display:none'>"
End If
%>
<tr class="tdbg"><td><strong>输出方式：</strong><input name='ZhengShu' type='text' id='ZhengShu' size='10' value='0'> <font color='#FF0000'>根据数值输出符号,为0则输出原数</font></td></tr></tbody>
<tbody id='input22' style='display:none'><tr class="tdbg"><td><strong>小数位数：</strong><input name='XiaoShu' type='text' id='XiaoShu' size='4' value=2></td></tr></tbody>
</tbody>
<%
If dbtype = 7 Or dbtype = 135 Then
response.write "<tbody id='input3' style='display:'>"
Else
response.write "<tbody id='input3' style='display:none'>"
End If
%>
<tr class="tdbg"><td><strong>输出格式：</strong><select name="Timetype" onChange="changetime()"><option value='0' selected>模板输出</option><option value='1'>模板输出(补零)</option><option value='2'>模板输出(限位补零)</option><option value='3'>函数处理</option></select></td></tr>
<tr class="tdbg"><td><strong>输出摸板：</strong><input name='Timemb' type='text' id='Timemb' size='35' value="{year}年{month}月{day}日"></td></tr>
</tbody>
<%
If dbtype = 11 Then
response.write "<tbody id='input4' style='display:'>"
Else
response.write "<tbody id='input4' style='display:none'>"
End If
%>
<tr class="tdbg"><td><strong>为真输出：</strong><input name='yny' type='text' id='yny' size='20' value="是"></td></tr>
<tr class="tdbg"><td><strong>为假输出：</strong><input name='ynn' type='text' id='ynn' size='20' value="否"></td></tr>
</tbody>
<%
If LCase(fieldname) = "articleid" Or LCase(fieldname) = "softid" Or LCase(fieldname) = "photoid" Or LCase(fieldname) = "productid" Or LCase(fieldname) = "classid" Or LCase(fieldname) = "channelid" Then
response.write "<tbody id='input5' style='display:'>"
Else
response.write "<tbody id='input5' style='display:none'>"
End If
If LCase(fieldname) = "articleid" Or LCase(fieldname) = "softid" Or LCase(fieldname) = "photoid" Or LCase(fieldname) = "productid" Then
%>
<tr class="tdbg"><td><strong>数据类别：</strong><select name="dbtype">
<%
If dbname = 1 Then
response.write "<option value='Article' selected>文章型</option>"
Else
response.write "<option value='Article'>文章型</option>"
End If
If dbname = 2 Then
response.write "<option value='Soft' selected>下载型</option>"
Else
response.write "<option value='Soft'>下载型</option>"
End If
If dbname = 3 Then
response.write "<option value='Photo' selected>图片型</option>"
Else
response.write "<option value='Photo'>图片型</option>"
End If
If dbname = 5 Then
response.write "<option value='Product' selected>商品型</option>"
Else
response.write "<option value='Product'>商品型</option>"
End If
%>
</select> </td></tr>
<%
End If
%>
<tr class="tdbg"><td><strong>输出方式：</strong>
<% if instr(lcase(fieldname),"channelid") = 0 then %>
<Input type='radio' name='outype' value=3 checked>混合 <Input type='radio' name='outype' value='1'>路径 <Input type='radio' name='outype' value='2'>名称
<% else %>
<Input type='radio' name='outype' value=1 checked>目录 <Input type='radio' name='outype' value='2'>名称 <Input type='radio' name='outype' value='3'>上传目录
<% end if %>
</td></tr>
</tbody>
<tr class="tdbg" align="center"><td><input type='button' value="插入" onclick="submitdate();"> <input type='button' value="取消" onclick="window.close();"></td></tr>
<tr class="tdbg" height="100%"><td> <input name='Fieldnum' id='Fieldnum' value="<% =num %>" type='hidden'><br> <br> </td></tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -