schtdanwei.asp

contract management system

<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">

<!--#include file="../Inc/dbconn.asp" -->
<!--#include file="../Inc/config.asp" -->

<link href="../other/admin.css" rel="stylesheet" type="text/css">
<title><%=appname%></title>
<%
tablename=Trim(Request("tablename"))
values=Trim(Request("values"))
'response.write tablename&values
HtdanweiID =	Trim(Request("HTdanweiID"))
HtdanweiName=	Trim(Request("HtdanweiName"))
Htdanweilianxiren=	Trim(Request("HTdanweilianxiren"))
HtdanweiDiZhi=	Trim(Request("HTdanweiDiZhi"))
HtdanweiClassID=	Trim(Request("HTdanweiClassID"))
Htdanweishouji=	Trim(Request("HTdanweishouji"))
Htdanweichuanzhen=	Trim(Request("HTdanweichuanzhen"))
Htdanweiyoubian=	Trim(Request("HTdanweiyoubian"))
Htdanweidianhua=	Trim(Request("HTdanweidianhua"))
Htdanweiyinhang=	Trim(Request("HTdanweiyinhang"))
Htdanweizhanghao=	Trim(Request("HTdanweizhanghao"))
Htdanweinashuihao=	Trim(Request("HTdanweinashuihao"))
Htdanweiweb=	Trim(Request("HTdanweiweb"))
Htdanweimail=	Trim(Request("HTdanweimail"))
Htdanweifaren=	Trim(Request("HTdanweifaren"))
Htdanweibeizhu=	Trim(Request("HTdanweibeizhu"))

%>

<SCRIPT language=javascript>
<!--
function popwin(path)
{		
window.open(path,"","height=480,width=550,resizable=no,scrollbars=no,status=no,toolbar=no,menubar=no,location=no");
}
//-->
</SCRIPT>

</body>
<style type="text/css">
<!--
.style1 {font-size: 9px}
-->
</style>
<div align="center">
  <table width="1978" height="37" border="0" cellpadding="1" cellspacing="1" bordercolor="#996699">
    <tr class="back_southidc">
     <%if Htdanweiid ="1" then %>    <th width="102" height="14"> <div align="center" class="green">
        <div align="center">单位编码</div>
      </div></th><% end if%>
    <%if HtdanweiName ="1" then %>  <th width="199"><div align="center">单位名称</div></th><% end if%>
       <%if Htdanweilianxiren ="1" then %> <th width="86"><div align="center">联系人</div></th><% end if%>
       <%if HtdanweiDiZhi="1" then %> <th width="217"><div align="center">地址</div></th><% end if%>
       <%if HtdanweiClassID ="1" then %> <th width="95"><div align="center">单位类型</div></th><% end if%>
      <%if Htdanweishouji ="1" then %>  <th width="106"><div align="center">手机</div></th><% end if%>
      <%if Htdanweichuanzhen ="1" then %>  <th width="103"><div align="center">传真</div></th><% end if%>
      <%if Htdanweiyoubian ="1" then %>  <th width="96"><div align="center">邮 编</div></th><% end if%>
     <%if Htdanweidianhua ="1" then %>   <th width="95"><div align="center">固定电话</div></th><% end if%>
       <%if Htdanweiyinhang ="1" then %> <th width="171"><div align="center"> 开户银行 </div></th><% end if%>
      <%if Htdanweizhanghao ="1" then %>  <th width="141"><div align="center"> 银行帐号 </div></th><% end if%>
      <%if Htdanweinashuihao ="1" then %>  <th width="105"><div align="center"> 纳 税 号 </div></th><% end if%>
       <%if Htdanweiweb ="1" then %> <th width="86"><div align="center"> 公司主页 </div></th><% end if%>
       <%if Htdanweimail ="1" then %> <th width="75"><div align="center"> 电子油箱 </div></th><% end if%>
      <%if Htdanweifaren="1" then %>  <th width="82" class="green"><div align="center"> 公司法人 </div></th><% end if%>
       <%if Htdanweibeizhu ="1" then %> <th width="107" class="green">备注</th><% end if%>
       <th width="60"><div align="center" class="green">
        <div align="center">相关操作</div>
      </div></th>
    </tr>
    <% dim i,intPage,page,pre,last,filepath
  set rs = server.CreateObject("adodb.recordset")
if tablename="HTdanweiclassID" then 
 response.write "请输入完整的单位类型如：销售商"
 sql="select * from pro_danwei where [htdanweiclassID] =(select htdanweiclassID from pro_HTdanweiclass where htdanweiclassname ='"&values&"')"
else
   sql="select * from pro_danwei  where ["&tablename&"]like '%"&values&"%' Order by id desc "
