showsubs.asp

来自「在线订单系统」· ASP 代码 · 共 61 行

ASP

61 行

<!--#include file="inc/userconn.inc"--><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="inc/guhongying.css">
<title>产品明细</title>
</head>
<%
subsid=request("subsid")
sql="select * from subs where subs='"&subsid&"'"
Set rs=Server.CreateObject("ADODB.RecordSet") 
rs.Open sql,conn,1,1 
%>

<body bgcolor="7C96B8" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table height="50" align="center"><tr><td></td></tr></table>
  
<table width="50%" border="0" cellspacing="1" cellpadding="6" bgcolor="#000000" align="center">
  <tr align="left" bgcolor="316395"> 
    <td colspan="3"><font color="#FFFFFF"><b>此商品的详细信息：</b></font></td>
  </tr>
  <tr bgcolor="eeeeee"> 
    <td rowspan="5">
<%
if rs("photo")="0" then
response.write "此<br>商<br>品<br>没<br>有<br>图<br>样"
else
photo=rs("photo")
photo="photo/"+photo
%>
<img src="<%=photo%>" width="40" height="60">
<%end if%> 
 </td>
    <td width="35%">商品编号：</td>
    <td width="65%"><%=rs("subs")%></td>
  </tr>
  <tr bgcolor="6699CC"> 
    <td width="35%"><font color="#FFFFFF">商品名称：</font></td>
    <td width="65%"><%=rs("subsname")%></td>
  </tr>
  <tr bgcolor="eeeeee"> 
    <td width="35%">市场价格：</td>
    <td width="65%"><%=rs("subsnumber")%></td>
  </tr>
  <tr bgcolor="#6699CC"> 
    <td width="35%"><font color="#FFFFFF">会员价格：</font></td>
    <td width="65%"><%=rs("price")%></td>
  </tr>
  <tr bgcolor="eeeeee"> 
    <td width="35%" bgcolor="eeeeee">其他相关信息：</td>
    <td width="65%"> <%
    other = rs("other")
	other = replace(other,chr(13),"<br>")
    other = replace(other,chr(32),"&nbsp;")
	response.write other
%> </td>
  </tr>
</table>
  </body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

showsubs.asp

showsubs.asp - 源码说明

⌨️ 快捷键说明