shangping_shjia.asp

商业网站开发有源代码可以运行

<script language="JavaScript">
<!--
function demo(Page,scrl){
if (false)window.close();
 if  (!window.win || win.closed)  
 {
 win=open(Page,"gouwu","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,top=2,width=450,height=350,scrollbars="+scrl+",resizable=1");
 }
 else{
  win.close();
  win=open(Page,"gouwu","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,top=2,width=450,height=350,scrollbars="+scrl+",resizable=1");
  } 
}
//-->
</script>
<table width="90%" border="0" cellspacing="0" cellpadding="2" align="center">
  <tr> 
    <td width="20%" rowspan="4" align="center" valign="middle"> 
      <%if rs_shp("bookpic")="" then 
	response.write "<a href=list.asp?id="&rs_shp("bookid")&" target=_blank><img src=images/emptybook.gif width=75 height=75 border=0></a>"
	else%>
      <div align="center"><a href=list.asp?id=<%=rs_shp("bookid")%> target=_blank><img src="<%=trim(rs_shp("bookpic"))%>"  width=75 border=0 height="75"></a> 
        <%end if%>
      </div></td>
    <td width="80%"><a href=list.asp?id=<%=rs_shp("bookid")%> target=_blank><font color="#990000"><%=trim(rs_shp("bookname"))%></font></a></td>
  </tr>
  <tr> 
    <td width="70%">市场价：<s><font color=red><%=trim(rs_shp("shichangjia"))%></font></s>元 
      会员价：<font color=red><%=trim(rs_shp("huiyuanjia"))%></font>元 VIP价：<font color=red><%=trim(rs_shp("vipjia"))%></font>元</td>
  </tr>
  <tr> 
    <td width="70%"><a href="javascript:demo('gouwu.asp?id=<%=rs_shp("bookid")%>&action=add');"><img src="images/goumai.gif" width="43" height="12" border=0></a>&nbsp;&nbsp;<a href="javascript:;" onClick="javascript:window.open('shoucang.asp?id=<%=rs_shp("bookid")%>&action=add','shouchang','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');"><img src="images/shoucang1.gif" width="49" height="13" border=0></a></td>
  </tr>
  <tr> 
    <td width="70%"> <font color="#999999">&nbsp;&nbsp;&nbsp;&nbsp; 
      <%if len(trim(rs_shp("bookcontent")))>40 then
	response.write left(trim(rs_shp("bookcontent")),40)&"...."
	else
	response.write trim(rs_shp("bookcontent"))
	end if%>
      </font></td>
  </tr>
  <tr> 
    <td colspan="2" height=1 background="images/bj_x1.gif"></td>
  </tr>
</table>