📄 editor_pagetitle.asp
字号:
<%@language=vbscript codepage=936 %>
<%
option explicit
response.buffer=true
'强制浏览器重新访问服务器下载页面,而不是从缓存读取页面
Response.Buffer = True
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
dim ChannelID,i,s
ChannelID=trim(request("ChannelID"))
if ChannelID="" then
response.write "频道参数丢失!"
response.end
end if
ChannelID=Clng(ChannelID)
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> 插入分页标题 </TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="editor_dialog.css">
<script event=onclick for=Ok language=JavaScript>
if (pagetitle.value!=null)
{
var str;
str="[NextPage" + pagetitle.value + "]";
window.returnValue="<br>"+str+"<br><br>";
}
window.close();
</SCRIPT>
</HEAD>
<BODY bgColor=#D4D0C8 topmargin=15 leftmargin=15 >
<FIELDSET align=left>
<LEGEND align=left><strong> 插入分页标题 </strong></LEGEND>
<TABLE>
<TR>
<TD>
<Input TYPE="text" id="pagetitle" NAME="pagetitle" size=50></TD>
<TD>
<Input TYPE="submit" value=" 确 定 " id="Ok">
<Input TYPE="reset" value=" 取 消 " Onclick="window.close();">
</TD>
</TR>
</table>
</fieldset>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -