operation_manage.asp

来自「适用于网络/信息企业」· ASP 代码 · 共 370 行 · 第 1/2 页

End IF

'-------------------------------------------排序

Order	  	  = Trim(Request("Order"))

IF Request.QueryString("Page") = "" OR Request.QueryString("Page")<=1 Then

IF Order = Session("Order") Then Order = "-"& Order

End IF

Select Case Order

Case ""

	SQL_Order = "Order by "& TimeArr &""
	
Case "1"

	SQL_Order = "Order By Pact_Name"

Case "-1"

	SQL_Order = "Order By Pact_Name Desc"

Case "2"

	SQL_Order = "Order By Pact_Money"

Case "-2"

	SQL_Order = "Order By Pact_Money Desc"

Case "3"

	SQL_Order = "Order By "& TimeArr &""

Case "-3"

	SQL_Order = "Order By "& TimeArr &" Desc"

Case "4"

	SQL_Order = "Order By Buyer_Name"

Case "-4"

	SQL_Order = "Order By Buyer_Name Desc"
	
End Select

Session("Order") = Order
%>
<table width="98%" height="40"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><table width="100%"  border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#D8D8D8">
        <tr> 
          <td height="30" align="left" bgcolor="ffffff"><table width="100%" height="100%"  border="0" cellpadding="3" cellspacing="0">
              <tr bgcolor="eeeeee"> 
                <td width="5%" align="center"><img src="Images/1.gif" width="13" height="12"></td>
                <td width="78%"><span class="style2">管理中心 &gt;&gt;&gt; 业务管理</span></td>
                <td width="17%" align="right"> </td>
              </tr>
            </table></td>
        </tr>
      </table></td>
  </tr>
</table>
<table width="98%" height="90%"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#D8D8D8">
  <tr> 
    <td valign="top" bgcolor="ffffff"><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td align="center" bgcolor="ffffff"> <table width=100% border=0 align='center' cellpadding=3 cellspacing=1 bordercolordark=#ffffff bgcolor="eaeaea">
              <td width="3%"> 
              <tr align="left" bgcolor="ffffff"> 
                <td height="20" colspan="3" background="Images/box_bg.gif"><a href="Operation_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Type=<%= Search_Type %>&Search_Body=<%= Search_Body %>&City=<%= Search_City %>&Class=<%= Search_Class %>&Search_State=<%= Search_State %>&Time_1=<%= Time_1 %>&Time_2=<%= Time_2 %>&Employee_ID=<%=Employee_ID%>&Time_Type=<%=Time_Type%>&Order=1">业务名称</a></td>
                <td width="12%" height="20" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Operation_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Type=<%= Search_Type %>&Search_Body=<%= Search_Body %>&City=<%= Search_City %>&Class=<%= Search_Class %>&Search_State=<%= Search_State %>&Time_1=<%= Time_1 %>&Time_2=<%= Time_2 %>&Employee_ID=<%=Employee_ID%>&Time_Type=<%=Time_Type%>&Order=2">合同金额</a> 
                <td width="22%" height="20" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Operation_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Type=<%= Search_Type %>&Search_Body=<%= Search_Body %>&City=<%= Search_City %>&Class=<%= Search_Class %>&Search_State=<%= Search_State %>&Time_1=<%= Time_1 %>&Time_2=<%= Time_2 %>&Employee_ID=<%=Employee_ID%>&Time_Type=<%=Time_Type%>&Order=3"> 
                  <%
				  IF Time_Type= "2" Then Response.Write("截止时间")
                  IF Time_Type= "1" Then Response.Write("签署时间")
                  IF Time_Type= "0" Then Response.Write("创建时间")
                  %>
                  </a></td>
                <td width="25%" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Operation_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Type=<%= Search_Type %>&Search_Body=<%= Search_Body %>&City=<%= Search_City %>&Class=<%= Search_Class %>&Search_State=<%= Search_State %>&Time_1=<%= Time_1 %>&Time_2=<%= Time_2 %>&Employee_ID=<%=Employee_ID%>&Time_Type=<%=Time_Type%>&Order=4">客户名称</a></td>
                <td width="12%" background="Images/box_bg.gif" bgcolor="ffffff">在该企业中</td>
                <td width="12%" background="Images/box_bg.gif" bgcolor="ffffff">操作</td>
              </tr>
              <%
	SQL = "select Operation.*,Operation.DateTime,Operation.DateTime As DateTime_2,Operation.Buyer_ID,My_Buyer.Employee_ID,My_Buyer.Buyer_ID,Buyer_Info.*,Buyer_Info.Buyer_ID from Operation,My_Buyer,Buyer_Info where (Operation.Buyer_ID = Buyer_Info.Buyer_ID) and (My_Buyer.Buyer_ID = Buyer_Info.Buyer_ID) "& SQL_Search_City &" "& SQL_Search_Type &" "& SQL_Search_key &" "& SQL_Search_Class &" "& SQL_Search_State &" "& SQL_Employee_ID &" "& SQL_Time &" AND "& SQL_City &" "& SQL_Order &""
	Set rs=server.CreateObject("adodb.recordset")
	rs.open SQL,Conn,1,1
		IF not (rs.BOF and rs.eof) then
		rs.PageSize = 18
