/admin/art/delscl.asp
https://github.com/74hu/74hujz · ASP · 34 lines · 32 code · 2 blank · 0 comment · 1 complexity · 169c231676a47f82c2ad4d48d01e1a6c MD5 · raw file
-
- <!-- #include file="../ding.asp" -->
- <!-- #include file="mymin.asp" -->
- <%Call Head()%>
- <card title="文章删除结果">
- <p>
- <% dim rs,sql,id
- id=request.QueryString("id")
- if id="" or IsNumeric(id)=False then
- Call Error("ID无效!")
- end if
- classid=int(request.QueryString("classid"))
- call conndata
- set rs=server.createobject("adodb.recordset")
- rs.open "Select * from 74hu_article where id="&id ,conn,2,3
- If Not rs.eof Then
- rs.delete
- Response.Write "文章删除成功!"
- else
- Response.Write "文章删除失败!可能已删除或者文章不存在"
- rs.close
- set rs=nothing
- conn.close
- set conn=nothing
- end if
- %>
- <br/>----------<br/>
- <a href="adminsmscl.asp?sid=<%=sid%>&id=<%=classid%>">[文章列表]</a><br/>
- <a href="wzclass.asp?sid=<%=sid%>&id=<%=id%>">[文章分类]</a><br/>
-
- <a href="../index.asp?sid=<%=sid%>">[后台管理]</a>
- </p>
- </card>
- </wml>