showpic.asp

来自「电子商城代码」· ASP 代码 · 共 76 行

<!--#include file="connshop.asp" -->
<!--#include file="webconfig.asp"-->
<%
response.charset="utf-8"
session.codepage="65001"
strwebtitle=www56770com_word510
response.write c_skin_56770(c_skin_word(skin_head))
'topmenu()
'On Error Resume next
id=Trim(CInt(Request("id")))
if not isnumeric(id)then
        Response.Write "<script language=""javascript"">alert('"&www56770com_word497&"');location.href='default.asp';</script>"
		response.end
End If
Set rss=Server.CreateObject("ADODB.RecordSet") 
sql="select product_name,cpic from [56770_product] where id=" & id
rss.open sql,conn,1,1
if rss.eof then
        response.write "<script language=""javascript"">alert('"&www56770com_word480&"');location.href='default.asp';</script>"
        response.end
Else 
%>
<script language="javascript" src="include/js/js_menu.js"></script>
<SCRIPT language=javascript>
function cls() {
	if (document.all) {
		window.opener='abc';
	}
	window.close();
	return false;
}
</SCRIPT>
<BODY 
style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; CURSOR: hand; PADDING-TOP: 0px" 
onclick=cls();>
<table width=<%=webwidth%> border=0 cellpadding=0 cellspacing=0 align=center>
<tr>
<td>
<%=c_skin_56770(c_skin_word(skin_zhuanti_top))%>
<table width="100%" border="0" cellspacing="1" cellpadding="0" class=bk>
        <tr class=bk_h> 
           <td height=25 width="100%" align="center"><%=rss(""&lan_product_name&"")%></td>
        </tr>
<%
dim str_cpic
'response.write rs("cpic")
If InStr(rss("cpic"),"@@")>0 Then 
str_cpic=split(rss("cpic"),"@@")
for i=1 to ubound(str_cpic)
if str_cpic(i)<>"" then
%>
        <tr bgcolor=#ffffff> 
           <td width="100%" align="center"><img onmousewheel="return bbimg(this)" src="pic/<%=str_cpic(i)%>" onload=resizepic(this)></td>
        </tr>
<%
end if
Next
Else
%>
        <tr bgcolor=#ffffff> 
           <td width="100%" align="center"><img onmousewheel="return bbimg(this)" src="pic/<%=rss("cpic")%>" onload=resizepic(this)></td>
        </tr>
<%End if%>
        <tr class=bg_l> 
           <td height=30 width="100%" align="center"><input type="button" name="close2" value="<%=www56770com_word235%>"  onClick="window.close();return false;" class="wenbenkuang1"></td>
        </tr>
</table>
<%=c_skin_56770(c_skin_word(skin_zhuanti_footer))%>
</td>
</tr>
</table>
<%
End If 
rss.close:set rss=Nothing
connclose()
%>