【 tulaoshi.com - ASP 】
                             
                               <% response.buffer=true %
<html
<head
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
<title删除消息</title</head
<body
<%
id=request("id")
id=split(id,",")
page=clng(request("page"))
Set conn = Server.CreateObject("ADODB.connection")
    Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
    DBPath = "Data Source=" & Server.MapPath( "webuser.mdb" )
    conn.Open Provider & DBPath    
    for i=0 to ubound(id)
        sql="delete from talks where id="&id(i)
        conn.execute(sql)
    next        
    conn.close
    set conn=nothing
    response.redirect"history.asp?page="&page
%
</body
</html