<!--#include file="conn.asp"-->
<%Call head()
dim id
id=usb(request.QueryString("id"))
set rsxl=Server.CreateObject("ADODB.Recordset")
rspl="select * from shop_xx where cstr(fid)='"&myid&"' and cstr(id)='"&id&"'"
rsxl.open rspl,connshop,1,2
if rsxl.eof then
Response.write "请从有效路径进入<br/>"
Else
Call saycarda("删除商品")
%>
<!--#INCLUDE file="../bbs/sy1.asp"-->


<%sql="delete from shop_xx Where CStr(id)='" & id & "'"
  connshop.Execute(sql)%>
删除成功<br/>
<a href='mysp.asp?sid=<%=sid%>'>我的商品</a>|<a href='tdp.asp?sid=<%=sid%>&amp;id=<%=myid%>'>进入店铺</a><br/>
<%end if%>
-=-=-=-=-=-=-<br/>
<!--#include file="fanhui.asp"-->
<%Call headsay()%>