📄 kfglxw.asp
字号:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>客户管理行为</title>
<LINK href="mainimages/style.css" type="text/css" rel="stylesheet">
<body >
</head>
<!--#include file="piaoy.inc"-->
<!--#include file="hyyxlAdmin.asp"-->
<%
kfglzlbm=session("kfglzlbm")
kfglfzbm=session("kfglfzbm")
kfglsjdxbm=session("kfglsjdxbm")
kfglscsjbm=session("kfglscsjbm")
kfglgrdxkbm=session("kfglgrdxkbm")
kfgldxlsjlbm=session("kfgldxlsjlbm")
kfglkfxwglbm=session("kfglkfxwglbm")
kfglyfkjlbm=session("kfglyfkjlbm")
kfglid=request("kfglid")
xkfid=request("xkfid")
xkfsj=request("xkfsj")%>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
<script>
function fncSelectAll(flag1,flag2)
{
if (frm1.llBox.checked==true)
{
yesorno.innerText="全选本页"
var objs=document.getElementsByTagName("INPUT")
{for(var i=0;i<objs.length;i++){
if (objs[i].type=="checkbox")
objs[i].checked=flag1;}}
}
else
{
yesorno.innerText="全选本页"
var objs=document.getElementsByTagName("INPUT")
{for(var i=0;i<objs.length;i++){
if (objs[i].type=="checkbox")
objs[i].checked=flag2;}}
}
}
</script>
<%
page=cint(Request.QueryString("page"))
pagecount=cint(request("page"))
set rsn=Server.CreateObject("ADODB.RecordSet")
sql="select * from "&kfglkfxwglbm&" where xkfid=" &request("xkfid")&" and kfglid=" &request("kfglid")&" order by kfxwglsj desc"
'response.write sql
rsn.Open sql,conn,1,3
%>
<%
if rsn.eof and rsn.bof then
else
kfxwglid=rsn("kfxwglid")
end if
%>
<form id="frm1" name="frm1" method="post" action="delkfglxw.asp?kfxwglid=<%=kfxwglid%>&kfglid=<%=kfglid%>&page=<%=pagecount%>&xkfid=<%=xkfid%>&xkfsj=<%=xkfsj%>">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" class="black12px"><strong> <font color="#003399">您现在的位置:</font></strong><font color="#003399">客户管理系统 <span class="nav">-></span> 用户中心 <span class="nav">-></span> 客户管理</font> <span class="nav">-></span> 客户行为管理</font></td>
</tr>
</table>
<TABLE id=data_table cellSpacing=0 cellPadding=3 width="100%"
bgColor=#dbeaf5 border=0>
<TBODY>
<TR>
<TD height="10" align="right" valign="middle"><SPAN
class=blue12px><STRONG>
<%
sqlfzb = "select * from "&kfglzlbm&" where xkfid=" &request("xkfid")&" "
Set rsxb = Server.CreateObject("ADODB.RecordSet")
rsxb.Open sqlfzb,conn,1,2
xkfzb=rsxb("xkfzb")
xkfdwmc=rsxb("xkfdwmc")
xkfxm=rsxb("xkfxm")
xkfzc=rsxb("xkfzc")
xkfdh=rsxb("xkfdh")
xkfsj=rsxb("xkfsj")
xkfcz=rsxb("xkfcz")
xkfemail=rsxb("xkfemail")
xkfwz=rsxb("xkfwz")
xkfqq=rsxb("xkfqq")
xkfdz=rsxb("xkfdz")
xkfyb=rsxb("xkfyb")
xkfxb=rsxb("xkfxb")
xkfsr=rsxb("xkfsr")
xkfzjh=rsxb("xkfzjh")
xkfbz=rsxb("xkfbz")
%>
<table width="100%" align="center" cellpadding="0" cellspacing="0" bgcolor="#fff7e5">
<tr>
<td width="11%" height="30" align="left" valign="middle"> 单位名称:</td>
<td width="15%" height="30" align="left" valign="middle"><%=xkfdwmc%></td>
<td width="7%" align="center" valign="middle">姓名:</td>
<td width="11%" align="left" valign="middle"><%=xkfxm%></td>
<td width="8%" align="center" valign="middle">尊称: </td>
<td width="12%" align="left" valign="middle"><%=xkfzc%></td>
<td width="7%" align="center" valign="middle">手机:</td>
<td width="11%" align="left" valign="middle"><%=xkfsj%></td>
<td width="6%" align="center" valign="middle">电话:</td>
<td width="12%" align="left" valign="middle"><%=xkfdh%></td>
</tr>
<tr>
<td height="30" align="left" valign="middle"> 性别:</td>
<td height="30" align="left" valign="middle"><%=xkfxb%></td>
<td height="30" align="center" valign="middle">传真:</td>
<td height="30" align="left" valign="middle"><%=xkfcz%></td>
<td height="30" align="center" valign="middle">邮箱:</td>
<td height="30" colspan="3" align="left" valign="middle"><%=xkfemail%></td>
<td align="center" valign="middle">QQ:</td>
<td align="left" valign="middle"><%=xkfqq%></td>
</tr>
<tr>
<td height="30" align="left" valign="middle"> 网址:</td>
<td height="30" align="left" valign="middle"><%=xkfwz%></td>
<td height="30" align="center" valign="middle">地址:</td>
<td height="30" align="left" valign="middle"><%=xkfdz%></td>
<td height="30" align="center" valign="middle">证件号:</td>
<td height="30" colspan="3" align="left" valign="middle"><%=xkfzjh%></td>
<td align="center" valign="middle">邮编:</td>
<td align="left" valign="middle"><%=xkfyb%></td>
</tr>
<tr>
<td height="30" align="left" valign="middle"> 生日:</td>
<td height="30" align="left" valign="middle" bordercolor="#000033"><%=xkfsr%></td>
<td height="30" align="center" valign="middle" bordercolor="#000033"> 备注:</td>
<td height="30" align="left" valign="middle" bordercolor="#000033"><%=xkfbz%></td>
<td height="30" align="center" valign="middle" bordercolor="#000033"> </td>
<td height="30" align="left" valign="middle" bordercolor="#000033"> </td>
<td align="center" valign="middle" bordercolor="#000033"> </td>
<td align="left" valign="middle" bordercolor="#000033"> </td>
<td align="center" valign="middle" bordercolor="#000033"> </td>
<td align="left" valign="middle" bordercolor="#000033"> </td>
</tr>
</table>
</font></STRONG></SPAN></TD>
</TR>
<TR>
<TD height="10" align="right" valign="middle"><a href="addkfxw.asp?xkfid=<%=xkfid%>&kfglid=<%=kfglid%>">添加客户行为</a> </TD>
</TR>
<TR bgColor=#c1cdd8>
<TD align=middle height=1></TD>
</TR>
<TR bgColor=#c1cdd8>
<TD align=middle
height=1></TD>
</TR>
</TBODY>
</TABLE>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#fff7e5">
<tr>
<td colspan="8" align="center" valign="top" ><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> </tr>
<tr>
<td height="30" align="left" valign="middle"> </td>
</tr>
</table></td>
</tr>
<tr>
<td align="center" >选择</td>
<td align="center" >消费金额</td>
<td align="center" >业务员</td>
<td align="center" >行为种类</td>
<td align="center" >行为记录</td>
<td align="center" >发生时间</td>
<td align="center" >操作</td>
</tr>
<tr>
<td height="3" valign="top" colspan="29" bgcolor="#000000"></td>
</tr>
<%
rsn.pagesize=10
if page<=1 then
page=1
elseif page>=rsn.pagecount then
page=rsn.pagecount
end if
if rsn.eof and rsn.bof then
else
rsn.absolutepage=clng(page)
end if
for i=1 to rsn.pagesize
if rsn.eof then exit for
%>
<tr bgcolor="#FFF7E5" style="background-color:#FFF7E5;" onmouseover = "this.style.backgroundColor='#E5F0FF'" onmouseout = "this.style.backgroundColor =''" >
<td align="center" class="td_line"><input type="checkbox" name="kfxwglid" value="<%=rsn("kfxwglid")%>"></td>
<td align="center" class="td_line"><%cks=rsn("kfxwglje")
if cks<1 then
response.write "0"
response.write formatnumber(cks,2)
else
response.write formatnumber(cks,2)
end if
%> </td>
<td align="center" class="td_line"><%=rsn("kfxwglywy")%> </td>
<td align="center" class="td_line"><%=rsn("kfxwglxwzl")%> </td>
<td align="center" class="td_line" title="<%=rsn("kfxwglxwjl")%>"><%=left(rsn("kfxwglxwjl"),15)%> </td>
<td align="center" class="td_line"><%=rsn("kfxwglsj")%> </td>
<td align="center" class="td_line"><a href="addkfxw.asp?xkfid=<%=rsn("xkfid")%>&page=<%=pagecount%>&kfglid=<%=kfglid%>&kfxwglid=<%=rsn("kfxwglid")%>" target="I4">修改</a></td>
</tr>
<%
rsn.movenext
next
%> <tr>
<td height="1" valign="top" colspan="29" bgcolor="#000000"></td>
</tr>
<tr>
<td height="2" valign="top" colspan="29" bgcolor="#000000"></td>
</tr>
<tr>
<td height="30" colspan="8" align="right" valign="middle"> <input type="checkbox" name="llBox" onClick="javascript:fncSelectAll(true,false);"> <Span id="yesorno">全选本页</Span>
<input name="del" type="submit" id="del" onClick="Javascript:return confirm('一但彻底删除,这些客户行为将无法恢复,你确定这样做吗?');" value="彻底删除" class=button style="COLOR: #ffcc33">
</td>
</tr>
<tr>
<td colspan="8" align="right" valign="middle">共<%=rsn.pagecount%>页 <%=rsn.recordcount%>条记录 每页<%=rsn.pagesize%>条 当前第 <%=page%> 页<% If rsn.pagecount>1 Then %> <a href="?page=1&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">首页</a> <a href="?page=<%= page-1 %>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">上一页</a> <a href="?page=<%= page+1 %>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">下一页</a> <a href="?page=<%=rsn.pagecount%>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">尾页</a>
第
<select name="page" id="page" onChange="MM_jumpMenu('self',this,0)">
<% for i =1 to rsn.pagecount %>
<option value="?page=<%= i %>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>" <% If page=i Then %> selected<% End If %>
><%= i %></option>
<% next %>
</select>
页
<% End If %> </td>
</tr>
</table>
<TABLE id=data_table cellSpacing=0 cellPadding=3 width="100%"
bgColor=#dbeaf5 border=0>
<TBODY>
<TR>
<TD height="20" align="left" valign="middle"></TD>
</TR>
<TR bgColor=#c1cdd8>
<TD align=middle height=1></TD>
</TR>
<TR bgColor=#c1cdd8>
<TD align=middle
height=1></TD>
</TR>
</TBODY>
</TABLE>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -