% Response.Buffer=True %>
<%
if request("del")<>"" then
conn.Execute("delete * from company where id="&request("del")&"")
end if %>
江苏新程汽配制造有限公司
<% set rs=server.createobject("adodb.recordset")
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
sql="select * from company where id & id like '%"&key&"%' order by id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write""
end if
rs.pagesize=10
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount %>