Apply,back,friend
页面代码分析
<!--#include file="conn.asp"-->
<%
if session("admin_pass")<>"ok" then
response.redirect "adminlogin.asp"
response.end
end if
user_id=request("user_id")
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from larchives where user_id=" & user_id
rs_del.open sql,conn,3,2
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from user_reg where user_id=" & user_id
rs_del.open sql,conn,3,2
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from friend where user_id=" & user_id & " or for_id=" & user_id
rs_del.open sql,conn,3,2
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from back where user_id=" & user_id & " or for_id="
& user_id
rs_del.open sql,conn,3,2
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from leaveword where user_id=" & user_id
rs_del.open sql,conn,3,2
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete from callboard where user_id=" & user_id
rs_del.open sql,conn,3,2
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("data/picture.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs_del = Server.CreateObject("ADODB.Recordset")
sql="delete * from pic where user_id=" & user_id
rs_del.open sql,conn,3,2
response.redirect "admin.asp"
response.end
%>
第五章 测试和维护
5.1测试方法
程序执行的测试.该方法不适合大单元、大系统的测试,也不适合于评测中心,测试部门的测试。它只适合于很小的单元、可以枚举用例的测试。
程序功能的测试,面向需求分析中的功能、性能,设计测试用例,搭建测试环境,输入测试用例,运行被测试的系统,获得测试数据计划相比较,取得测试结果,根据测试结果,形成测试报告。
5.2系统维护