end if
   rs.PageSize = 20
      rs.CursorLocation = 3
      rs.Open sql,conn,0,2,1   
      pre = true
      last = true
      page = trim(Request.QueryString("page"))
      
      if len(page) = 0 then
                  intpage = 1
                  pre = false
      else
          if cint(page) =< 1 then
               intpage = 1
               pre = false
          else
              if cint(page) >= rs.PageCount then
                  intpage = rs.PageCount
                  last = false
              else
                   intpage = cint(page)
             end if
         end if
      end if
    if not rs.eof then
         rs.AbsolutePage = intpage
    end if
	 %>
     <%    
   for i=1 to rs.PageSize
     if rs.EOF or rs.BOF then exit for
  %>
    
  <TR class="tr_southidc" onmouseover="this.style.background='#E1F4EE';" onmouseout="this.style.background='#FFFFFF'" >
      <%if HTdanweiID ="1" then %>  <td width="102" height="20"> <div align="center" class="blue"> <a href=javascript:popwin("Show.asp?id=<%=rs("HTdanweiID")%>&ClassId=<%=rs("HTdanweiClassID")%>")><%=rs("HTdanweiID")%></a></div></td> <%end if%>
    <%if HtdanweiName ="1" then %>    <td width="199"><%=rs("HTdanweiName")%></td><%end if%>
      <%if HTdanweilianxiren ="1" then %> <td width="86"><%=rs("HTdanweilianxiren")%></td><%end if%>
      <%if HTdanweiDiZhi ="1" then %><td width="217"><%=rs("HTdanweiDiZhi")%></td><%end if%>
     <%if HTdanweiClassID ="1" then %><td width="95">
	  
	  
	  <%daima2=rs("HTdanweiClassID")
	  
	   set rst = server.CreateObject("adodb.recordset")
        
   sql="select * from pro_HTdanweiClass where HTdanweiClassID='"&daima2&"'"    
      rst.Open sql,conn,0,2,1 
	if not (rst.EOF or rst.BOF) then
	    
	    response.write rst("HTdanweiClassName")
		else
		response.write "类型已删"
		end if
		rst.close
		set rst= nothing
	  %> </td><%end if%>
       <%if HTdanweishouji ="1" then %><td width="106"><%=rs("HTdanweishouji")%></td><%end if%>
      <%if HTdanweichuanzhen ="1" then %> <td width="103"><%=rs("HTdanweichuanzhen")%></td><%end if%>
      <%if HTdanweiyoubian ="1" then %> <td width="96"><%=rs("HTdanweiyoubian")%></td><%end if%>
      <%if HTdanweidianhua ="1" then %> <td width="95"><%=rs("HTdanweidianhua")%></td><%end if%>
      <%if HTdanweiyinhang ="1" then %><td width="171"><%=rs("HTdanweiyinhang")%></td><%end if%>
     <%if HTdanweizhanghao ="1" then %>  <td width="141"><%=rs("HTdanweizhanghao")%></td><%end if%>
      <%if HTdanweinashuihao="1" then %> <td width="105"><%=rs("HTdanweinashuihao")%></td><%end if%>
     <%if HTdanweiweb ="1" then %>  <td width="86"><%=rs("HTdanweiweb")%></td><%end if%>
     <%if HTdanweimail ="1" then %>  <td width="75"><%=rs("HTdanweimail")%></td><%end if%>
       <%if HTdanweifaren ="1" then %><td width="82" class="green"><div align="center" class="blue"> <%=rs("HTdanweifaren")%></div></td><%end if%>
      <%if HTdanweibeizhu ="1" then %> <td width="107" class="green"><%=rs("HTdanweibeizhu")%></td><%end if%>
      <td width="60"><div align="center" class="red">/<a href="delHTdanwei.asp?id=<%=rs("id")%>">删除</a></div></td>
    </TR>
     <%  
     rs.movenext
    next
   %>
  </table> 
  <p></p>
  <p></p>
</div>
<div align="center"><span class="blue">
  <%if rs.pagecount > 0 then%>
  </span>
</div>
<td width="15%" align="left" class="blue"><div align="center" class="blue">当前页<%=intpage%>/<%=rs.PageCount%></div></td>
<div ><span class="blue">
  <%else%>
  </span>
</div>
<td width="12%" align="left" class="blue"><div align="center"><BR>尚无任何记录</div></td>
<div align="center"><span class="blue">
  <%end if%>
  </span>
