del.asp

来自「java的一个网上商店的源码,后台是Access数据库.功能还可以.界面比较简单」· ASP 代码 · 共 21 行

<% option explicit%>
<!-- #include virtual="/admin/store/_lib/_lib.asp" -->
<%
'-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
'	功能：公告管理--删除公告
'	@Language=VBscript
'-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Dim bul_id
call DB_Connect(strconn)
'---验证身份----
Call AdminCheck
bul_id=getForm("id")
oConn.Execute("Delete t_BulletionCon from where B_Id="&bul_id)
call DB_DisConnect  '断开数据库
%>
<script language="JavaScript">
<!--
alert("删除完成!");
window.location.href="index.asp";
//-->
</script>