多媒体编程

开发平台：

ASP/ASPX

zhen.asp：源码内容

							<!--#include file="users.asp" -->
<!--#include file="config.asp" -->
<!--#include file="../md5.asp" -->
<!--#include file="cookies.asp" -->
<%
		if rs4("boolOrtherDel")=False then
			Response.Redirect "index.asp"
		end if
		if rs4("boolTatt")=True then
			Response.Redirect "index.asp"
		end if
	end if
	rs.close
	set rs=nothing
end if
%>
<!--#include file="function.asp" -->
<!--#include file="code.asp" -->
<!--#include file="first.asp" -->
<table border=0 cellspacing=0 style='border-collapse:collapse' width=735 height=233 cellpadding=3>
<tr>
<td width=185 valign=top>
<!--#include file="inc.asp" -->
</td>
<td width=550 height=233 valign=top>
<%
if Request.Form("zhen")<>"" then
	select case Request.Form("zhen")
		case "1"
			conn.execute("update [download] set boolZhen=False where id in ("&replace(request.form("id"),"'","")&")")
		case "2"
			conn.execute("delete from [download] where id in ("&replace(request.form("id"),"'","")&")")
		case "3"
			response.write("抱歉程序执行错误,请检测你的操作是否正确")
			response.end
	end select
	Response.write("操作完成，2秒钟后返回<META HTTP-EQUIV=REFRESH CONTENT='2;URL=zhen.asp'>")
	response.end
end if
%>
<table border=0 cellpadding=3 cellspacing=0 style='border-collapse:collapse' width=100%>
<tr>
<td width=100% align=left class=shadow2>待认证影片列表</td>
<tr>
<td width=100% align=center><%zhen_show()%></td>
</tr>
</table>
<br>
</td>
</tr>
</table>
<br><hr width=735>
<center>
</center>
</body>
</html>

						