</div>
<td width="73%" align="right"> <div align="center">
  <p class="blue"><a href="SChtdanwei.asp?page=1&tablename=<%=tablename%>&values=<%=values%>&HTdanweiID=<%=	HTdanweiID%>&HTdanweiName=<%=	HTdanweiName%>&HTdanweilianxiren=<%=	HTdanweilianxiren%>&HTdanweiDiZhi=<%=	HTdanweiDiZhi%>&HTdanweiClassID=<%=	HTdanweiClassID%>&HTdanweishouji=<%=	HTdanweishouji%>&HTdanweichuanzhen=<%=	HTdanweichuanzhen%>&HTdanweiyoubian=<%=	HTdanweiyoubian%>&HTdanweidianhua=<%=	HTdanweidianhua%>&HTdanweiyinhang=<%=	HTdanweiyinhang%>&HTdanweizhanghao=<%=	HTdanweizhanghao%>&HTdanweinashuihao=<%=	HTdanweinashuihao%>&HTdanweiweb=<%=	HTdanweiweb%>&HTdanweimail=<%=	HTdanweimail%>&HTdanweifaren=<%=	HTdanweifaren%>&HTdanweibeizhu=<%=	HTdanweibeizhu%>">首页</a>| 
      <%if pre then%>
      <a href="SChtdanwei.asp?page=<%=intpage -1%>&tablename=<%=tablename%>&values=<%=values%>&HTdanweiID=<%=	HTdanweiID%>&HTdanweiName=<%=	HTdanweiName%>&HTdanweilianxiren=<%=	HTdanweilianxiren%>&HTdanweiDiZhi=<%=	HTdanweiDiZhi%>&HTdanweiClassID=<%=	HTdanweiClassID%>&HTdanweishouji=<%=	HTdanweishouji%>&HTdanweichuanzhen=<%=	HTdanweichuanzhen%>&HTdanweiyoubian=<%=	HTdanweiyoubian%>&HTdanweidianhua=<%=	HTdanweidianhua%>&HTdanweiyinhang=<%=	HTdanweiyinhang%>&HTdanweizhanghao=<%=	HTdanweizhanghao%>&HTdanweinashuihao=<%=	HTdanweinashuihao%>&HTdanweiweb=<%=	HTdanweiweb%>&HTdanweimail=<%=	HTdanweimail%>&HTdanweifaren=<%=	HTdanweifaren%>&HTdanweibeizhu=<%=	HTdanweibeizhu%>">上页</a>| 
      <%end if%>          
      <%if last then%>
      <a href="SChtdanwei.asp?page=<%=intpage +1%>&tablename=<%=tablename%>&values=<%=values%>&HTdanweiID=<%=	HTdanweiID%>&HTdanweiName=<%=	HTdanweiName%>&HTdanweilianxiren=<%=	HTdanweilianxiren%>&HTdanweiDiZhi=<%=	HTdanweiDiZhi%>&HTdanweiClassID=<%=	HTdanweiClassID%>&HTdanweishouji=<%=	HTdanweishouji%>&HTdanweichuanzhen=<%=	HTdanweichuanzhen%>&HTdanweiyoubian=<%=	HTdanweiyoubian%>&HTdanweidianhua=<%=	HTdanweidianhua%>&HTdanweiyinhang=<%=	HTdanweiyinhang%>&HTdanweizhanghao=<%=	HTdanweizhanghao%>&HTdanweinashuihao=<%=	HTdanweinashuihao%>&HTdanweiweb=<%=	HTdanweiweb%>&HTdanweimail=<%=	HTdanweimail%>&HTdanweifaren=<%=	HTdanweifaren%>&HTdanweibeizhu=<%=	HTdanweibeizhu%>">下页</a> |
      <%end if%>
      <a href="SChtdanwei.asp?page=<%=rs.PageCount%>&tablename=<%=tablename%>&values=<%=values%>&HTdanweiID=<%=	HTdanweiID%>&HTdanweiName=<%=	HTdanweiName%>&HTdanweilianxiren=<%=	HTdanweilianxiren%>&HTdanweiDiZhi=<%=	HTdanweiDiZhi%>&HTdanweiClassID=<%=	HTdanweiClassID%>&HTdanweishouji=<%=	HTdanweishouji%>&HTdanweichuanzhen=<%=	HTdanweichuanzhen%>&HTdanweiyoubian=<%=	HTdanweiyoubian%>&HTdanweidianhua=<%=	HTdanweidianhua%>&HTdanweiyinhang=<%=	HTdanweiyinhang%>&HTdanweizhanghao=<%=	HTdanweizhanghao%>&HTdanweinashuihao=<%=	HTdanweinashuihao%>&HTdanweiweb=<%=	HTdanweiweb%>&HTdanweimail=<%=	HTdanweimail%>&HTdanweifaren=<%=	HTdanweifaren%>&HTdanweibeizhu=<%=	HTdanweibeizhu%>">尾页</a> <br>
    </p>
  </div>
</html>