⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ad_gg.asp

📁 凡人网络购物系统 v8.0 中文版
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"--><!--#INCLUDE FILE="htmlencode2.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>

<%
id=request("id")
if request("action")="add" then
set rs=server.createobject("adodb.recordset")
rs.Open "select * from venshop_pub",conn,1,3
rs.AddNew
rs("title")=request("title")
rs("msg")=htmlencode2(request("msg"))
rs("date")=date()
rs.Update
rs.Close
set rs=nothing
response.Redirect "ad_gg.asp"
response.end
end if
if request("action")="edit" then
set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_pub where id="&id&"",conn,1,3
rs("title")=request("title")
rs("msg")=htmlencode2(request("msg"))
rs("date")=date()
rs.update
rs.close
set rs=nothing
response.Redirect "ad_gg.asp"
response.end
end if
if request("action")="del" then
conn.execute "delete from venshop_pub where id="&id
response.Redirect "ad_gg.asp"
response.end
end if%>
<table border="0" cellspacing="1" bgcolor="#C8C8C8" cellpadding="0">
<tr><td align="center" bgcolor="#F0F0F0" height="23"><b>公告管理</b></td></tr>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_pub",conn,1,1
if rs.eof and rs.bof then
response.write "No DATA"
else
i=0
do while not rs.eof
i=i+1%>
<form method="post" action="ad_gg.asp?action=edit&id=<%=rs("id")%>">
<tr><td bgcolor="#FFFFFF">
<table border="0" cellpadding="5" cellspacing="0" width="100%" id="table1">
<tr><td bgcolor="#F7F7F7">公告<%=i%>标题:</td>
<td bgcolor="#F7F7F7"><input name="title" type="text" size="30" value="<%=rs("title")%>"></td></tr>
<tr><td>公告<%=i%>内容:</td><td><textarea rows="3" name="msg" cols="50"><%
htmlc=replace(rs("msg"),"<br>",chr(13))
htmlc=replace(htmlc,"&nbsp;"," ")    
response.write htmlc
%></textarea></td></tr>
<tr><td></td><td><input type="submit" name="Submit" value="修改">&nbsp; <a href=ad_gg.asp?action=del&id=<%=rs("id")%> onClick="return confirm('您确定进行删除操作吗?')">删除</a></td></tr>
</table></td></tr></form>
<%rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing%></table>
<br>
<table border="0" cellpadding="5" cellspacing="1" bgcolor="#C8C8C8"><form method="post"  action="ad_gg.asp?action=add">
  <tr>
    <td bgcolor="#F0F0F0">标题:</td>
    <td bgcolor="#F0F0F0"><input name="title" type="text" size="32"></td>
    </tr>
  <tr><td bgcolor="#FFFFFF">内容:</td><td bgcolor="#FFFFFF">
	<textarea rows="3" name="msg" cols="50"></textarea></td></tr>
  <tr><td bgcolor="#FFFFFF"> </td><td bgcolor="#FFFFFF"><input type="submit" name="Submit2" value="添 加"></td></tr>
</form></table><table cellSpacing="0" cellPadding="3" border="0" width="500"><tr><td height="20"></td></tr>
<tr><td bgcolor="#F2F2F2"><p style="LINE-HEIGHT: 150%"><font color="#FF0000">凡人网络购物系统V8.0 版权所有:</font><a target="_blank" href="http://www.venshop.com"><font color="#FF0000">凡人网络VenShop.Com</font></a><font color="#FF0000"><br>客服电话:010-80928177&nbsp; QQ:57152557/5404818 Email/Msn:</font><a href="mailto:Ser@VenShop.Com"><font color="#FF0000">Ser@VenShop.Com</font></a></td>
</tr></table>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -