www.gusucode.com > QQ空间互踩整站源码asp网站源码程序 > QQ空间互踩整站源码asp网站源码程序/admin_class.asp
<!--#include file="conn.asp"-->
<%
dim action
action=request.QueryString("action")
if session("cutelink_admin")<>"OK" then
response.redirect "admin_login.asp"
end if
%>
<%
dim rsa,sql,Submit,Delet,AddClass,rs,Classer,Class123
Submit=Request("Submit")
Delet=Request("Delet")
AddClass=Request("AddClass")
If Submit<>"" Then
If Request.Form("img")="" Then
Response.write("<script>alert('地址不能为空！');location.href='admin_class.asp';")
response.write"javascript:history.go(-1)</SCRIPT>"
Response.End
else
Class123=Request("img")
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From Fx_Qface Where ID="&Request("ID")
Rs.open Sql,Conn,1,3
Rs("img")=Class123
Rs.Update
Rs.Close
response.write "<script>alert('修改成功！');location.href='admin_class.asp';</Script>"
End if
end if
If Delet<>"" Then
Conn.Execute"Delete From Fx_Qface Where ID="&Request("ID")
response.write "<script>alert('删除成功！');location.href='admin_class.asp';</Script>"
End if
If AddClass<>"" Then
If Request.Form("img")="" Then
Response.write("<script>alert('地址不能为空！');location.href='admin_class.asp';")
response.write"javascript:history.go(-1)</SCRIPT>"
Response.End
else
Classer=Request("img")
Set Rs=Server.Createobject("Adodb.Recordset")
sql="Select * From Fx_Qface"
Rs.open Sql,Conn,1,3
Rs.addnew
Rs("img")=Classer
Rs("name")=Classer
Rs.update
Rs.Close
response.write "<script>alert('添加成功！');location.href='admin_class.asp';</Script>"
End If
Set Rs=nothing
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>管理Qzone信息_<%=WebName&ChannelName%></title>
<link href="style.css" rel="stylesheet" type="text/css" />
</head>
<body bgcolor="#ffffff" leftmargin="0" topmargin="2">
<div align="center">
<center>
<!--#include file="top.asp"-->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="main_title1">
<tr>
<td align="center"><a href="admin_manage.asp">管理首页</a> | <a href="admin_manage.asp?action=ListSite">列出所有Qzone</a> | <a href="admin_manage.asp?action=ShowLog"><font color="#0000FF">查看点击记录</font></a> | <a href="admin_class.asp">修改Qzone信息</a> | <a href="admin_manage.asp?action=BatchDelform">批量删除数据</a> | <a href="admin_login.asp?action=exit">退出管理</a></td>
</tr>
</table>
<br>
<table width="760" border="0" align="center" cellpadding="3" cellspacing="0" class="main_tdbg">
<tr>
<td height="30">您的位置:<a href="<%=WebUrl%>">首页</a> -> <a href="admin_manage.asp">管理首页</a> -> 管理网站信息</td>
</tr>
</table>
<table width="760" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td height="100%" valign="top" bgcolor="#FFFFFF">
<div align="center"><br>
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#DDDDDD" style="border-collapse: collapse">
<tr>
<td width="83" height="24" align="center" bgcolor="#FFFFFF">【ID号】</td>
<td height="24" align="center" bgcolor="#FFFFFF">【输入新的图片地址名】【操作】</td>
</tr>
<%
Set Rsa=Server.Createobject("Adodb.Recordset")
Sql="Select * From Fx_Qface"
Rsa.open Sql,Conn,1,3
Do While not Rsa.Eof
%>
<tr>
<Form Method="post" action="?ID=<%=Rsa("ID")%>">
<td height="25" align="center" bgcolor="#FFFFFF"><%=Rsa("ID")%></td>
<td height="25" align="center" bgcolor="#FFFFFF"><Input Name="img" Type="Text" class="input" value="<%=Rsa("img")%>" size="15">
<input type="Submit" name="Submit" value="修改" class="subbt" />
<input type="Submit" name="Delet" value="删除" class="subbt" /></td>
</Form>
</tr>
<%
Rsa.Movenext
Loop
Rsa.Close
Set Rsa=nothing
Conn.Close
Set Conn=nothing
%>
<tr>
<Form Method="post" action="admin_class.asp">
<td height="35" colspan="2" align="center" bgcolor="#FFFFFF">
添加新图片：
<Input Type="Text" Name="img" size="15" class="input">
<Input Type="Submit" value="新增" Name="AddClass" class="subbt"></td>
</form>
</tr>
</table>
<br>
</div></td>
</tr>
</table>
</center>
</div>
</body>
</html>