欢迎来到虫虫下载站 | 资源下载 资源专辑 关于我们
虫虫下载站

home.asp

一个不错的企业网站源代码!
ASP
第 1 页 / 共 2 页
字号:
                <td bgcolor="#339900" width="1"></td>
              </tr>
            </table>
          </td>
          <%rs.MoveNext 
            i=i+1
            loop
            rs.Close %>
            <%
            x=0
            j=3-i%>
            <%do while x<j%>
					<td width=200>&nbsp;</td>
			<%x=x+1
			 loop %>		

        </tr>
      </table>
      <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr>
          <td height="22">&nbsp;</td>
        </tr>
      </table>
      
    </td>
    <td background="images/line_v.gif" width="1"></td>
    <td valign="top">
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td align="center"><img src="images/tp_magazine.gif" width="276" height="18"></td>
        </tr>
      </table>
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr>
          <td class="font2">
          <%sqltext="select top 1 body from danwei where enable=1 and pid=3 order by pl desc"
            rs.Open sqltext,cn,1,1
            if not rs.EOF then
                Response.Write (checktitle(trim(rs("body")),160))
            end if   
            rs.Close  
            %>
          </td>
        </tr>
      </table>
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td colspan="2">&nbsp;</td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
          <td width="70"><a href="<%=linkmagazine%>" class="more" target="_blank">详情内容&gt;&gt;</a></td>
        </tr>
      </table>

    </td>
    <td bgcolor="#66cc00" width="1"></td>
  </tr>
</table>
<table width="778" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
  <tr> 
    <td bgcolor="#66cc00" width="1"></td>
    <td width="490" valign="top" background="images/bot_bg.jpg" style="background-repeat: repeat-x; background-position: bottom"> 
      <table width="99%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td background="images/line_h.gif" height="1"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td><img src="images/title_business.gif" width="76" height="22"></td>
        </tr>
      </table>
      <%sqltext="select top 5 id,name from danwei where enable=1 and pid=8 order by pl desc"
        rs.Open sqltext,cn,1,1
        do while not rs.EOF %>
      <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td colspan="2" height="10"></td>
        </tr>
        <tr> 
          <td width="20" class="font3" valign="top">※</td>
          <td><a href="<%=linksaledetail%>?id=<%=rs("id")%>" class="anews"><%=trim(rs("name"))%></a></td>
        </tr>
      </table>
      <%rs.MoveNext 
        loop
        rs.Close  %>
      <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td colspan="2">&nbsp;</td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
          <td width="60"><a href="<%=linksalebusiness%>" class="more">更多内容&gt;&gt;</a></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td>&nbsp;</td>
        </tr>
      </table>
    </td>
    <td background="images/line_v.gif" width="1"></td>
    <td valign="top" background="images/bot_bg.jpg" style="background-repeat: repeat-x; background-position: bottom"> 
      <table width="280" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr>
          <td background="images/line_h.gif" height="1"></td>
        </tr>
      </table>
      <table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td>&nbsp;</td>
        </tr>
      </table>
      <table width="93%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td><img src="images/tp_careers_home.gif" width="76" height="22"></td>
        </tr>
      </table>
      <table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td class="font1" height="30"><font color="#005500">因企业发展需要,现诚聘以下人员:</font></td>
        </tr>
      </table>
      <%sqltext="select top 4 * from engage where state=1 order by sortnum"
        rs.Open sqltext,cn,1,1
        do while not rs.EOF %>
      <table width="88%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td colspan="2" height="10"></td>
        </tr>
        <tr> 
          <td width="20" class="font3" valign="top">※</td>
          <td><a href="<%=linkcareers%>?keyno=<%=rs("keyno")%>&detail=1" class="anews"><%=trim(rs("title"))%></a></td>
        </tr>
      </table>
      <%rs.MoveNext 
        loop
        rs.Close %>
      <table width="88%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td colspan="2">&nbsp;</td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
          <td width="60"><a href="<%=linkcareers%>" class="more">更多内容&gt;&gt;</a></td>
        </tr>
      </table>    
    <table width="88%" border="0" cellspacing="0" cellpadding="0" align="center">
      <tr><td>&nbsp;</td></tr>
    </table>
    </td>
    <td bgcolor="#66cc00" width="1"></td>
  </tr>
</table>
<!-- #include file="end.asp" -->
<script language=Javascript>
	function load(sel) {
		var url = sel.options[sel.selectedIndex].value;
		if (url != ""){
			if (typeof(sel.options[sel.selectedIndex].target)!="undefined"){
				open(url, sel.options[sel.selectedIndex].target);
			}else{
				eval(sel.options[sel.selectedIndex].value)
			}
			sel.selectedIndex=0
		}
		else{
					
		}				
		return false;
	}
	
	function playrm(code)
	{
	window.open('playrm.asp?code='+code,'','toolbar=no,location=no,status=no,menubar=no,width=350,height=330,left=120,top=100')
	}
</script>
<%
if session("gg")="" then session("gg")=0
if session("gg")=0 then
sqltext="select * from danwei where pid=4 and enable=1 order by pl"
rs.Open sqltext,cn,1,1
top1=70
left1=120
do while not rs.EOF
yhj=rs("yhj")
thj=rs("thj")
%>
<script language=Javascript>	
	window.open("./popwin2.asp?id=<%=rs("id")%>","","width=<%=yhj%>,height=<%=thj%>,scrollbars=no,left=<%=left1%>,top=<%=top1%>")
</script>
<%
rs.MoveNext
top1=top1+30
left1=left1+50
loop 
rs.Close 
session("gg")=1
end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -