indexyuanlai.asp
来自「一个诚信信息港门户网 功能: 系统设置 企业会员 个人」· ASP 代码 · 共 610 行 · 第 1/2 页
ASP
610 行
do while not rs.eof
goname=rs("SMT_user")
goid=rs("SMT_id")
coname=trim(rs("SMT_coname"))%>
<!--#include file="dns/dns.asp"-->
<tr><td height=22>·<a href=<%=usertwourl%> target=_blank class=f12><%=LeftT(coname,28)%></a> <img src="img/vip.gif" title="VIP会员"></td></tr>
<%rs.movenext
loop
rs.close%>
</table>
</td>
</tr>
<tr>
<td height=65 valign=top align=center><script language=javascript src=ads.asp?priceid=1&place=4></script></td>
</tr>
<tr>
<td height=30 background="img/bgtitle.gif">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> <strong class=f14><font color="#FFFFFF">推荐展会</font></strong></td>
<td align=right><a href=zh.asp class=black><strong>更多>></strong></a> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td height=72><p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 3 * from SMT_exhibit where SMT_key=2 and SMT_key2=1 order by SMT_tjdate desc"
rs.open sql,conn,1,1
do while not rs.eof
z_name=trim(rs("SMT_z_name"))
%>
·<a href=zh_view.asp?id=<%=rs("SMT_id")%> target="_blank" class="f12"><%=LeftT(z_name,32)%></a><br>
<%rs.movenext
loop
rs.close%></td>
</tr>
</table>
</td>
</tr>
<tr><td height=195><script language=javascript src=ads.asp?priceid=1&place=5></script></td></tr>
<tr><td height=30 background="img/bgtitle.gif"> <strong class=f14><font color="#990000">招商</font><font color="#FFFFFF">合作</font></strong></td>
</tr>
<tr>
<td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td><p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 5 * from SMT_sca where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 and (SMT_scasort=1 or SMT_scasort=4) order by SMT_tjdate desc"
rs.open sql,conn,1,1
do while not rs.eof
scatitle=trim(rs("SMT_scatitle"))%>
·<a href=sca_view.asp?id=<%=rs("SMT_id")%> target="_blank" class="f12"><%=LeftT(scatitle,32)%></a><br>
<%rs.movenext
loop
rs.close%></td>
</tr>
</table>
</td>
</tr>
</table>
<!--===============right end =========-->
</td>
</tr>
<tr><td colspan=2 height=2></td></tr>
<tr><td colspan=2><script language=javascript src=ads.asp?priceid=1&place=2></script></td></tr>
<tr><td colspan=2 height=2></td></tr>
</table>
<!--####################################################################-->
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="480" valign=top>
<!--=========left===============-->
<table width="480" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td height=30 background="img/bgtitle.gif"> <font color=#ffffff class=f14><strong>产品推荐</strong> 共有 <%=cpcount%> 件产品</font></td>
<td height=30 background="img/bgtitle.gif" align=right><font color=#ffffff class=f14><strong><a href=cp.asp class=white>更多...</a></strong></font> </td></tr>
<tr><td colspan=2>
<!--===================-->
<table width="100%" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor=#cccccc>
<tr bgcolor=#ffffff>
<%set rs=server.createobject("adodb.recordset")
sql="select top 8 * from SMT_cp where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 order by SMT_id desc"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1
cpname=rs("SMT_cpname")%>
<td valign=top>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td align="center" height=90><a href=cp_view.asp?id=<%=rs("SMT_id")%> target="_blank"><img src="<%=rs("SMT_pic")%>" border="0" width=80 height=80></a></td></tr>
<tr><td align="center" height=25 bgcolor=#efefef style="border-top:1px #cccccc solid"><strong><a href=cp_view.asp?id=<%=rs("SMT_id")%> target="_blank" class=black><%=LeftT(cpname,12)%></a></strong></td></tr>
</table>
</td>
<%if n mod 4=0 and n<>8 then response.write"</tr><tr bgcolor=#ffffff>"
rs.movenext
loop
rs.close%>
</tr>
</table>
<!--===================-->
</td></tr>
<tr><td colspan=2 height=5></td></tr>
</table>
<!--$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$-->
<table width="480" border="0" cellspacing="0" cellpadding="0" style="border:1px #666666 solid">
<tr>
<td width=111 rowspan="4"><img src="img/index_job.gif"></td>
<td colspan=3 valign=top height=20><img src="img/index_job02.gif" width=366></td>
</tr>
<tr>
<td width=184 height=161 valign=top>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 7 * from SMT_Job_zp where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
title=rs("SMT_job_name")
if len(title)>8 then title=left(title,7)&"..."%>
<tr>
<td height=20><img src="img/index_aro4.gif" align=absmiddle> <a href=job_zp_view.asp?id=<%=rs("SMT_id")%> target="_blank"><%=title%></a></td>
<td align=right><%=year(rs("SMT_date"))&"-"&month(rs("SMT_date"))&"-"&day(rs("SMT_date"))%> </td>
</tr>
<%rs.movenext
loop
rs.close%>
<tr>
<td colspan=2 height=20 align=right><strong><a href=job.asp>更多>></a></strong> </td>
</tr>
</table>
</td>
<td width=1><img src="img/index_job04.gif"></td>
<td width=184 valign=top>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 7 * from SMT_Job_qz where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_iname is not null and SMT_key3=1 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
title=rs("SMT_iname")%>
<tr>
<td height=20> <img src="img/index_aro4.gif" align=absmiddle> <a href=job_qz_view.asp?id=<%=rs("SMT_id")%> target="_blank"><%=title%></a></td>
<td align=right><%=year(rs("SMT_dateandtime"))&"-"&month(rs("SMT_dateandtime"))&"-"&day(rs("SMT_dateandtime"))%> </td>
</tr>
<%rs.movenext
loop
rs.close%>
<tr>
<td colspan=2 height=20 align=right><strong><a href=job.asp>更多>></a></strong> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan=3 height=1 background="img/index_job03.gif"></td>
</tr>
<tr>
<td colspan=3 height=20 align=right><img src="img/index_job05.gif" align=absmiddle>招聘职位:<font color=red><strong><%=zpcount%></strong></font> 个 <img src="img/index_job05.gif" align=absmiddle>求职人数:<font color=red><strong><%=qzcount%></strong></font> 人 <a href=individual/reg.asp class=red target=_blank><strong>免费加入人才库</strong></a> </td>
</tr>
</table>
<!--==========left end==============-->
</td>
<td width="280" valign=top>
<!--==========right==============-->
<table width="270" border="0" cellspacing="0" cellpadding="0" align=right bgcolor=#efefef>
<tr><td height=30 background="img/bgtitle.gif" class=f14> <strong><font color="#FFFFFF">行业新闻</font></strong></td>
</tr>
<tr>
<td height=30>
<table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor=D7D7D7>
<tr align=center bgcolor=E4E4E4>
<%set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_xxnewssort order by SMT_date desc"
rs1.open sql1,conn,1,1
n=0
do while not rs1.eof
n=n+1%>
<td height=20><a href=new_list.asp?id=<%=rs1("SMT_id")%> target="_blank"><%=rs1("SMT_newssort")%></a></td>
<%if n mod 8=0 then response.write"</tr><tr align=center bgcolor=E4E4E4>"
rs1.movenext
loop
rs1.close%>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr><td height=5></td></tr>
<tr>
<td><p style="line-height:190%"><%set rs=server.createobject("adodb.recordset")
sql="select top 10 * from SMT_xxnews where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_xxnewssort where SMT_id="&rs("SMT_newssort")
rs1.open sql1,conn,1,1
newssort=rs1("SMT_newssort")
rs1.close
title=trim(rs("SMT_title"))
if cityHTML=1 then
webget="Html/xxnews/"&year(rs("SMT_date"))&month(rs("SMT_date"))&"/"&replace(replace(replace(rs("SMT_date"),"-",""),":","")," ","")&".html"
else
webget="new_view.asp?id="&rs("SMT_id")&""
end if
%>
·<font color=red><%=newssort%></font>|<a href=<%=webget%> target="_blank" class=f12><%=LeftT(title,32)%></a><br>
<%rs.movenext
loop
rs.close%></td>
</tr>
<tr><td height=5></td></tr>
</table>
</td>
</tr>
<tr><td height=30 background="img/bgtitle.gif" class=f14> <strong><font color="#FFFFFF">意见反馈</font></strong></td>
</tr>
<form name="addform" method="post" action="Include/leaveword_save.asp" target=_blank>
<input name=sortid type=hidden value=1>
<input name=tableid type=hidden value=0>
<input name=ypid type=hidden value=0>
<tr><td height=25 align=center>姓名<input name="book_user" type="text" size="10" maxlength="20" class="input2"> 邮箱<input name="book_contact" size="10" type="text" maxlength="40" class="input2"></td></tr>
<tr><td align=center><textarea class=TEXTAREA1 name="book_content" cols=30 rows=3></textarea></td></tr>
<tr><td height=25 align=center><input type="submit" name="Submit" value=" 下 一 步 " class="input1"></td></tr>
<tr><td height=30 valign=bottom align=center bgcolor=#ffffff><a href="#" class=black onClick="this.style.behavior='url(#default#homepage)';this.sethomepage('<%=cityurl%>');return false;"><img src="img/index.gif" border=0></a>
<a href="#" class=black onClick="window.external.AddFavorite('<%=cityurl%>','<%=citytitle%>');return false"><img src="img/sc.gif" border=0></a></td></tr>
</form>
</table>
<!--===============right end =========-->
</td>
</tr>
<tr><td colspan=2 height=5></td></tr>
</table>
<!--=============== links =========-->
<%if webkey8=0 then%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td height=3 bgcolor=#FF6600 colspan=7></td>
</tr>
<tr><td height=5 bgcolor=#FF9900 colspan=7></td>
</tr>
<tr>
<td colspan=7 bgcolor=efefef height=30> <strong>友情连接</strong>: </td>
</tr>
<tr><td background="img/list_line_1.gif" colspan=7></td></tr>
<tr><td colspan=7></td></tr>
<tr><td background="img/list_line_1.gif" colspan=7></td></tr>
<tr><td colspan=7></td></tr>
<tr><td background="img/list_line_1.gif" colspan=7></td></tr>
<tr align=center>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_links where SMT_key=0 and SMT_key1=1 order by SMT_id desc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
<td height="25"><a href=<%=rs("SMT_linkurl")%> title=<%=rs("SMT_linksm")%> target="_blank"><%=rs("SMT_linkname")%></a></td>
<%if n mod 7=0 then response.write "</tr><tr align=center>"
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</tr>
<tr align=center>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_links where SMT_key=1 and SMT_key1=1 order by SMT_id desc"
rs.open sql,conn,1,1
if not rs.eof then
n=0
do while not rs.eof
n=n+1%>
<td height="40"><a href=<%=rs("SMT_linkurl")%> title=<%=rs("SMT_linksm")%> target="_blank"><img src="<%=rs("SMT_linkname")%>" width=88 height=31 border=0></a></td>
<%if n mod 7=0 then response.write "</tr><tr align=center>"
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</tr>
</table>
<%end if%>
<!--####################################################################-->
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor=#ffffff>
<tr><td height=5></td></tr>
<tr><td height=2 bgcolor=#FF6600></td></tr>
<tr>
<td align="center" height=80><%=citybottom%></td>
</tr>
</table>
</body>
</html>
<!--&eid=1-->
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?