link_task_manage.asp

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

Case "2"

	SQL_Order = "Order By Link_Fashion"

Case "-2"

	SQL_Order = "Order By Link_Fashion 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">
	<form name="form1" method="post">
	<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">
            
                <tr align="left" bgcolor="ffffff"> 
                  <td height="20" colspan="2" background="Images/box_bg.gif">&nbsp;</td>
                  <td width="15%" height="20" background="Images/box_bg.gif"><a href="Link_Task_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Fashion=<%= Search_Fashion %>&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="15%" height="20" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Link_Task_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Fashion=<%= Search_Fashion %>&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="18%" height="20" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Link_Task_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Fashion=<%= Search_Fashion %>&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%>
                    任务时间 
                    <%Else%>
                    创建时间 
                    <%End IF%>
                    </a></td>
                  <td width="25%" background="Images/box_bg.gif" bgcolor="ffffff"><a href="Link_Task_Manage.asp?Makking=Search&key=<%= Search_key%>&Search_Fashion=<%= Search_Fashion %>&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 Link_Task.*,Link_Task.DateTime,Link_Task.DateTime As DateTime_2,Link_Task.ID As Task_ID,Link_Task.Buyer_ID,My_Buyer.Employee_ID,My_Buyer.Buyer_ID,Buyer_Info.*,Buyer_Info.Buyer_ID from Link_Task,My_Buyer,Buyer_Info where (Link_Task.Buyer_ID = Buyer_Info.Buyer_ID) and (My_Buyer.Buyer_ID = Buyer_Info.Buyer_ID) "& SQL_Search_City &" "& SQL_Search_Fashion &" "& 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 = 20
%>
                <!--#include file="../inc/page.asp"-->
                <tr align="left" bgcolor="ffffff" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#F5F5F5'"> 
                  <td height="22" colspan="2" align="center">
<input name="ID" type="checkbox" id="ID" value="<%=Rs("Task_ID")%>">
                  </td>
                  <td height="22"><a href="javascript:Link_Task_See('<%=Rs("Link_Task_ID")%>');"><%=Rs("Link_Task_Name")%></a></td>
                  <td width="15%" height="22"><%=Rs("Link_Fashion")%></TD>
                  <td height="22"> 
                    <%IF Time_Type= "2" Then%>
                    <%=Rs("Link_Task_Time")%> 
                    <%Else%>
                    <%=Rs("DateTime_2")%> 
                    <%End IF%>
                  </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:Link_Task_List('<%=Rs("Buyer_ID")%>');">记录</A>|<a href="javascript:Link_Task_Add_1('<%=Rs("Buyer_ID")%>');">添加</A></td>
                  <td height="22"> <a href="javascript:Link_Task_Add('<%=Rs("Buyer_ID")%>','<%=Rs("Link_Task_ID")%>');">修改</A>|<a href="javascript:Link_Task_State('<%=Rs("Link_Task_ID")%>')"><%=Rs("Link_Task_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="2" align="center" valign="middle" background="Images/box_bg_1.gif">
<input type="checkbox" name="checkbox2" value="" onClick="mm()">
            </td>
            <td width="45%" height="24" 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_Fashion="& Search_Fashion &"&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><input name="button" type="button" class="BoxBoult" value="打印" onClick=javascript:Task_Print(this.form)>
        <input name="button2" type="button" class="BoxBoult" value="清除" onClick=javascript:Task_Print_Del();>
      </form></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 Link_Task_See(id){
        window.open("Link_Task_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 Link_Task_List(id){
        window.open("Link_Task_List.asp?id="+id+"","","width=500,height=380,scrollbars=yes");
    }
    function Link_Task_Add_1(id){
        window.open("Link_Task_Add.asp?id="+id+"","","width=500,height=310,scrollbars=yes");
    }
    function Link_Task_Add(id,Link_Task_ID){
        window.open("Link_Task_Add.asp?id="+id+"&Link_Task_ID="+Link_Task_ID+"","","width=500,height=380,scrollbars=yes");
    }
    function Link_Task_Del(id){
        window.open("Link_Task_Del.asp?id="+id+"","","width=500,height=310,scrollbars=yes");
    }
    function Link_Task_State(id){
        window.open("Link_Task_State.asp?id="+id+"","","width=500,height=280,scrollbars=yes");
    }
	
	var idColl = "";
	
	function Task_Print(formObj){
		for(var i=0;i<formObj.elements.length;i++){
			if(formObj.elements[i].type == "checkbox" && formObj.elements[i].checked){
				if(idColl == ""){
					idColl = formObj.elements[i].value;
				}else{
					idColl += "," + formObj.elements[i].value;
				}
			}
		}
		window.open("Task_Print.asp?ID="+idColl,"Print","width=750,height=600,scrollbars=yes")
	} 
    function Task_Print_Del(){
        window.open("SessionAbandon.asp","","width=500,height=300,scrollbars=yes");
    }
//-->
</script>
<script language=javascript>
function mm()
{
   var a = document.getElementsByTagName("input");
   if(a[0].checked==true){
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = false;
   }
   else
   {
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = true;
   }
}
</script>