⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 kfglxw.asp

📁 客户管理系统-支持 Ms Sql-Server
💻 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>&nbsp;&nbsp;<font color="#003399">您现在的位置:</font></strong><font color="#003399">客户管理系统 <span class="nav">-&gt;</span> 用户中心 <span class="nav">-&gt;</span> 客户管理</font> <span class="nav">-&gt;</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"> &nbsp;单位名称:</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"> &nbsp;性别:</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">&nbsp;网址:</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">&nbsp;生日:</td>
      <td height="30" align="left" valign="middle" bordercolor="#000033"><%=xkfsr%></td>
      <td height="30" align="center" valign="middle" bordercolor="#000033">&nbsp;备注:</td>
      <td height="30" align="left" valign="middle" bordercolor="#000033"><%=xkfbz%></td>
      <td height="30" align="center" valign="middle" bordercolor="#000033">&nbsp;</td>
      <td height="30" align="left" valign="middle" bordercolor="#000033">&nbsp;</td>
      <td align="center" valign="middle" bordercolor="#000033">&nbsp;</td>
      <td align="left" valign="middle" bordercolor="#000033">&nbsp;</td>
      <td align="center" valign="middle" bordercolor="#000033">&nbsp;</td>
      <td align="left" valign="middle" bordercolor="#000033">&nbsp;</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>&nbsp;&nbsp;&nbsp;</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">&nbsp;</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
	  %>&nbsp;</td>
      <td align="center" class="td_line"><%=rsn("kfxwglywy")%>&nbsp;</td>
      <td align="center" class="td_line"><%=rsn("kfxwglxwzl")%>&nbsp;</td>
      <td align="center" class="td_line" title="<%=rsn("kfxwglxwjl")%>"><%=left(rsn("kfxwglxwjl"),15)%>&nbsp;</td>
      <td align="center" class="td_line"><%=rsn("kfxwglsj")%>&nbsp;</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>&nbsp;&nbsp;&nbsp;
                  <input name="del" type="submit" id="del"  onClick="Javascript:return confirm('一但彻底删除,这些客户行为将无法恢复,你确定这样做吗?');" value="彻底删除" class=button style="COLOR: #ffcc33">
                  &nbsp;&nbsp;&nbsp; </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>&nbsp;&nbsp;<a href="?page=<%= page-1 %>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">上一页</a>&nbsp;&nbsp;<a href="?page=<%= page+1 %>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">下一页</a>&nbsp;&nbsp;<a href="?page=<%=rsn.pagecount%>&kfglid=<%=kfglid%>&xkfid=<%=request("xkfid")%>">尾页</a>&nbsp;&nbsp;
                  
                  <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 %>&nbsp;&nbsp;</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 + -