📄 qyhy.asp
字号:
<!--#include file="dbconn1.asp"-->
<!--#include file="config.asp"-->
<!--#include file="sortcount.asp"-->
<!--#include file="newcount.asp"-->
<% zhql="select * from qyhy order by ID desc"
Set zhrs= Server.CreateObject("ADODB.Recordset")
zhrs.open zhql,conn,1,1
if zhrs.eof or zhrs.bof then
response.write "<br><br><font size=2 color=red>对不起，目前还没有任何公司。</font>"
response.End()
zhrs.close
set zhrs=nothing
else
'分页输出程序
zhrs.pagesize=20
page=request("page")
'if page>rs.pagecount then
'page=rs.pagecount
'end if
if page="" or page=0 then
page=1
else
zhrs.move(page-1)*zhrs.pagesize
end if
%>
<script language="javascript">
function show_qyhy(link)
{
window.open(link,'','top=50,left=150,width=540,height=450,scrollbars=yes')
}
</script>
<HTML><HEAD><TITLE>中国库存商贸网---企业信息</TITLE>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<META content="text/html; charset=gb2312" http-equiv=Content-Type><LINK
href="css.css" rel=stylesheet type=text/css>
<META content="MSHTML 5.00.3502.5390" name=GENERATOR></HEAD>
<BODY background=images/bg_body.gif leftMargin=0 topMargin=0>
<!--#include file=top.htm-->
<TABLE align=center bgColor=#ffffff border=0 cellPadding=0 cellSpacing=0
style="BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid"
width=778>
<TBODY>
<TR>
<TD align=middle valign="top">
<TABLE border=0 cellPadding=0 cellSpacing=0 width=778>
<TBODY>
<TR>
<TD bgColor=#ffffff vAlign=top width=197>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD><a href="../shangwu/index.asp"><img src="images/right_07.gif" width="197" height="23" border="0"></a></TD>
</TR>
<TR>
<TD valign="top">
<TABLE border=0 cellPadding=4 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=30 vAlign=top>
<div align="center">
<table width="100%" border="0" cellspacing="5" cellpadding="0">
<tr>
<td><div align="center"><img src="images/007.gif" width="120" height="60"></div></td>
</tr>
<tr>
<td><div align="center"><img src="images/007.gif" width="120" height="60"></div></td>
</tr>
</table>
</div></TD>
</TR>
</TABLE>
<SCRIPT>
function view1(url){
var url; window.open(url,'_blank','status=no,scrollbars=yes,top=20,left=110,width=600,height=460');
}
</SCRIPT>
<script language="javascript">
function show_sader(mylink)
{
window.open(mylink,'','top=50,left=120,width=520,height=450,scrollbars=yes')
}
</script>
<script language="javascript">
function show_business(link)
{
window.open(link,'','top=50,left=150,width=520,height=450,scrollbars=yes')
}
</script>
<%
const MaxNumber=10
const Max1=6
dim mrs
dim msql
dim grs
dim gsql
dim drs
dim sql
dim cgsql
dim cgrs
dim rssort
dim sortsql
Set rssort= Server.CreateObject("ADODB.Recordset")
sortsql="select * from Class_1"
rssort.open sortsql,conn,1,1
Set mrs= Server.CreateObject("ADODB.Recordset")
msql="select * from info where type like '" & "采购" & "' and showname like '%"&showname&"%' order by info_id desc"
mrs.open msql,conn,1,1
cgnum=mrs.recordcount
Set grs= Server.CreateObject("ADODB.Recordset")
gsql="select * from info where type like '" & "供应" & "' and showname like '%"&showname&"%' order by info_id desc"
grs.open gsql,conn,1,1
gynum=grs.recordcount
Set drs= Server.CreateObject("ADODB.Recordset")
dsql="select * from info where type like '" & "代理" & "' and showname like '%"&showname&"%' order by info_id desc"
drs.open dsql,conn,1,1
dlnum=drs.recordcount
Set hrs= Server.CreateObject("ADODB.Recordset")
hsql="select * from info where type like '" & "合作" & "' and showname like '%"&showname&"%' order by info_id desc"
hrs.open hsql,conn,1,1
hznum=hrs.recordcount
cgsql="select * from cgal order by NewsID desc"
Set cgrs= Server.CreateObject("ADODB.Recordset")
cgrs.open cgsql,conn,1,1
%>
</TD>
</TR>
</TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD><IMG height=23 src="images/left_02.gif"
width=197></TD>
</TR>
<TR>
<TD>
<TABLE border=0 cellPadding=5 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=35 vAlign=bottom><TABLE width="95%" height="77" border=0 align="center" cellPadding=2 cellspacing="1" bordercolor="#111111" style="border-collapse: collapse">
<TBODY>
<TR>
<TD align=middle colSpan=2 height="27">
<FONT
color=#FF6600><B>库存信息分类统计</B></FONT></TD>
</TR>
<TR>
<TD height="17"> <div align="center"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=供应&keyword=0&datetime=7788&txtitle=<%=title%>">供应</a>
<font color="#808080"> <%=gynum%></font></div></TD>
<TD height="17"> <div align="center"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=采购&keyword=0&datetime=7788&txtitle=<%=title%>">采购</a>
<font color="#808080"> <%=cgnum%></font></div></TD>
</TR>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -