<%id = request("id") lb = request("lb") if jb<>"admin" then response.redirect "tb_dlxx.asp" lx = request("lx") cz = request("cz") logo = request("logo") link_ = request("link") px = request("px") if px="" then px="0" if id<>"" and cz="sc" then exec="delete from yrwl_tb_link where id>2 and id="+id conn.execute exec response.redirect "_link.asp" end if logo = replace(logo,"_","&") link_ = replace(link_,"_","&") if lb<>"" and cz="tj" then sql = "insert into yrwl_tb_link (uri,name,logo,px,lx) values ('"+link_+"','"+lb+"','"+logo+"','"+px+"','"+lx+"')" conn.execute sql response.redirect "_link.asp" end if if lb<>"" and cz="xg" then exec="update yrwl_tb_link set name='"+lb+"',logo='"+logo+"',px='"+px+"',uri='" + link_ + "',lx='" + lx + "' where id>2 and id="+id conn.execute exec response.redirect "_link.asp" end if exec = "select * from yrwl_tb_link" set rs = server.createobject("adodb.recordset") rs.open exec,conn,3,1%> <%while not rs.eof j=j+1 lb = rs("name") link_ = rs("uri") id = rs("id") lx = rs("lx") px = rs("px") logo = rs("logo")%> <%rs.movenext wend j=j+1%>
序号 网站中文名 网址 Logo 位置 排序 处理
<%=j%> 修改 删除
<%=j%> 添加
<%rs.close call close_conn()%>