www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > admin/admin_toplinkmodify.asp

    <%PageName="admin_TopLinkModify"%>
<%CheckAdmin2%>
<!--#include file="const.asp"-->
<!--#include file="top.asp"-->
<!--#include file="INC/CHAR.INC"-->
<%
founderr=false
id=request.QueryString("id")
set rs=server.createobject("adodb.recordset")
sql="select * from TopLink where id="&id
rs.open sql,conn,1,1
if rs.eof then
	errmsg="<li>操作错误!该管理员不存在"
	founderr=true
else
	Name=rs("Name")
	Url=rs("Url")
	intro=rs("intro")
end if
rs.close
if founderr=true then
	call error()
else
%>
<div align="center">
<center>
<table border="1" width="750" cellpadding="0" style="border-collapse: collapse" bordercolor="#55595A" bgcolor="#414B5A">
<tr>
<td valign=top width="20%" align="center"><!--#include file="admin_left.asp"--></td>
<td align=center valign=top width="80%" background="images/admin_bg.gif"><table border="0" width="536" cellspacing="0" cellpadding="0">
<tr><td>      
<div align="center">
<center>      
<table border="1" width="97%" cellspacing="0" cellpadding="0" class="zt00" bordercolor="#55595A" style="border-collapse: collapse">
<form method="POST" action="admin_TopLinkSave.asp?id=<%=id%>">
<tr>
<td width="100%" height="20" colspan=2 align=center>
顶 部 网 址 管 理</td>
</tr>
<tr>
<td width="30%" align="right">名称:</td>
<td width="70%"><input type="text" name="Name" value="<%=Name%>" size="20" ></td>
</tr>
<tr>
<td align="right">地址:</td>
<td><input type="text" name="Url" value="<%=Url%>" size="20" ></td>
</tr>
<tr>
<td align="right">简介:</td>
<td><TEXTAREA name=intro rows=8 cols=60 ><%=intro%></TEXTAREA></td>
</tr>
<tr>
<td colspan=2 align=center>
<input type="hidden" value="edit" name="act">
<input type="submit" value=" 修 改 " name="cmdok" >&nbsp; 
<input type="reset" value=" 清 除 "  name="cmdcancel" >
</td>
</tr>
</form>
</table></td></tr></table>
</td>
</tr>
</table>
</div>
</div>
</div>
</div>
<%
end if
set rs=nothing
conn.close
set conn=nothing%></body></html>