📄 editor.asp
字号:
<!--#includes file="Conn.asp"-->
<%
'父窗口表单名称
dim FORMNAME
dim ntTemplate
dim dbConn, rs, templateId
FORMNAME = request.querystring("FORMNAME")
templateId = request("templateId")
if isnull(templateId) or templateId = "" then templateId = "0"
Set dbConn = GetDataConnection
'''''''''''''''
if templateId<>"0" then
set rs = dbConn.execute ("select ntTemplate from tblTemplate where id="&templateId)
if not rs.eof then
ntTemplate = rs("ntTemplate")
end if
set rs = nothing
end if
''''''''
set dbConn = nothing
%>
<html>
<head>
<title>HTML编辑器</title>
<link rel="STYLESHEET" type="text/css" href="edit.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
self.execScript("var formID='<%=FORMNAME%>';");
function openscripupload(formname){
if (navigator.appName!="Microsoft Internet Explorer")
alert("此功能 Netscape 用户不能使用！")
else{
newwin=window.open('photo.asp','','width=550,height=450,status=1,scrollbars=yes');
newwin.focus();
}
}
function changeTemplate(templateId){
frmTemplate.templateId.value=templateId;
frmTemplate.submit();
}
function LoadTemplate(){
Composition.document.body.innerHTML = document.frmTemplate.ntTemplate.value;
document.frmTemplate.ntTemplate.value = "";
}
</script>
</head>
<body bgcolor="menu" onload="InitDocument();LoadTemplate();" STYLE="MARGIN: 0pt; PADDING-BOTTOM: 0pt; PADDING-LEFT: 0pt; PADDING-RIGHT: 0pt; PADDING-TOP: 0pt">
<table border="0" style="display:none;">
<form name="frmTemplate" method="post" action="?FORMNAME=<%=FORMNAME%>">
<tr><td>
<input type="hidden" name="templateId">
<textarea style="width:1px;height:1px;" name="ntTemplate"><%=ntTemplate%></textarea>
</td></tr>
</form>
</table>
<div class="yToolbar" ID="ExtToolbar">
<div class="TBHandle"></div>
<div class="Btn" TITLE="删除" LANGUAGE="javascript" onclick="format1('delete');">
<IMG class="Ico" height="16" src="images\delete.gif" width="16"> </div>
<div class="Btn" TITLE="剪切" LANGUAGE="javascript" onclick="format1('cut');">
<IMG class="Ico" height="16" src="images\cut.gif" width="16"> </div>
<div class="Btn" TITLE="复制" LANGUAGE="javascript" onclick="format1('copy');">
<IMG class="Ico" height="16" src="images\copy.gif" width="16"> </div>
<div class="Btn" TITLE="粘贴" LANGUAGE="javascript" onclick="format1('paste');">
<IMG class="Ico" height="16" src="images\paste.gif" width="16"> </div>
<div class="Btn" TITLE="撤消" LANGUAGE="javascript" onclick="format1('undo');">
<IMG class="Ico" height="16" src="images\undo.gif" width="17"> </div>
<div class="Btn" TITLE="恢复" LANGUAGE="javascript" onclick="format1('redo');">
<IMG class="Ico" height="16" src="images\redo.gif" width="16"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="插入表格" LANGUAGE="javascript" onclick="fortable()">
<IMG class="Ico" height="18" src="images\table.gif" width="18"> </div>
<div class="Btn" TITLE="插入超级连接" LANGUAGE="javascript" onclick="UserDialog('CreateLink')">
<IMG class="Ico" height="22" src="images\wlink.gif" width="22"> </div>
<div class="Btn" TITLE="插入图片" LANGUAGE="javascript" onclick="openscripupload();">
<IMG class="Ico" height="22" src="images\img.gif" width="22"> </div>
<div class="Btn" TITLE="插入水平线" LANGUAGE="javascript" onclick="format('InsertHorizontalRule')">
<IMG class="Ico" height="16" src="images/hr.gif" width="16"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="提交" LANGUAGE="javascript" onclick="handin()">
<IMG class="Ico" height="16" src="images/save.gif" width="16"> </div>
<div class="TBSep"></div>
<div TITLE="欢迎使用HTML HTML代码编辑器">
<font size="2" color="red">
< =HTML代码编辑完毕，请按提交 </font>
</div>
</div>
<div class="yToolbar">
<div class="TBHandle"></div>
<select ID="formatSelect" class="TBGen" title="段落格式" onchange="doSelectClick('FormatBlock',this)" style="FONT: icon; WIDTH: 80px">
<option selected>段落格式</option>
<option VALUE="<P>"> 普通
<option VALUE="<PRE>"> 已编排格式
<option VALUE="<H1>"> 标题一
<option VALUE="<H2>"> 标题二
<option VALUE="<H3>"> 标题三
<option VALUE="<H4>"> 标题四
<option VALUE="<H5>"> 标题五
<option VALUE="<H6>"> 标题六
<option VALUE="<H7>">标题七</option>
</select>
<select id="specialtype" class="TBGen" onchange="doSelectClick('FormatBlock',this)" style="FONT: icon; WIDTH: 100px">
<option selected>特殊字体格式</option>
<option VALUE="SUP"> 上标
<option VALUE="SUB"> 下标
<option VALUE="DEL"> 删除线
<option VALUE="BLINK"> 闪烁
<option VALUE="BIG"> 增大字体
<option VALUE="SMALL">减小字体</option>
</select>
<div class="Btn" TITLE="字体颜色" LANGUAGE="javascript" onclick="foreColor();">
<IMG class="Ico" height="22" src="images\fgcolor.gif" width="23"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="加粗" LANGUAGE="javascript" onclick="format('bold');">
<IMG class="Ico" height="16" src="images\bold.gif" width="16"> </div>
<div class="Btn" TITLE="斜体" LANGUAGE="javascript" onclick="format('italic');">
<IMG class="Ico" height="16" src="images\italic.gif" width="16"> </div>
<div class="Btn" TITLE="下划线" LANGUAGE="javascript" onclick="format('underline');">
<IMG class="Ico" height="16" src="images\underline.gif" width="16"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="左对齐" NAME="Justify" LANGUAGE="javascript" onclick="format('justifyleft');">
<IMG class="Ico" height="16" src="images\aleft.gif" width="17"> </div>
<div class="Btn" TITLE="居中" NAME="Justify" LANGUAGE="javascript" onclick="format('justifycenter');">
<IMG class="Ico" height="16" src="images\center.gif" width="17"> </div>
<div class="Btn" TITLE="右对齐" NAME="Justify" LANGUAGE="javascript" onclick="format('justifyright');">
<IMG class="Ico" height="16" src="images\aright.gif" width="16"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="编号" LANGUAGE="javascript" onclick="format('insertorderedlist');">
<IMG class="Ico" height="18" src="images\numlist.gif" width="18"> </div>
<div class="Btn" TITLE="项目符号" LANGUAGE="javascript" onclick="format('insertunorderedlist');">
<IMG class="Ico" height="18" src="images\bullist.gif" width="18"> </div>
<div class="Btn" TITLE="减少缩进量" LANGUAGE="javascript" onclick="format('outdent');">
<IMG class="Ico" height="16" src="images\outdent.gif" width="16"> </div>
<div class="Btn" TITLE="增加缩进量" LANGUAGE="javascript" onclick="format('indent');">
<IMG class="Ico" height="16" src="images\indent.gif" width="16"> </div>
<div class="TBSep"></div>
<div class="Btn" TITLE="使用帮助" LANGUAGE="javascript" onclick="help();"> <IMG class="Ico" height="16" src="images\help.gif" width="16">
</div>
<div class="TBSep"></div>
</div>
<div class="yToolbar">
<div class="TBHandle"></div>
<div class="TBHandle"></div>
<select language="javascript" class="TBGen" id="FontName" title="字体名" onchange="format('fontname',this[this.selectedIndex].value);">
<option class="heading" selected> 字体
<option value="宋体"> 宋体
<option value="黑体"> 黑体
<option value="楷体_GB2312"> 楷体
<option value="仿宋_GB2312"> 仿宋
<option value="隶书"> 隶书
<option value="幼圆"> 幼圆
<option value="新宋体"> 新宋体
<option value="细明体"> 细明体
<option value="Arial"> Arial
<option value="Arial Black"> Arial Black
<option value="Arial Narrow"> Arial Narrow
<option value="Bradley Hand	ITC"> Bradley Hand ITC
<option value="Brush Script	MT"> Brush Script MT
<option value="Century Gothic"> Century Gothic
<option value="Comic Sans MS"> Comic Sans MS
<option value="Courier"> Courier
<option value="Courier New"> Courier New
<option value="MS Sans Serif"> MS Sans Serif
<option value="Script"> Script
<option value="System"> System
<option value="Times New Roman"> Times New Roman
<option value="Viner Hand ITC"> Viner Hand ITC
<option value="Verdana"> Verdana
<option value="Wide	Latin"> Wide Latin
<option value="Wingdings">Wingdings</option>
</select>
<select language="javascript" class="TBGen" id="FontSize" title="字号大小" onchange="format('fontsize',this[this.selectedIndex].value);">
<option class="heading" selected> 字号
<option value="7"> 一号
<option value="6"> 二号
<option value="5"> 三号
<option value="4"> 四号
<option value="3"> 五号
<option value="2"> 六号
<option value="1">七号</option>
</select>
<select language="javascript" class="TBGen" id="templateId" title="模板" onchange="javascript:changeTemplate(this.value);">
<option value="0">模板</option>
<% = getOptions("tblTemplate","Id","vcName","0","Id") %>
</select>
<div class="TBSep"></div>
<div class="TBGen" id="EditMode" title="查看HTML源代码"><input onclick="setMode(this.checked);" name="viewhtml" type="checkbox">查看HTML源代码 </div>
</div>
<div class="TBSep"></div>
<iframe class="Composition" ID="Composition" MARGINHEIGHT="1" MARGINWIDTH="1" width="100%" height="420"></iframe>
<script src="edit.js" type="text/javascript"></script>
</body>
</html>
<%
'''''
'tblName表名 fieldId,fieldName显示字段Id及Name selectedIdValue默认值 fieldOrder排序字段
'函数所有参数必须填写
function getOptions(tblName,fieldId,fieldName,selectedIdValue,fieldOrder)
dim dbConn, rs, sql
Set dbConn = GetDataConnection
sql = "select " & fieldId & "," & fieldName & " from " & tblName & " order by " & fieldOrder
set rs = dbConn.execute(sql)
do while not rs.eof
if rs(fieldId) = cint(selectedIdValue) then
getOptions = getOptions & "<option selected value=" & rs(fieldId) & ">" & rs(fieldName) & "</option>"
else
getOptions = getOptions & "<option value=" & rs(fieldId) & ">" & rs(fieldName) & "</option>"
end if
rs.movenext
loop
set rs = nothing
set dbConn = nothing
end function
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -