
<!-- #include file="../conn.asp" -->
<!-- #include file="admin.asp" -->
<%Call Head()
call saycarda("平台删除")
%>

<%dim id,idd,TP
   TP=request.querystring("TP")
   id=request.querystring("id")
   if id="" or Isnumeric(id)=Flash then
   Call error("ID无效！")
   end if
   idd=request.querystring("idd")
   if idd="" or Isnumeric(idd)=Flash then
   Call error("ID无效！")
   end if
   if TP<>"" then
   dim rs,sql
    set rs=server.CreateObject ("ADODB.Recordset") 
rs.open "Select * from symbian where id="&id&" and classid="&idd ,conn,2,3  
if rs.eof then
response.write("不存在的记录！")
else
rs.delete 
rs.update  
Response.Write "平台删除成功!"   
end if  
rs.close
set rs=nothing  
conn.close
set conn=nothing  
%>
<br/>----------<br/>
<a href='symbian.asp?idd=<%=idd%>&amp;saytk=<%=saytk%>&amp;sid=<%=sid%>'>[返回平台]</a><br/>
<a href='wjdl.asp?idd=<%=idd%>&amp;saytk=<%=saytk%>&amp;sid=<%=sid%>'>[返回上级]</a><br/>
<a href='wjclass.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>[文件大类]</a><br/>
<a href='wjcl.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>[文件管理]</a><br/>
<a href="../index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>">[后台管理]</a>
<%else%>
确定要删除该平台吗？<br/>
<a href='symbiandel.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>&amp;id=<%=id%>&amp;idd=<%=idd%>&amp;TP=1'>是的</a><br/>
<a href='symbian.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>&amp;idd=<%=idd%>'>取消</a>
<%end if%>
<%call headsay()%>