?? goods_del.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../Inc/AdminChk.asp"-->
<!--#include file="Conn.asp"-->
<%
Set rs=Server.CreateObject("Adodb.Recordset")
sql = "select * from goods_info where goods_id="&request("goods_id")&""
rs.open sql,conn,1,3
if not rs.eof or rs.bof then
if rs("goods_pic")<>"" then
tempfpath="../"&rs("goods_pic")
FiLePaTh = Server.MapPath(tempfpath)
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(FiLePaTh)
set fso=nothing
end if
conn.execute("delete * from goods_info where goods_id="&request("goods_id")&"")
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect("goods_list.asp")
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -