www.gusucode.com > 梦想草根大联盟广告模块 build码程序 > dreamasp_unmaster/dreamasp_un_edit.asp
<!-- 梦想草跟大联盟 联盟模块 欢迎加入梦想草根大联盟 http://www.dreamasp.cn 我们将致力于为草根站长服务 给草根站长创收 让草根站长能够在这片空间中继续生存 发展 有你的加入 我们会更精彩 感谢您使用我们的程序 --><% if not session("check")="checked" then response.Redirect "login.asp" else %> <!--#include file="dreamasp_conn.asp"--> <% set rs=server.createobject("adodb.recordset") sql="select * from dreamasp_un where id="&request.QueryString("id") rs.open sql,conn,1,3 %> <!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" /> <LINK href="images/css_body.css" type=text/css rel=stylesheet> <title>黑闪网络管理系统</title> <style type="text/css"> <!-- body,td,th { font-size: 12px; } --> </style></head> <body> <DIV class=bodytitle> <DIV class=bodytitleleft></DIV> <DIV class=bodytitletxt><strong>修改广告</strong></DIV> </DIV> <TABLE class=tbtitle style="BACKGROUND: #cad9ea" cellSpacing=1 cellPadding=5 width="96%" align=center border=0> <TBODY><form id="form1" name="form1" method="post" action="?act=gm&id=<%=request.QueryString("id")%>"> <TR> <TD vAlign=center width="7%" bgColor=#f5fafe>广告文字:</TD> <TD width="93%" valign="middle" bgColor=#ffffff><input name="webname" type="text" value="<%=rs("webname")%>" size="70" /> </TD> </TR> <TR> <TD vAlign=center width="7%" bgColor=#f5fafe>广告连接:</TD> <TD width="93%" valign="middle" bgColor=#ffffff><input name="weburl" type="text" value="<%=rs("weburl")%>" size="70" /> </TD> </TR> <TR> <TD vAlign=center width="7%" bgColor=#f5fafe>广告价格:</TD> <TD width="93%" valign="middle" bgColor=#ffffff><input name="money" type="text" value="<%=rs("money")%>" size="70" /> 元/月</TD> </TR> <TR> <TD vAlign=center width="7%" bgColor=#f5fafe>广告状态:</TD> <TD width="93%" valign="middle" bgColor=#ffffff><select name='zhuangtai' size='1'> <option value='0'>投放中 <option value='1'>已结束 <option value='2'>投放失败 </select> 当前状态:<% tzhuangtai=rs("zhuangtai") if tzhuangtai="2" then %><a title="这个广告投放失败、可能是因为广告主测试投放但未付款终止了广告、测试时间不会超过1天." style="COLOR: #FF0000">投放失败</a> <% else if tzhuangtai="0" then %><a title="这个广告正在会员网站正常投放">投放中</a><% else %><a title="广告款已转到您的会员帐户">已结束</a><% end if end if %> </TD> </TR> <TR> <TD vAlign=center width="7%" bgColor=#f5fafe>操作:</TD> <TD width="93%" valign="middle" bgColor=#ffffff><input type="submit" name="Submit" value="修改" /> </TD> </TR> </form></TBODY> </TABLE> <TABLE class=tbtitle style="BACKGROUND: #cad9ea" cellSpacing=1 cellPadding=5 width="96%" align=center border=0> <TR align="center" bgcolor="#f5fafe"> <TD colspan="2">Copyright © 2007-2009 All rights reserved.<A href="http://www.hscms.net.cn" target=_blank>成都黑闪网络科技有限公司</A></TD> </TR> </TABLE> <% set rs1=server.createobject("adodb.recordset") id=request.QueryString("id") if request.QueryString("act")="gm" then sql1="select * from dreamasp_un where id="&id rs1.open sql1,conn,1,3 rs1("zhuangtai")=request.form("zhuangtai") rs1("weburl")=request.form("weburl") rs1("webname")=request.form("webname") rs1("money")=request.form("money") rs1.update rs1.close response.Redirect "dreamasp_un.asp" end if %> </div> </body> </html> <% rs.close set rs=nothing set rs1=nothing conn.close set conn=nothing %> <% end if %>