📄 userdefine.asp
字号:
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
dim conn
dim rs
set conn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
conn.Open connstring
rs.Open "select * from userdefine where definetype like '%"&request("definetype")&"%'",conn,1,1
all=rs.Recordcount
%>
<html>
<head>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>数据设置</title>
</head>
<body vlink="#48576C" link="#48576C" alink="#000000" bgcolor="#FFFFFF" topmargin="3">
<table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><strong><font class=title><%if request("datetype")="commdate" then%>公共数据<%else%><%=request("definetype")%><%end if%></font></strong> <a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=410, height=300','newdefine.asp?deftype=<%=request("definetype")%>');"><img src="../images/button_new.gif" border=0></a></td>
</tr>
<tr >
<td height="16" colspan="2" background="../images/title.gif"> </td>
</tr>
<tr>
<td height=4></td>
</tr>
</table>
<%if request("datetype")="commdate" then%>
<table width="100%" border="0" cellpadding="0" cellspacing="1">
<tr>
<%if request("definetype")="国家" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=国家&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>国家</u></font></a></td>
<%if request("definetype")="区域" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=区域&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>区域</u></font></a></td>
<%if request("definetype")="省份" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=省份&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>省份</u></font></a></td>
<%if request("definetype")="办事处" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=办事处&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>办事处</u></font></a></td>
<%if request("definetype")="部门" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=部门&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>部门</u></font></a></td>
<%if request("definetype")="职位类型" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=职位类型&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>职位类型</u></font></a></td>
<%if request("definetype")="行业" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=行业&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>行业</u></font></a></td>
<%if request("definetype")="货币" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=货币&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>货币</u></font></a></td>
<%if request("definetype")="单位" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=单位&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>单位</u></font></a></td>
<%if request("definetype")="付款类型" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=付款类型&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>付款类型</u></font></a></td>
<%if request("definetype")="付款方式" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=付款方式&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>付款方式</u></font></a></td>
<%if request("definetype")="运货方式" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=运货方式&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>运货方式</u></font></a></td>
<%if request("definetype")="交货时间" then%>
<td width="6%" height="18" align=center bgcolor="FB0802">
<%else%>
<td width="6%" height="18" align=center bgcolor="4A699C">
<%end if%>
<a href="UserDefine.asp?definetype=交货时间&datetype=commdate" target="bottom"><font color="#FFFFFF"><u>交货时间</u></font></a></td>
<td align=center bgcolor="#FFFFFF"></td>
</tr>
</table>
<%end if%>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#DECFAD">
<tr bgcolor="efefef">
<td width="15%" height="12" align=center>名称</td>
<%if request("definetype")="客户类型" then%>
<td width="15%" align=center>属性</td>
<td width="45%" align=center>描述</td>
<%elseif request("definetype")="销售事件类型" or request("definetype")="日程类型" then%>
<td width="15%" align=center>相关</td>
<td width="45%" align=center>描述</td>
<%elseif request("definetype")="付款方式" then%>
<td width="15%" align=center>优先级</td>
<td width="45%" align=center>描述</td>
<%else%>
<td width="60%" align=center>描述</td>
<%end if%>
<td width="5%" align=center>失效</td>
<td width="20%" align=center>操作</td>
</tr>
<%do while not rs.EOF
if request("definetype")<>"产品类型" then
%>
<tr>
<td bgcolor="#FFFFFF" align=center><%=rs("name")%></td>
<%if request("definetype")="客户类型" or request("definetype")="销售事件类型" or request("definetype")="日程类型" then%>
<td bgcolor="#FFFFFF" align=center><%=rs("definetypeprotery")%></td>
<%end if%>
<%if request("definetype")="付款方式" then%>
<td bgcolor="#FFFFFF" align=center><%=rs("definetypeprotery")%></td>
<%end if%>
<td bgcolor="#FFFFFF" align=center height=20><%=rs("description")%></td>
<td bgcolor="#FFFFFF" align=center><%if rs("closed") then Response.Write "是" else Response.Write "否"%></td>
<td bgcolor="#FFFFFF" align=center><a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=410, height=300','newdefine.asp?id=<%=rs("id")%>');">编辑</a> <a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=300, height=220','../delete.asp?defineid=<%=rs("id")%>');">删除</a></td>
</tr>
<%else%>
<tr>
<td bgcolor="#FFFFFF" align=center height=20><a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=410, height=300','newdefine.asp?deftype=<%=rs("name")%>');" title="点击创建子类型"><%=rs("name")%></a></td>
<td bgcolor="#FFFFFF" align=center><%=rs("description")%></td>
<td bgcolor="#FFFFFF" align=center><%if rs("closed") then Response.Write "是" else Response.Write "否"%></td>
<td bgcolor="#FFFFFF" align=center><a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=410, height=300','newdefine.asp?id=<%=rs("id")%>');">编辑</a> <a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=300, height=220','../delete.asp?defineid=<%=rs("id")%>');">删除</a></td>
</tr>
<%
set rsq=conn.execute("select * from userdefine where definetype='"&rs("name")&"'")
do while not rsq.eof
%>
<tr><td align=right bgcolor=white height=18> - </td>
<td align=left bgcolor=white><%=rsq("name")%></td>
<td bgcolor="#FFFFFF" align=center><%if rsq("closed") then Response.Write "是" else Response.Write "否"%></td>
<td bgcolor="#FFFFFF" align=center><a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=410, height=300','newdefine.asp?id=<%=rsq("id")%>');">编辑</a> <a href="javascript:opensubwin('resizable=yes, scrollbars=no, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=300, height=220','../delete.asp?defineid=<%=rsq("id")%>');">删除</a></td>
</tr>
<%
rsq.movenext
loop
end if
rs.MoveNext
loop
rs.Close
set rs=nothing
conn.Close
set conn=nothing
%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -