hope_said.asp

来自「实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下:管理员」· ASP 代码 · 共 94 行

ASP
94
字号
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<% data_path="../../" 'ACC连接数据库路径,对SQL无效 %>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<link rel="stylesheet" type="text/css" href="../css/style.css">
<%	
	
if session("globalecmaster")="" or session("masterflag")="" then
response.write "<script language='javascript'>"
response.write"parent.location.href='../login.asp';</SCRIPT>" 
response.end
end if


 
'权限限制^^^^^^^^^^^^^^^^^^^^
 dim ishavegant
 ishavegant=false
 in_str=split(session("masterflag"),",")
 for each ins in in_str
 if trim(ins)="08" then 
 ishavegant=true
 end if
 next 
 if ishavegant=false then
 response.redirect "../err.asp"
 response.end
 end if
 '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^


if Request.QueryString("no")="eshop" then
set rs=server.createobject("adodb.recordset")
sql="select * from [yixiang_main]"
rs.open sql,conn,3,3
For i = 1 To Request.Form("content1").Count
  about = sContent & Request.Form("content1")(i)
  About=replace(About,"'","'")
Next
rs("yixiang_wt")=About
about=rs("yixiang_wt")
 rs.update
rs.close
filename=request.ServerVariables("PATH_INFO")
response.redirect filename
end if
sql="select * from yixiang_main"
Set rs_home= Server.CreateObject("ADODB.Recordset")
rs_home.open sql,conn,1,1
if not rs_home.eof then
about=rs_home("yixiang_wt")
else
about="暂无说明"
end if
%>
<body>
<table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="25">
<div align="center"><strong>委托说明</strong></div></td>
        </tr>
        <tr> 
          <form method="POST" action="?no=eshop" name=myform>
		  <td><table width="100%" border="0" cellspacing="2" cellpadding="0">
                <tr> 
                  <td height="10" colspan="2"> </td>
                </tr>
                <tr> 

                  <td width="100%" height="252" align="center" valign="top" bgcolor="#FFFFFF"><TABLE width="100%" border="0" align="center" cellpadding="2" cellspacing="1">
<TR>
	  <TD>
		<INPUT type="hidden" name="content1" value='<%=about%>'>
		<iframe ID="eWebEditor1" src="../../editor/ewebeditor.asp?id=content1&style=standard&originalfilename=d_originalfilename &savefilename=d_savefilename &savepathfilename=d_savepathfilename" frameborder="0" scrolling="no" width="617" HEIGHT="450"></iframe>
	</TD>
</TR>

<TR align="center">
	<TD colspan=2>
	  <INPUT type=submit name=b1 value="提交" onClick="content1.value=eWebEditor1.getHTML()"> 
	<INPUT type=reset name=b2 value="重填"> 



	</TD>
</TR>
</TABLE>
                  </td>
                </tr>
              </table></td></form>
        </tr>
</table>
</body>
<!--#include file="../copy.asp"-->

⌨️ 快捷键说明

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