fl.asp

来自「物流管理系统,可以用于中小企业,建立自己的内部物流管理.」· ASP 代码 · 共 70 行

ASP
70
字号
<%@ codepage ="936" %><%
'┌─  风云ASP在线  ────────────────────────┐
'│                                                                 │
'│  作者:赵振波.	http://www.fyasp.com	    				    │
'│                                                                 │
'│   Q Q:176189168  										   	    │
'│                                                                 │
'│ Email:service@fyasp.com                                        │
'│                                                                 │
'│ 程序定做,系统开发,网站制作,提供高质量的网络产品、技术和服务!│
'│                                                                 │
'│【版权声明】                                                     │
'│                                                                 │
'│     本程序版权归坐看风云所有,未经授权擅自修改、复制或散布本程序│
'│                                                                 │
'│的部分或全部,将承受严厉的民事和刑事处罚,对已知的违反者将给予法 │
'│                                                                 │
'│律范围内的全面制裁。对非法使用此程序所造成的一切后果本人概不负责!│
'│                                                                 │
'└───────────────────  http://www.fyasp.com ──┘
%><!--#include file="../inc/config.asp"-->
<!--#include file="../conn/dbconn1.asp"-->
<%
dim mrs
dim msql
dim grs
dim gsql
dim drs
dim sql
dim cgsql
dim cgrs
Set mrs= Server.CreateObject("ADODB.Recordset") 
msql="select * from info where type like '" & "采购" & "'" 
mrs.open msql,conn,1,1
cgnum=mrs.recordcount
Set grs= Server.CreateObject("ADODB.Recordset") 
gsql="select * from info where type like '" & "供应" & "'" 
grs.open gsql,conn,1,1
gynum=grs.recordcount
Set drs= Server.CreateObject("ADODB.Recordset") 
dsql="select * from info where type like '" & "代理" & "'" 
drs.open dsql,conn,1,1
dlnum=drs.recordcount
Set hrs= Server.CreateObject("ADODB.Recordset") 
hsql="select * from info where type like '" & "合作" & "' " 
hrs.open hsql,conn,1,1
hznum=hrs.recordcount
%>
<HTML><HEAD><TITLE><%=WebName%>·商业机会</TITLE>
<LINK 
href="../css/Style.css" rel=stylesheet type=text/css>
<META content="Microsoft FrontPage 6.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff text=#000000 topMargin=0 marginheight="0">
<TABLE border=0 cellPadding=2 width="154" height="47" style="border-collapse: collapse" bordercolor="#111111" cellspacing="1">
<TR>
<TD height="17" width="77">
<a style="text-decoration: none" target="_top" href="sjsearch.asp?type=供应&keyword=0&datetime=7788&txtitle=<%=title%>">供应</a> <font color="#808080">
<%=gynum%></font></TD>
<TD height="17" width="74">
<a style="text-decoration: none" target="_top" href="sjsearch.asp?type=采购&keyword=0&datetime=7788&txtitle=<%=title%>">采购</a> <font color="#808080">
<%=cgnum%></font></TD></TR>
<TR>
<TD height="1" width="77">
<a style="text-decoration: none" target="_top" href="sjsearch.asp?type=合作&keyword=0&datetime=7788&txtitle=<%=title%>">合作</a> <font color="#808080">
<%=hznum%></font></TD>
<TD height="1" width="74">
<a style="text-decoration: none" target="_top" href="sjsearch.asp?type=代理&keyword=0&datetime=7788&txtitle=<%=title%>">代理</a> <font color="#808080">
<%=dlnum%></font></TD></TR>
</TABLE>
</HTML>

⌨️ 快捷键说明

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