%>
              <!--#include file="../inc/page.asp"-->
              <tr align="left" bgcolor="ffffff" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#F5F5F5'"> 
                <td height="22" colspan="3"><a href="javascript:Operation_See('<%=Rs("Pact_ID")%>');"><%=Rs("Pact_Name")%></a></td>
                <td width="15%" height="22"><%=Rs("Pact_Money")%></TD>
                <td height="22">
				<%
				  IF Time_Type= "2" Then Response.Write(Rs("End_Time"))
                  IF Time_Type= "1" Then Response.Write(Rs("Affix_To_Time"))
                  IF Time_Type= "0" Then Response.Write(Rs("DateTime_2"))
				%>
				</td>
                <td height="22"><a href="javascript:Buyer_Edit('<%=Rs("Buyer_ID")%>');"> 
                  <%
				IF len(Rs("Buyer_Name"))>12 Then
				Response.Write(left(Rs("Buyer_Name"),12)) & "..."
				Else
				Response.Write(Rs("Buyer_Name"))
				End IF
				%>
                  </a></td>
                <td height="22"><a href="javascript:Operation_List('<%=Rs("Buyer_ID")%>');">记录</A>|<a href="javascript:Operation_Add_1('<%=Rs("Buyer_ID")%>');">添加</A></td>
                <td height="22"> 
                  <a href="javascript:Operation_Add('<%=Rs("Buyer_ID")%>','<%=Rs("Pact_ID")%>');">修改</A>|<a href="javascript:Operation_State('<%=Rs("Pact_ID")%>')"><%=Rs("Operation_State")%></A> 
                </td>
              </tr>
              <%
	rs.movenext
	next
	end if
%>
            </table></td>
        </tr>
      </table>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="24" colspan="3" align="left" valign="middle" background="Images/box_bg_1.gif"> 
            <%Call Page_See()%>
          </td>
          <td width="51%" height="24" align="right" valign="middle" background="Images/box_bg_1.gif"> 
            <%Page_links="Makking=Search&key="& Search_key &"&Search_Type="& Search_Type &"&Search_Body="& Search_Body &"&City="& Search_City &"&Class="& Search_Class &"&Search_State="& Search_State &"&Time_1="& Time_1 &"&Time_2="& Time_2 &"&Employee_ID="&Employee_ID&"&Time_Type="& Time_Type &"&Order="& Order &"&"
			call PageControl(iCount,maxpage,page)
			rs.close
			set rs=nothing
Conn.Close
Set Conn = Nothing
			%>
          </td>
        </tr>
      </table>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="1" bgcolor="#E2E1E1"></td>
        </tr>
      </table></td>
  </tr>
</table>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="6"></td>
  </tr>
</table>
<%End Select%>
</body>
</html>
<script language="javascript">
<!--
    function Operation_See(id){
        window.open("Operation_See.asp?id="+id+"","","width=500,height=310,scrollbars=yes");
    }
    function Buyer_Edit(id){
        window.open("Buyer_Edit.asp?id="+id+"","","width=500,height=530,scrollbars=yes");
    }
    function Operation_List(id){
        window.open("Operation_List.asp?id="+id+"","","width=500,height=380,scrollbars=yes");
    }
    function Operation_Add_1(id){
        window.open("Operation_Add.asp?id="+id+"","","width=500,height=310,scrollbars=yes");
    }
    function Operation_Add(id,Pact_ID){
        window.open("Operation_Add.asp?id="+id+"&Pact_ID="+Pact_ID+"","","width=500,height=380,scrollbars=yes");
    }
    function Operation_Del(id){
        window.open("Operation_Del.asp?id="+id+"","","width=500,height=310,scrollbars=yes");
    }
    function Operation_State(id){
        window.open("Operation_State.asp?id="+id+"","","width=500,height=280,scrollbars=yes");
    }
//-->
</script>