📄 qyml.asp
字号:
<img border="0" src="images/DIC-DOT.gif"><font color="#FF8019"><span class="S">
</span><a target="_blank" href="../company/index.asp?id=<%=rstj("id")%>"><% if len(rstj("qymc"))>11 then%><%=left(rstj("qymc"),10)%>..<% else%><%=rstj("qymc")%><%end if%></a></td>
<%else%>
<td>
<img border="0" src="images/DIC-DOT.gif"><span class="S">
</span><font color="#FF8019">
<a target="_blank" href="<%=rstj("web")%>"><% if len(rstj("qymc"))>11 then%><%=left(rstj("qymc"),10)%>..<% else%><%=rstj("qymc")%><%end if%></a></td>
<%end if%>
</TR>
<%x=x+1
if x>=MaxInfo then exit do
rstj.movenext
loop
rstj.close
set rstj=nothing
%>
</TD>
</TR>
<tr>
<td colspan="2" height="4">
</td>
</tr>
</TABLE>
</TD>
</tr>
</table>
</center>
</div>
</TD></TR>
</TBODY></TABLE></TD></TR>
<TR>
<TD align=middle><img border="0" src="images/index_111.gif"></TD></TR></TBODY></TABLE></TD>
<TD align=middle vAlign=top>
<TABLE
background="images/company_x8.gif"
border=0 cellSpacing=1 height=35 width="100%" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD align=middle>
<SCRIPT language=javascript>
<!--
function on_submit()
{
document.form1.submit();
}
//-->
</SCRIPT>
<TABLE border=0 cellPadding=0 width="100%" bordercolor="#111111" style="border-collapse: collapse">
<FORM action=search.asp method=POST name=searchtitle>
<TBODY>
<TR>
<TD align=middle class=M width="100">
<p align="right"><B><FONT
color=#0066ff>查询公司:</FONT></B></TD>
<TD align=middle class=M width="129">
<INPUT name=txtitle size=22></TD>
<TD align=middle class=M width="269">
<select size="1" name="stype">
<option value="1">按企业名称</option>
<option value="2">按企业简介</option>
</select><SELECT name=sf>
<OPTION selected value="0">==所有区域==</OPTION>
<OPTION value=安徽>安徽</OPTION>
<OPTION value=北京>北京</OPTION>
<OPTION value=重庆>重庆</OPTION>
<OPTION value=福建>福建</OPTION>
<OPTION value=甘肃>甘肃</OPTION>
<OPTION value=广东>广东</OPTION>
<OPTION value=广西>广西</OPTION>
<OPTION value=贵州>贵州</OPTION>
<OPTION value=海南>海南</OPTION>
<OPTION value=河北>河北</OPTION>
<OPTION value=黑龙江>黑龙江</OPTION>
<OPTION value=河南>河南</OPTION>
<OPTION value=湖北>湖北</OPTION>
<OPTION value=湖南>湖南</OPTION>
<OPTION value=内蒙古>内蒙古</OPTION>
<OPTION value=江苏>江苏</OPTION>
<OPTION value=江西>江西</OPTION>
<OPTION value=吉林>吉林</OPTION>
<OPTION value=辽宁>辽宁</OPTION>
<OPTION value=宁夏>宁夏</OPTION>
<OPTION value=青海>青海</OPTION>
<OPTION value=山西>山西</OPTION>
<OPTION value=陕西>陕西</OPTION>
<OPTION value=山东>山东</OPTION>
<OPTION value=上海>上海</OPTION>
<OPTION value=四川>四川</OPTION>
<OPTION value=天津>天津</OPTION>
<OPTION value=西藏>西藏</OPTION>
<OPTION value=新疆>新疆</OPTION>
<OPTION value=云南>云南</OPTION>
<OPTION value=香港>香港</OPTION>
<OPTION value=澳门>澳门</OPTION>
<OPTION value=台湾>台湾</OPTION>
</SELECT></TD>
<TD width="50"><left>
<INPUT align=bottom border=0
name=I8 src="images/creditservice_search.gif" type=image ><FONT style="CURSOR: hand"
title=请点击查询>
</FONT></TD></TR></FORM></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="99%" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD height=23> 您的位置:<a href="../default.asp">首页</a>>><a href="default.asp">企业名录</a>>><%if request("sf")="0" then%><font color="#FF0000">全部信息</font><%else%><font color="#FF0000"><%=request("Sf")%></font><%end if%></TD></TR>
<TR>
<TD
background="images/creditcompany_x3.gif"
height=1></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD
height=1>
<div align="center">
<center>
<table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber3">
<tr>
<td width="71%" bgcolor="#FFF8EC">
<p align="left"><font color="#FF6600" size="2"><b>显示:</b> </font>
<b><font color="#FF6600">
<a href="qyml.asp?sf=<%=sf%>">全部</a></font></b><font color="#FF6600">
→ </font>
<b><font color="#FF6600">
<a href="qyml.asp?qylb=生产型&sf=<%=sf%>&txtitle=<%=keyword%>">生产型</a></font></b><font color="#FF6600">
→ </font>
<b><font color="#FF6600">
<a href="qyml.asp?qylb=服务型&sf=<%=sf%>&txtitle=<%=keyword%>">服务型</a></font></b><font color="#FF6600">
→ </font>
<b><font color="#FF6600">
<a href="qyml.asp?qylb=贸易型&sf=<%=sf%>&txtitle=<%=keyword%>">贸易型</a></font></b><font color="#FF6600">
→ </font>
<b><font color="#FF6600">
<a href="qyml.asp?qylb=其他&sf=<%=sf%>&txtitle=<%=keyword%>">其他</a></font></b></td>
<td width="29%" bgcolor="#FFF8EC">
<p align="center">
<img border="0" src="images/icon12.gif" alt="高级会员"> 普通会员
<img border="0" src="images/brand.gif" width="16" height="16"> 收费会员</td>
</tr>
</table>
</center>
</div>
</TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="99%" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD bgColor=#CC6600 height=1></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=2 width="100%">
<TBODY>
<TR>
<%do while not rs.eof%>
<TD height=5></TD></TR>
<TR>
<TD align=middle>
<div align="right">
<TABLE border=0 cellPadding=0 cellSpacing=3 width="98%" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD height=20>
<%if rs("flag")=0 then%>·<img border="0" src="images/brand.gif" alt="收费会员">
<%if rs("url")<>"" then %><b><a target="_blank" href="../<%=rs("url")%>">
<%else%><b><a target="_blank" href="../company/index.asp?id=<%=rs("id")%>">
<%end if%>
<span style="font-size: 10.5pt"><font color="#800000"><%=rs("qymc")%></font></span></a></b>
<%else%><img border="0" src="images/icon12.gif" width="16" height="17">
<%if rs("url")<>"" then %><b><a target="_blank" href="../<%=rs("url")%>">
<%else%><b><a target="_blank" href="../company/index.asp?id=<%=rs("id")%>">
<%end if%>
<span style="font-size: 10.5pt; "><font color="#800000"><%=rs("qymc")%></font></span></a></b>
<%end if%>
<font color="#CC6600">【<%=rs("Sf")%>·<%=rs("city")%>】</font><font color="#fc9603"> <%if rs("web")="http://" then%><%else%><a href="<%=rs("web")%>"><img border="0" src="images/home.gif" alt="访问公司网站"></a></font><%end if%>
</TD>
</TR>
<tr>
<TD bgColor=#FFFBF4><font color="#482400">主要业务:<%=rs("zycp")%></font></TD>
</tr>
<tr>
<TD style="WORD-BREAK: break-all">
<%=mid(rs("jygs"),1,80)%>..<FONT style="TEXT-DECORATION: none">[<a style="text-decoration: none" target="_blank" <%if rs("url")<>"" then %>href="../<%=rs("url")%>"><%else%>href="../company/index.asp?id=<%=rs("id")%>"><%end if%>详细信息</a>] </FONT><%=rs("idate")%>
</TD>
</tr>
<tr>
<TD background="images/x_1.gif" height=1></TD>
</tr>
</TBODY>
</TABLE>
</div>
</TD></TR>
<% i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
rs.close
set rs=nothing
end sub
%>
</table>
</center>
</TD>
</tr>
<tr>
<TD align=middle vAlign=top>
<p align="left">
<%function showpage(totalnumber,maxperpage,filename)
dim n
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if
if CurrentPage<2 then
response.write "<table border=0 width=100% cellspacing=3 bgcolor=#F2F2F2 cellpadding=2>"
response.write "<tr height=15>"
response.write "<td align=left>"
response.write "共<font color=ff6600><b>"&n&"</b></font>页 第<font color=ff6600><b>"&CurrentPage&"</b></font>页 共检索到<font color=ff6600><b>"&totalnumber&"</b></font>条信息</TD>"
response.write "<td align=right>"
response.write "【最前页】【上一页】"
else
response.write "<table border=0 width=100% cellspacing=3 bgcolor=#F2F2F2 cellpadding=2>"
response.write "<tr height=15>"
response.write "<td align=left>"
response.write "共<font color=ff6600><b>"&n&"</b></font>页 第<font color=ff6600><b>"&CurrentPage&"</b></font>页 共检索到<font color=ff6600><b>"&totalnumber&"</b></font>条信息"
response.write "<td align=right>"
response.write "【<a href="&filename&"?page=1&sf="&sf&"&qylb="&qylx&"&txtitle="&request("txtitle")&">最前页</a>】"
response.write "【<a href="&filename&"?page="&CurrentPage-1&"&sf="&sf&"&qylb="&qylx&"&txtitle="&request("txtitle")&">上一页</a>】"
end if
if n-currentpage<1 then
response.write "【下一页】【最后页】"
else
response.write "【<a href="&filename&"?page="&(CurrentPage+1)&"&sf="&sf&"&qylb="&qylx&"&txtitle="&request("txtitle")&">"
response.write "下一页</a>】【<a href="&filename&"?page="&n&"&sf="&sf&"&qylb="&qylx&"&txtitle="&request("txtitle")&">最后页</a>】"
end if
response.write "</td>"
response.write "</tr>"
response.write "</form>"
end function
%></TD>
</tr>
</table>
</center>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="750" id="AutoNumber6">
<tr>
<td width="100%" background="images/bt61.gif"> </td>
</tr>
</table>
</center>
</div>
<!--#include file="../inc/end.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -