submit_editor.asp

来自「企业管理系统erp商业源码,功能强大」· ASP 代码 · 共 40 行

ASP
40
字号
<%'''Option Explicit%>
<html>
<head>
<title>Xefteri : Content Editor using IFrame</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="global.css" type="text/css">
</head>

<body bgcolor="#FFFFFF">
<div class="body">
<p><font size="+1">Web-based Content Editor using IFrame</font></p>
[ <a href="content_editor.asp">Try it again</a> ]<br>
<br>
<%
Dim strContent

strContent = Request.Form("YOUR_CONTENT")
If strContent = "" Then
	Response.Write("Error. You did not enter anything in the box. Please go back and add something.")
Else
%>
<b>1) This is what you created in HTML</b> 
<table border="1" cellpadding="5" cellspacing="0" width="100%">
  <tr> 
    <td class="body"><%=Replace(Server.HTMLEncode(strContent), vbcrlf, "<br>")%></td>
  </tr>
</table>
<br>
<b>2) And the same thing rendered properly through a browser</b> 
<table border="1" cellpadding="5" cellspacing="0" width="100%">
  <tr> 
    <td class="body"><%=strContent%></td>
  </tr>
</table>
<%
End If
%>
</div>
</body>
</html>

⌨️ 快捷键说明

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