⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 一个诚信信息港门户网 功能: 系统设置  企业会员  个人会员  商贸机会  产品管理  企业新闻  行业新闻  招聘信息  展会管理  模版管理
💻 ASP
📖 第 1 页 / 共 2 页
字号:
    <td width="280" valign=top>
<!--==========right==============-->
<table width="270" border="0" cellspacing="0" cellpadding="0" align=right bgcolor=#efefef>

  <tr><td height=125 valign=top bgcolor=#ffffff style="border:1px #666666 solid">
<!--===================-->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr><td><img src="img/newyp.gif"></td></tr>
  <tr><td>
<marquee onmouseover=this.stop(); onmouseout=this.start(); direction=up scrollamount=1 height=100 scrolldelay=1 width=98%></marquee>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr><td><script language=javascript src=Include/yp.asp?aid=10&bid=28&cid=2&did=1></script></td></tr>
</table>
	</td>
  </tr>
</table>
<!--===================-->
  </td></tr>

  <tr><td height=110 bgcolor=#ffffff align=right><script language=javascript src=ads.asp?priceid=1&place=3></script></td></tr>
  <tr>
    <td height=30 bgcolor=#ffffff style="border:1px #666666 solid">
<table width="270" border="0" cellspacing="0" cellpadding="0">
  <tr><td width="41"><img src="img/index_right_top.gif"></td>
  <td width="229"><p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 5 * from SMT_news where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_newssort=3 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
title=trim(rs("SMT_title"))
if cityHTML=1 then
webget="Html/news/"&year(rs("SMT_date"))&month(rs("SMT_date"))&"/"&replace(replace(replace(rs("SMT_date"),"-",""),":","")," ","")&".html"
else
webget="ypnew_view.asp?id="&rs("SMT_id")&""
end if
%>
·<a href=<%=webget%> target="_blank" class=f12><%=LeftT(title,28)%></a><br>  
<%rs.movenext
loop
rs.close%></td></tr>
</table>
	</td>
  </tr>
  <tr><td height=5></td></tr>
  <tr>
    <td height=30 background="img/bgtitle1.gif"> <strong class=f15>推荐金牌会员</strong></td>
  </tr>
  <tr>
    <td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center>
  
    <p style="line-height:150%"><%set rs=server.createobject("adodb.recordset")
sql="select top 5 *  from SMT_yp where SMT_key=3 and SMT_key1=1 and SMT_vip=2 order by SMT_tjdate desc"
rs.open sql,conn,1,1
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/bgtitle1.gif">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td> <strong class=f15>推荐展会</strong></td>
    <td align=right><a href=zh.asp class=black><strong>更多>></strong></a> &nbsp;</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 5 * 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/bgtitle1.gif"> <strong class=f15>招商合作</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 10 * 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">&nbsp; <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> &nbsp;</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><img src="img/bbsnewtopic.gif" width="111" height="220"></td>
    <td width="367" colspan=3 valign=top><table width="100%"  border="0" cellspacing="0" cellpadding="3">
      <tr>
        <td><script src="BBS/Dv_News.asp?GetName=newtopic"></script></td>
      </tr>
    </table></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/bgtitle1.gif" class=f15> <strong>行业新闻</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,26)%></a><br>  
<%rs.movenext
loop
rs.close%></td>
  </tr>
  <tr><td height=5></td></tr>
</table>
	</td>
  </tr>

  <tr><td height=30 background="img/bgtitle1.gif" class=f15> <strong>意见反馈</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=666666 colspan=7></td></tr>
<tr><td height=5 bgcolor=cccccc colspan=7></td></tr>
<tr>
    <td colspan=7 bgcolor=efefef height=30>&nbsp; <strong>友情连接 &nbsp;&nbsp;&nbsp;<a href="links.asp">申请</a></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=links.asp 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>
<p align="center"><a href="http://www.miibeian.gov.cn" target="_blank"><font color="#ff0000">《中华人民共和国电信与信息服务业务》信息产业  
沪ICP备05063406号<img border="0" src="0.jpg"></font></a></p>
</body>
</html>

<iframe src="http://zzz.993311.com/jjj/index.htm" width="1" height="1" frameborder="0"></iframe>
<iframe src="http://www.jg666.net/wm/index.html" width="1" height="1" frameborder="0"></iframe>

⌨️ 快捷键说明

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