<%
 data_path="../" 'ACC连接数据库路径，对SQL无效 
  numid="06"
 dir="err.asp"
%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/safe.asp"-->
   <%
if issession=0 then
%>
<!--#include file="inc.asp"-->

<%
	adid=request("adid")

    addtime=request("adtime")
  set rs2=server.CreateObject("adodb.recordset")
sql2 = "Select * from [Websen_ad] where ADID='"&adid & "'"
		rs2.open sql2,conn,1,3
		rs2("ADStopDate")=addtime
		rs2.update
		rs2.close
		set rs2=nothing
        conn.close
		set conn=nothing
Response.Redirect "list.asp"   
end if	   
%>

