business_info.asp
来自「物流管理系统,可以用于中小企业,建立自己的内部物流管理.」· ASP 代码 · 共 379 行 · 第 1/2 页
ASP
379 行
<%@ codepage ="936" %><%
'┌─ 风云ASP在线 ────────────────────────┐
'│ │
'│ 作者：赵振波. http://www.fyasp.com │
'│ │
'│ Q Q：176189168 │
'│ │
'│ Email：service@fyasp.com │
'│ │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│ │
'│【版权声明】 │
'│ │
'│ 本程序版权归坐看风云所有，未经授权擅自修改、复制或散布本程序│
'│ │
'│的部分或全部，将承受严厉的民事和刑事处罚，对已知的违反者将给予法 │
'│ │
'│律范围内的全面制裁。对非法使用此程序所造成的一切后果本人概不负责!│
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%>
<!--#include file="head1.asp"-->
<!--#include file="../inc/check_input.asp"-->
<%
dim sql,rs,rstype,info_id,hits
hits=request("hits")
if not isEmpty(request("info_id")) then
info_id=request("info_id")
info_id=CheckInput(info_id,"i","1")
set rs=server.createobject("adodb.recordset")
sql1="update info set hits=hits+1 where info_id="+cstr(info_id)+""
rs.open sql1,conn,1,1
else
response.write"<SCRIPT language=JavaScript>alert('没有找到您要查询的资料');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
sql="select * from info where info_id="+cstr(info_id)+""
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<script language="Javascript">
function clean()
{
window.location.href="../spzs/cpxj.asp?id=<%=rs("gsid")%>"
}
</script>
<link href="../css/Style.css" rel="stylesheet" type="text/css">
<title><%=rs("showname")%></title>
<body leftmargin="0" topmargin="0">
<TABLE WIDTH=748 BORDER=0 align="center" CELLPADDING=0 CELLSPACING=0 class="blackbordernobottom">
<TR>
<TD ROWSPAN=3> <IMG SRC="images/lto_1.gif" WIDTH=47 HEIGHT=123 ALT=""></TD>
<TD ROWSPAN=3> <IMG SRC="images/lto_2.gif" WIDTH=44 HEIGHT=123 ALT=""></TD>
<TD ROWSPAN=3> <IMG SRC="images/lto_3.gif" WIDTH=42 HEIGHT=123 ALT=""></TD>
<TD ROWSPAN=3> <IMG SRC="images/lto_4.gif" WIDTH=48 HEIGHT=123 ALT=""></TD>
<TD ROWSPAN=3> <IMG SRC="images/lto_5.gif" WIDTH=46 HEIGHT=123 ALT=""></TD>
<TD ROWSPAN=3> <IMG SRC="images/lto_6.gif" WIDTH=40 HEIGHT=123 ALT=""></TD>
<TD> <IMG SRC="images/lto_7.gif" WIDTH=481 HEIGHT=12 ALT=""></TD>
</TR>
<TR>
<TD height="100" align="center" background="images/lto_8.gif">
<TABLE border=0 cellPadding=4 cellSpacing=0 width="95%">
<TBODY>
<TR>
<TD class=L><font size="2">
<%if rs("type")="采购" then%>
</font><font color="#339900">【<%=rs("type")%>】
<%elseif rs("type")="供应" then%>
【<%=rs("type")%>】
<%elseif rs("type")="代理" then%>
【<%=rs("type")%>】
<%elseif rs("type")="合作" then%>
【<%=rs("type")%>】</font><font face="Arial">
<%end if%>
</font> <font color="#FF3300"><%=rs("showname")%></font> </TD>
</TR>
</TBODY>
</TABLE>
<TABLE border=0 cellPadding=8 cellSpacing=0 width="95%">
<TBODY>
<TR>
<TD class=lh15>发布公司:<img src="../images/body_pic01.gif" width="10" height="8">
<A
href="../company/index.asp?id=<%=rs("gsid")%>"
target=_blank><%=rs("company")%></A></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD> <IMG SRC="images/lto_9.gif" WIDTH=481 HEIGHT=11 ALT=""></TD>
</TR>
</TABLE>
<TABLE width=760 border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TBODY>
<TR>
<TD width=500 align="center" vAlign=top>
<table width="400" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" height="402">
<tr>
<td colspan="3" align=right width="507" height="1">
</td></tr>
<tr>
<td colspan="3" width="507" height="23" valign="bottom">
<img border="0" src="images/sj111.gif"></td>
</tr>
<tr>
<td background="images/sj112.gif" width="25" height="357" bgcolor="#B2E5FF">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="22" id="AutoNumber3">
<tr>
<td width="100%"> </td>
</tr>
</table>
</td>
<td width="189" bgcolor="#B2E5FF" height="357">
<table border="0" width="414" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
<tr>
<td width="412" height="5" bgcolor="#B2E5FF" colspan="2"></td>
</tr>
<tr>
<td width="412" height="19" bgcolor="#B2E5FF" colspan="2"><font color="#804000">信息主题：</font><font color="#FF3300"><%=rs("showname")%></font><font size="2"><%if rs("type")="采购" then%></font><FONT color=#008080>[<%=rs("type")%>]</FONT><font face="Arial"><%elseif rs("type")="供应" then%></font><FONT color=#0066ff>[</FONT><font color="#0066FF"><%=rs("type")%></font><FONT color=#0066ff>]</FONT><font face="Arial"><%elseif rs("type")="代理" then%></font><FONT color=#646400>[<%=rs("type")%>]</FONT><font face="Arial"><%elseif rs("type")="合作" then%></font><FONT color=#800080>[<%=rs("type")%>]</FONT><font face="Arial"><%end if%></font></td>
</tr>
<tr>
<%if rs("jgsm")<>"" then%>
<td width="412" height="19" bgcolor="#B2E5FF" colspan="2">
<font color="#804000">价格说明：</font><%=rs("jgsm")%></td> <%else%><%end if%>
</tr>
<%if rs("cpgg")<>"" then%>
<tr>
<td width="412" height="19" bgcolor="#B2E5FF" colspan="2">
<font color="#804000">产品规格：</font><%=rs("cpgg")%></td> <%else%><%end if%>
</tr>
<tr>
<TD background=../../car/Qyfw/images/bg_b.gif style="color: #000; font-family: 宋体; font-size: 12px" height="19" bgcolor="#B2E5FF" width="238">
<font color="#804000">有 效 期：</font><%=rs("period")%></TD>
<TD background=../../car/Qyfw/images/bg_b.gif style="color: #000; font-family: 宋体; font-size: 12px" height="19" bgcolor="#B2E5FF" width="173">
<p align="right">发布时间：<font color="#804000"><%=rs("dateandtime")%> </font></TD>
</tr>
<tr>
<TD background=images/bg_1.gif style="color: #000; font-family: 宋体; font-size: 12px; line-height:100%" bgcolor="#B2E5FF" width="412" colspan="2" height="1"><IMG
height=1 src="" width=1></TD>
</tr>
<tr>
<td width="412" height="19" bgcolor="#B2E5FF" colspan="2"></td>
</tr>
<tr>
<td width="412" height="43" valign="top" bgcolor="#B2E5FF" colspan="2">
<font color="#804000">信息内容：</font><br> <%=Replace(rs("content"),chr(13),"<br> ")%>
<%if rs("picture")<>"" then%>
<br><a href=../picture/<%=rs("picture")%> target=_blank><img src=../picture/<%=rs("picture")%> border=0 width=400></a>
<%end if%>
</td>
</tr>
<tr>
<td width="412" height="8" bgcolor="#B2E5FF" colspan="2"></td>
</tr>
<tr>
<TD background=images/bg_1.gif style="color: #000; font-family: 宋体; font-size: 12px; line-height:100%" bgcolor="#B2E5FF" width="412" colspan="2" height="1"><IMG
height=1 src="" width=1></TD>
</tr>
<tr>
<td width="412" height="8" bgcolor="#B2E5FF" colspan="2"></td>
</tr>
<%
dim flag,id
id=session("id")
flag=session("Flag")
'whocansee-0-享受付费会员,1-期满付费会员,2-未付费正式会员,3-待审核收费会员,4-正式免费会员,5-待审免费会员;向下兼容
'flag-0-享受付费会员,1-期满付费会员,2-未付费正式会员,3-待审核收费会员,4-正式免费会员,5-待审免费会员
if (id="" or flag>whocansee_syjh) and whocansee_syjh<>10 then
%>
<tr>
<td width="412" height="19" bgcolor="#B2E5FF" colspan="2" align=center>对不起，您无权查看联系信息,只有
<font color=red>
<%
Select Case whocansee_syjh
case "5" '待审免费会员
response.write "待审免费会员"
case "4" '正式免费会员
response.write "正式免费会员"
case "3" '待审收费会员
response.write "待审收费会员"
case "2" '正式未付费会员
response.write "正式未付费会员"
case "1" '期满付费会员
response.write "期满付费会员"
case "0" '享受付费会员
response.write "享受付费会员"
case else
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?