📄 view_corpinfo.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="cs_conn.inc.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
sql="select * from corp_info where id="&Request("id")
set rs=conn.execute (sql)
if not rs.eof or err then
%>
<title>企业信息-- <%=rs("CorpName")%></title>
<%end if %>
<style type="text/css">
<!--
.tdwtfont {
font-size: 14px;
color: #000000;
background-color: #FFFFFF;
line-height: 20px;
}
-->
</style>
<style type="text/css">
<!--
a {
font-size: 12px;
color: #000000;
text-decoration: none;
font-weight: bold;
}
a:hover {
font-size: 12px;
font-weight: bold;
color: #FF0000;
text-decoration: underline;
}
-->
</style>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="10">
<table width="650" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
<tr>
<td><table border="0" cellspacing="0" width="540" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0">
<tr>
<td width="100%" valign="top" height="1"> <%
'sql="select * from corp_info where id="&Request("id")
'set rs=conn.execute (sql)
'if not rs.eof or err then
%> <%
sql="select * from corp_info where id="&Request("id")
set rs=conn.execute (sql)
if not rs.eof or err then
%> <%
sql="select * from calling_info where id="&Request("corp_calling")
%>
</table>
<br> <table width="96%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000">
<tr>
<td class="tdwtfont"> <div align="center"><b><%=rs("CorpName")%></b><br>
<hr noshade>
</div></td>
</tr>
<tr>
<td class="tdwtfont"> <b>省份：</b><%=rs("corp_province")%> </td>
</tr>
<tr>
<td class="tdwtfont"><b>城市：</b><%=rs("corp_city")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>行业:</b>
<%=rs("corp_calling")%>
<% Response.Write("、 ")
%>
<%
dim Corpcalling
Corpcalling=rs("corp_calling")
select case Corpcalling
case"1"
response.Write("罐头类")
case"2"
response.Write("水产品类（不包括活品和晾晒品）")
case"3"
response.Write("肉及肉制品")
case"4"
response.Write("茶叶类")
case"5"
response.Write("肠衣类")
case"6"
response.Write("蜂产品类（不包括蜂蜡）")
case"7"
response.Write("蛋制品类（不包括鲜蛋）")
case"8"
response.Write("速冻果蔬类、脱水果蔬类（不包括晾晒品）")
case"9"
response.Write("糖类（指蔗糖、甜菜糖）")
case"10"
response.Write("乳及乳制品类")
case"11"
response.Write("饮料类（包括固体饮料）")
case"12"
response.Write("酒类")
case"13"
response.Write("花生、干果、坚果制品类（不包括炒制品）、果脯类")
case"14"
response.Write("粮食制品及面")
case"15"
response.Write("糖制品类")
case"16"
response.Write("食用油脂类")
case"17"
response.Write("调味品类（不包括天然的香辛干料及粉料）")
case"18"
response.Write("速冻方便简单类")
case"19"
response.Write("功能简单类")
case"20"
response.Write("简单添加剂类（专指食用明胶）")
case else
response.Write("其他行业")
end select
%>
</td>
</tr>
<tr>
<td class="tdwtfont"><b>地址：</b><%=rs("corp_address")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>邮编：</b><%=rs("post_code")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>电话：</b><%=rs("corp_telcom")%> <b>传真：</b><%=rs("corp_fax")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>联系人：</b> <%
if rs("corp_linkman")="" then
response.Write("<font color=#444444>负责人</font>")
else
response.Write(rs("corp_linkman"))
end if
%> <b>联系人手机：</b><%=rs("linkman_mobile")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>网站：</b><%=rs("website_add")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>邮件地址：</b><%=rs("email_add")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>企业性质：</b> <%
if rs("corp_quality")=1 then
response.Write("<font color=red>重点企业</font>")
else
response.Write("一般企业")
end if
%> </td>
</tr>
<tr>
<td class="tdwtfont"><b>内销，外贸企业：</b> <%
if rs("corp_trade")=1 then
response.Write("<font color=red>外贸企业</font>")
else
response.Write("内销企业")
end if
%> </td>
</tr>
<tr>
<td class="tdwtfont"><b>企业介绍：</b><%=rs("corp_introduce")%></td>
</tr>
<tr>
<td class="tdwtfont"><b>备注：</b><%=rs("corp_remark")%></td>
</tr>
<tr>
<td class="tdwtfont">录入人： <%=rs("username")%></td>
</tr>
<tr>
<td class="tdwtfont">录入时间： <%=rs("DateAndTime")%> </td>
</tr>
</table>
<%end if %> </td>
</tr>
<tr>
<td align="center"> </td>
</tr>
<tr>
<td align="center">[<a href="javascript:window.close();">关闭窗口</a>]</td>
</tr>
<tr>
<td align="center"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"><a href="http://www.crescent.net.cn/">新月网络工作室</a> </td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -