editxx.asp
来自「创建和运行动态、交互的Web服务器应用程序」· ASP 代码 · 共 821 行 · 第 1/4 页
ASP
821 行
<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.reload('login.asp')</script>"
response.End
else
if session("flag")>1 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css2.css" rel="stylesheet" type="text/css">
</head>
<body>
<% dim action
action=request.QueryString("action")%>
<table width="90%" border="0" height=450 cellpadding="0" cellspacing="0">
<tr><td bgcolor="#ece9d8"><br>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td>
<table width=154 border="0" cellpadding="0" cellspacing="0">
<tr valign=bottom><%if action="gonggao" then %>
<td background=images/get_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>公告设置</font></div></td>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><a href="editxx.asp?action=huikuanfangshi"><font color=#000000>支付帐号</font></div></td>
<%elseif action="huikuanfangshi" then%>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><a href="editxx.asp?action=gonggao"><font color=#000000>公告设置</font></a></div></td>
<td background=images/get_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>支付帐号</font></div></td>
<%else%>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><a href="editxx.asp?action=gonggao"><font color=#000000>公告设置</font></a></div></td>
<td background=images/lose_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><a href="editxx.asp?action=huikuanfangshi"><font color=#000000>支付帐号</font></div></td>
<%end if%>
</tr>
</table>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0" bordercolordark="#ffffff" bordercolorlight="#666666">
<tr><td bgcolor="#cccccc" align=center height="25">
<a href="editxx.asp?action=gouwuliucheng"> 购物流程 |</a>
<a href="editxx.asp?action=regtiaoyue"> 注册条约 |</a>
<a href="editxx.asp?action=jiaoyitiaokuan"> 交易条款 |</a>
<a href="editxx.asp?action=changjianwenti"> 常见问题 |</a>
<a href="editxx.asp?action=shiyongfalv"> 版权声明 |</a>
<a href="editxx.asp?action=yunshushuoming"> 运输说明 |</a>
<a href="editxx.asp?action=baomi"> 保密安全 |</a>
<a href="editxx.asp?action=shouhoufuwu"> 售后服务 |</a>
<a href="editxx.asp?action=songhuofeiyong"> 送货费率 |</a>
<a href="editxx.asp?action=gongzuoshijian"> 工作时间 </a></td>
<tr><td>
<%
select case action
'//公告设置
case "gonggao"
set rs=server.CreateObject("adodb.recordset")
rs.open "select gonggao from shop_config",conn,1,1%>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0">
<tr><td bgcolor="#ece9d8">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr><td bgcolor="#ece9d8" align="center" height=25><b>公告设置编辑区</b></td>
<form name="form1" method="post" action="savexx.asp?action=gonggao">
<tr><td bgcolor="#ffffFF"><textarea name="gonggao" cols="60" rows="12" id="textarea"><%=trim(rs("gonggao"))%></textarea></td>
<%rs.close
set rs=nothing%>
<tr><td bgcolor="#cccccc" align="center" height="30">
<input type="submit" name="Submit" class="bt5" value="提 交">
<input type="button" name="rehis" class="bt5" value="返 回" onclick="javascript:history.go(-1)">
<input type="checkbox" name="html" value="ubb" checked>使用HTML添加，UBB代码将不起作用！</td>
</tr>
</form>
</tr>
</table>
<td valign="top" width="30%">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td colspan=2 bgcolor="#ece9d8" align="center" height=25><b>UBB代码使用说明</b></td>
<tr>
<td bgcolor="#ffffff" align="right">软回车</td><td bgcolor="#ffffff"> [br]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><font color="#FF0000">字颜色</font></td><td bgcolor="#ffffff"> [color]...[/color]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><u>下划线</u></td><td bgcolor="#ffffff"> [u]...[/u]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><strong>加粗</strong></td><td bgcolor="#ffffff"> [b]...[/b]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><em>斜体</em></td><td bgcolor="#ffffff"> [i]...[/i]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">放图片</td><td bgcolor="#ffffff"> [img]...[/img]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">热链接</td><td bgcolor="#ffffff"> [url]...[/url]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">链邮箱</td><td bgcolor="#ffffff"> [email]...[/email]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="center" height=25><img src="../images/guangbo.gif" border=0></td><td bgcolor="#ffffff"><font color=blue> 注释：'[]'在编写时为'<>'</font></td>
</tr>
</table>
</tr>
</table>
<%'//支付帐号
case "huikuanfangshi"
set rs=server.CreateObject("adodb.recordset")
rs.open "select huikuanfangshi from shop_config",conn,1,1%>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0">
<tr><td bgcolor="#ece9d8">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr><td bgcolor="#ece9d8" align="center" height=25><b>支付帐号编辑区</b></td>
<form name="form1" method="post" action="savexx.asp?action=huikuanfangshisave">
<tr><td bgcolor="#ffffFF"><textarea name="huikuanfangshi" cols="60" rows="12" id="textarea0"><%=trim(rs("huikuanfangshi"))%></textarea>
<%rs.close
set rs=nothing%></td>
<tr><td bgcolor="#cccccc" align="center" height=30>
<input type="submit" name="Submit0" class="bt5" value="提 交">
<input type="button" name="rehis" class="bt5" value="返 回" onclick="javascript:history.go(-1)">
<input type="checkbox" name="html" value="ubb" checked>使用HTML添加，UBB代码将不起作用！</td>
</tr>
</form>
</tr>
</table>
<td valign="top" width="30%">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td colspan=2 bgcolor="#ece9d8" align="center" height=25><b>UBB代码使用说明</b></td>
<tr>
<td bgcolor="#ffffff" align="right">软回车</td><td bgcolor="#ffffff"> [br]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><font color="#FF0000">字颜色</font></td><td bgcolor="#ffffff"> [color]...[/color]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><u>下划线</u></td><td bgcolor="#ffffff"> [u]...[/u]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><strong>加粗</strong></td><td bgcolor="#ffffff"> [b]...[/b]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right"><em>斜体</em></td><td bgcolor="#ffffff"> [i]...[/i]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">放图片</td><td bgcolor="#ffffff"> [img]...[/img]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">热链接</td><td bgcolor="#ffffff"> [url]...[/url]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="right">链邮箱</td><td bgcolor="#ffffff"> [email]...[/email]</td>
</tr>
<tr>
<td bgcolor="#ffffff" align="center" height=25><img src="../images/guangbo.gif" border=0></td><td bgcolor="#ffffff"><font color=blue> 注释：'[]'在编写时为'<>'</font></td>
</tr>
</table>
</tr>
</table>
<%'//购物流程
case "gouwuliucheng"
set rs=server.CreateObject("adodb.recordset")
rs.open "select gouwuliucheng from shop_config",conn,1,1%>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0">
<tr><td bgcolor="#ece9d8">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr><td bgcolor="#ece9d8" align="center" height=25><b>购物流程编辑区</b></td>
<form name="form1" method="post" action="savexx.asp?action=gouwuliucheng">
<tr><td bgcolor="#ffffFF"><textarea name="gouwuliucheng" cols="60" rows="12" id="textarea1"><%=trim(rs("gouwuliucheng"))%></textarea></td>
<%rs.close
set rs=nothing%>
<tr><td bgcolor="#cccccc" align="center" height="30">
<input type="submit" name="Submit1" class="bt5" value="提 交">
<input type="button" name="rehis" class="bt5" value="返 回" onclick="javascript:history.go(-1)">
<input type="checkbox" name="html" value="ubb" checked>使用HTML添加，UBB代码将不起作用！</td>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?