28,406
社区成员
发帖
与我相关
我的任务
分享
<%if rs2("stock")>0 then %>
<input name="ss2" id="ss2" type="button" onClick="window.open('check.asp?price2=2&ProdId= <%=rs2("id")%>/>
<%else%>
<input name="ss2" id="ss2" type="button" onClick="window.open('check.asp?price2=2&ProdId= <%="没有该商品!"%>/>
<% end if %>
<% if name=click1 then
response.Write(price)
else
response.write(price2)
end if
%>
<%
dim id,company,intro,graph2,description,remarks,price,price2,rs2,strSorts,strCategory
id=Int(saferequest("id",1))
set rs2=server.CreateObject("adodb.recordset")
sql="select * from product order by ID desc"
rs2.open sql,conn,1,1
if rs2.eof and rs2.bof then
response.Write "暂无产品上架"
response.End
end if
rs2("viewnum")=rs2("viewnum")+1
rs2.update
IntCatID = rs2("categoryid")
IntCatIDLong=IntCatID
set rs=server.CreateObject("adodb.recordset")
if IntCatID = 0 then
rs.open "Select categoryid,category,ParentID From category Where categoryid="&IntCatID,conn,1,1
if rs.eof and rs.bof then
response.Write "<script LANGUAGE='javascript'>alert('您输入的参数非法,请正确操作!');history.go(-1);</script>"
rs.close
set rs = Nothing
conn.Close
set conn=nothing
response.end
end if
strCategory = "<a href=b2b_cplist.asp?catid="&rs("categoryid")&">"&rs("category")&"</a>->"&strCategory
TitleCategory = TitleCategory&""&rs("category")&"->"
IntCatID = rs("ParentID")
IntCatIDLong=CStr(IntCatIDLong)&","&CStr(rs("ParentID"))
end if
set rs = nothing
%>
<%
dim ProdId,msg
if rs2("stock")>0 then
ProdId=rs2("id")
else
msg='对不起,库存不足,请过段时间再来购买该商品!'
response.write "<script>"
response.write "alert('对不起,库存不足,请过段时间再来购买该商品!');window.close();"
response.write "</script>"
response.end()
end if
%>
<%
dim ProdId,msg
if rs2("stock")>0 then
ProdId=rs2("id")
else
msg='对不起,库存不足,请过段时间再来购买该商品!'
response.write "<script>"
response.write "alert('对不起,库存不足,请过段时间再来购买该商品!');window.close();"
response.write "</script>"
response.end()
end if
%>
<input name="click1" id="click1" type="button" onClick="window.open('check.asp?price=1&ProdId=<%=ProdId%>','','scrollbars=yes,width=760,height=500')" class="greenbuttoncss" value="放入购物车" />
<input name="ss2" id="ss2" type="button" onClick="window.open('check.asp?price=2&ProdId=<%=ProdId%>','','scrollbars=yes,width=760,height=500')" class="greenbuttoncss" value="放入购物车" />
<%
dim name
name=request.querystring("name")
if name="click1" then
response.Write(price)
elseif name="ss2" then
response.write(price2)
end if
%>
<% if name=ss2 then
response.write(price2)
elseif name=click1 then
response.Write(price)
end if
%> 元